上一页 1 ··· 11 12 13 14 15 16 17 18 19 ··· 29 下一页
摘要: 引入 Vcl.Themes, Vcl.Styles, 设置主题类型 TStyleManager.TrySetStyle('Turquoise Gray'); 或则在窗体代码中实现 unit Unit14; interface uses Winapi.Windows, Winapi.Messages, 阅读全文
posted @ 2017-08-11 15:42 夏天的西瓜君 阅读(679) 评论(0) 推荐(0) 编辑
摘要: function GB2Big(GB: string): string; //简体转换成繁体var Len: Integer;begin Len := Length(GB); SetLength(Result, Len); LCMapString(GetUserDefaultLCID, LCMAP_ 阅读全文
posted @ 2017-08-09 09:15 夏天的西瓜君 阅读(422) 评论(0) 推荐(0) 编辑
摘要: unit Unit13; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, 阅读全文
posted @ 2017-08-03 13:28 夏天的西瓜君 阅读(998) 评论(0) 推荐(0) 编辑
摘要: //最常用的 string var str: string; {定义} begin str := '万一'; {赋值} ShowMessage(IntToStr(Length(str))); {长度是: 4} end; //长字符串 AnsiString; 在当前版本(2007)中的默认状态下, S 阅读全文
posted @ 2017-08-02 14:10 夏天的西瓜君 阅读(317) 评论(0) 推荐(0) 编辑
摘要: var s: string; begin //指令类型 type s := Format('最大整数是: %d; 最小整数是: %d',[MaxInt,Low(Integer)]); //返回: 最大整数是: 2147483647; 最小整数是: -2147483648 { 提示: 格式指令必须以 阅读全文
posted @ 2017-08-02 13:38 夏天的西瓜君 阅读(188) 评论(0) 推荐(0) 编辑
摘要: procedure TForm1.Button1Click(Sender: TObject); var s1: AnsiString; //单字节储存 s2: WideString; //双字节储存 begin s1 := '万一OK'; s2 := '万一OK'; ShowMessage(s1[1 阅读全文
posted @ 2017-08-02 10:44 夏天的西瓜君 阅读(198) 评论(0) 推荐(0) 编辑
摘要: 举例: 阅读全文
posted @ 2017-08-01 14:07 夏天的西瓜君 阅读(460) 评论(0) 推荐(0) 编辑
摘要: BPL 英文全称 Borland Package library ,是一种特殊的DLL文件,用于代码重用和减少可执行文件。编译bpl时,仅需要添加相应功能的pas文件,如果有窗体,则需要添加dfm文件。既然是DLL文件,那就是在运行时所需要的文件。BPL相当于C++中的DLL DCP 英文全称:de 阅读全文
posted @ 2017-08-01 10:43 夏天的西瓜君 阅读(384) 评论(0) 推荐(0) 编辑
摘要: 单目运算符 (最高优先级) @ 取变量或函数的地址(返回一个指针) not 逻辑取反或按位取反 乘除及按位运算符 * 相乘或集合交集 / 浮点相除 div 整数相除 mod 取模 (整数相除的余数) as 程序运行阶段类型转换 (RTTI运算符) and 逻辑或按位求和 shl 按位左移 shr 按 阅读全文
posted @ 2017-08-01 10:12 夏天的西瓜君 阅读(1916) 评论(0) 推荐(0) 编辑
摘要: 以下的文章主要介绍的是MySQL数据库索引类型,其中包括普通索引,唯一索引,主键索引与主键索引,以及对这些索引的实际应用或是创建有一个详细介绍,以下就是文章的主要内容描述。 (1)普通索引 这是最基本的MySQL数据库索引,它没有任何限制。它有以下几种创建方式: 创建索引 如果是CHAR,VARCH 阅读全文
posted @ 2017-07-28 09:11 夏天的西瓜君 阅读(349) 评论(0) 推荐(0) 编辑
上一页 1 ··· 11 12 13 14 15 16 17 18 19 ··· 29 下一页