delphi
mrwlw
这个作者很懒,什么都没留下…
展开
-
Delphi 实现程序 动态 类名
1、首先将delphi中Controls单元提取2、修改Controls单元中如下部分:procedure TWinControl.CreateParams(var Params: TCreateParams);beginFillChar(Params, SizeOf(Params), 0);with Params dobegin Caption := FText转载 2015-07-23 21:10:30 · 696 阅读 · 0 评论 -
Delphi中常用字符串处理函数
1.copy(str,pos,num) 从str字符串的pos处开始,截取num个字符的串返回.假设str为'abcdef',copy(str,3,2)='cd',copy(str,4,10)='def' 2.concat(str1,str2{,strn}) 把各自变量连接起来,返回连接后的字符串(长度不能超过255) 3.length(str) 返回str的字符个数,即其转载 2017-10-15 01:54:39 · 5878 阅读 · 0 评论 -
Delphi : Listview 不同行列显示不同颜色
//不同列显示不同颜色procedure TMainForm.ListView1CustomDrawSubItem(Sender: TCustomListView;Item: TListItem; SubItem: Integer; State: TCustomDrawState;var DefaultDraw: Boolean);beginexit;case SubIte转载 2017-12-08 22:04:18 · 3843 阅读 · 0 评论