2015年10月12日
XE中rectangle实现渐变
摘要： Fill -> Kind -> Gradient(选项) -> Gradient(Edit)添加颜色即可 阅读全文
posted @ 2015-10-12 21:40 王云盼 阅读(226) 评论(0) 推荐(0) 编辑
delphi创建服务程序
摘要： 创建一个自己的服务程序：File -> New -> Other -> New(选项) -> ServiceApplication 这样delphi会自动生成服务程序的框架。保存合适的项目名称。(这里单元名为UnitServer.pas, 工程名为ProjectServer.dpr)在新建的服务里，... 阅读全文
posted @ 2015-10-12 21:34 王云盼 阅读(482) 评论(0) 推荐(0) 编辑
LeftStr函数使用
摘要： LeftStr(s, i);表示返回字符串s的左边共I位字符的一个新字符串。var i: integer; s: string; result: string;begin i := 3; s ：= 'abcd1234'; result := LeftStr(s, ... 阅读全文
posted @ 2015-10-12 17:04 王云盼 阅读(1244) 评论(0) 推荐(0) 编辑
Delphi7中的Char和XE中的Char
摘要： 我用FillChar()函数时，发现两个版本中的Char不一样。在delphi7中procedure TForm2.Button1Click(Sender: TObject);var s: array[0..3] of Char; i: integer;begin FillCh... 阅读全文
posted @ 2015-10-12 16:34 王云盼 阅读(893) 评论(0) 推荐(0) 编辑