频道分类
您的位置:网站首页 > 组件

delphi cxDBTreeList:最简单的节点图标添加方法

先在窗体上放ImageList关联到cxDBTreeList,在cxDBTreeList的GetNodeImageIndex事件中写如下:procedurecxD…

类别:组件 标签: 作者:admin 日期:2020-03-28 23.11.13

Delphi 使控件变成圆角的方法

procedureRoundControl(Control:TWinControl;arc1,arc2:Integer);varR:TRect;Rgn:HRGN;beginwithControldob…

类别:组件 标签: 作者:admin 日期:2020-03-28 23.07.07

Delphi edit只允许输入数字

ifnot(keyin['0'..'9',#8])thenkey:=#0;

类别:组件 标签: 作者:admin 日期:2020-03-28 23.05.25

Delphi CheckListBox 用法

fori:=CheckListBox1.Items.Count-1downto0do//从后面往前面删beginifCheckListBox1.Checked[i]then//是否选…

类别:组件 标签: 作者:admin 日期:2020-03-28 22.59.19

Delphi MEMO 循环往上往下滚动

//循环往上滚动ifMemo1.Perform(EM_SCROLL,SB_LINEDOWN,0)=0thenbeginMemo1.Perform(WM_VSCROLL,SB_TOP,0);…

类别:组件 标签: 作者:admin 日期:2020-03-28 22.56.22

delphi 遍历所有Edit控件

unitUnit1;interfaceusesWinapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes…

类别:组件 标签: 作者:admin 日期:2020-03-28 13.38.40

delphi cef4 忽略不安全网站

在工程文件里写入GlobalCEFApp:=TCefApplication.Create;GlobalCEFApp.IgnoreCertificateErrors:=True;

类别:组件 标签:cef4 作者:admin 日期:2020-03-27 12.51.57

delphi tlistbox添加横向滚动条

//delphitlistbox添加横向滚动条procedureTForm1.SetWidth(pListBox:TListBox);vari,w:Integer;beginw:=0;f…

类别:组件 标签: 作者:admin 日期:2020-03-27 12.45.33

delphi StringGrid行列的增加和删除

typeTExCell=class(TStringGrid)publicprocedureDeleteRow(ARow:Longint);procedureDeleteColumn(ACol:Long…

类别:组件 标签: 作者:admin 日期:2020-03-27 12.43.09

Delphi StringGrid使用全书

StringGrid行列的增加和删除typeTExCell=class(TStringGrid)publicprocedureDeleteRow(ARow:Longint);proce…

类别:组件 标签: 作者:admin 日期:2020-03-27 12.42.21

Delphi TButton.OnClick 匿名函数用法

typeTNotifyEventRef=referencetoprocedure(Sender:TObject);functionAnonymousEvent(constProc:TNotifyEve…

类别:组件 标签: 作者:admin 日期:2020-03-23 21.23.46

delphi TMemo控件滚动条scrollbar末尾插入字符串一点都会闪烁的轻松实现

Memo1.DoubleBuffered:=True;//使用双缓冲,减少TMemo字符串数据闪烁Memo1.Lines.BeginUpdate;//加入该行保…

类别:组件 标签: 作者:admin 日期:2020-03-23 09.12.24

delphi 让ComboBox只允许输入数字和回车键以及delphi key值表

procedureTForm1.ComboBox2KeyPress(Sender:TObject;varKey:Char);beginifnot(Keyin['0'..'9',chr(VK_BACK)…

类别:组件 标签: 作者:admin 日期:2020-03-23 09.01.48

delphi读取RadioGroup选中按钮的string文本

procedureTForm1.RadioGroup1Click(Sender:TObject);beginShowMessage('['+inttostr(RadioGroup1.ItemIndex…

类别:组件 标签: 作者:admin 日期:2020-03-23 08.59.25

delphi 动态生成九宫格按钮

unitUnit1;interfaceusesWinapi.Windows,Winapi.Messages,System.SysUtils,System.Variants,System.Classes…

类别:组件 标签: 作者:admin 日期:2020-03-22 22.40.52

Delphi动态创建30个按钮,每行6个共5行,顺序排列

procedureTForm1.Button1Click(Sender:TObject);constiHtoH=20;//行间距iWtoW=10;//列间距iPerLine=6;//每行…

类别:组件 标签: 作者:admin 日期:2020-03-22 22.12.41

delphi tms web core TEDIT编辑输入框属性展示

TEDIT编辑框输入框是Delphi最基础的控件之一,这一节我选择这个来展示控制其属性和Delphi桌面程序一样,非常…

类别:组件 标签: 作者:admin 日期:2020-03-22 17.58.22

delphi 调试TMS WEB CORE应用

调试TMSWEBCORE应用

类别:组件 标签: 作者:admin 日期:2020-03-22 17.54.34

DELPHI listview导出到excel

usesExcelXP,strutils,QDialogs,Variants;functionget_listviewTOexcel(listview:TListView;strTitle:strin…

类别:组件 标签:listview 作者:admin 日期:2020-03-20 23.32.13

delphi tms web core 复制内容到剪切板

首先需要用到:http://www.clipboardjs.cn/clipboard.js现代化的拷贝文字不依赖flash,不依赖其他框架,gzip…

类别:组件 标签: 作者:admin 日期:2020-03-19 10.06.30