摘要:
//Char 类型与其编码值的转换:var b: Byte; c: Char;begin b := Ord('A'); {返回: 65} b := Ord(#65); {返回: 65} b := Ord($41); {返回: 65} b := Ord(#$41); {返回: 65} b := Byt... 阅读全文
2014年7月24日
摘要:
begin#E760FCA2FAE65266BDD1FF6C0EFFC3F393884C05FC3A6DD28ADC5FF4C7F1B33E9D61FBA87215DE6943704303AA7FC173C86C02EA311540C99B08DA852FB79A9D53A3CE14EF524D7D 阅读全文
摘要:
先说赋值://赋值方法1: 给直接量begin SetWindowText(Handle, '新标题');end;//赋值方法2: 定义它要的类型var p: PChar;begin p := '新标题'; SetWindowText(Handle, p);end;//赋值方法3: 转换成它要的类型... 阅读全文
2012年9月6日
摘要:
uses System.IOUtils;procedure TForm1.FormCreate(Sender: TObject);var S: string;begin { 三种方法结果一致: C:\Users\wy\AppData\Roaming } S := GetHomePath; ... 阅读全文