会员
周边
捐助
新闻
博问
闪存
赞助商
所有博客
当前博客
我的博客
我的园子
账号设置
简洁模式
...
退出登录
注册
登录
涂磊的小作,请赐教
| |
新随笔
|
新文章
| | |
管理
上一页
1
···
4
5
6
7
8
9
10
11
12
···
96
下一页
2024年4月23日
delphi aStringGrid 动态创建,并设置事件 属性
摘要: 一定要设置网格父级MyGrid.Parent := Self;,才会 显示出来 procedure TForm1.FormShow(Sender: TObject); var MyGrid : TStringGrid ; i,j:integer; begin allStringGridList:=
阅读全文
posted @ 2024-04-23 09:35 涂磊
阅读(34)
评论(0)
推荐(0)
编辑
2024年4月22日
Delphi10.3如何将ListBox1项,拖动 到 右边Memo1当前输入项
摘要: 01]ListBox1的DragMode设置为dmAutomatic 02】Memo1的OnGragOver事件和OnDragDrop事件 procedure TForm8.Memo1DragOver(Sender, Source: TObject; X, Y: Integer; State: TD
阅读全文
posted @ 2024-04-22 15:38 涂磊
阅读(12)
评论(0)
推荐(0)
编辑
2024年4月19日
Delphi10.3开发的SQLite3的图形操作小软件
摘要: 通过网盘分享的文件:connectnion学习V41.rar链接: https://pan.baidu.com/s/1EQuCyF3-RV1EOHs37nis4Q 提取码: xz8m listbox2.Items.Add(FDMetaInfoQuery1.FieldByName('COLUMN_NA
阅读全文
posted @ 2024-04-19 17:07 涂磊
阅读(82)
评论(0)
推荐(0)
编辑
for down to 循环 遇到 真条件后,要及时退出,否 一直 到最后一后条件 而不是第一个条件
摘要: for down to 循环 遇到 真条件后,要及时退出,否 一直 到最后一后条件 而不是第一个条件 procedure TForm8.Memo1KeyPress(Sender: TObject; var Key: Char); var i,j:integer; aStr:string; begin
阅读全文
posted @ 2024-04-19 16:31 涂磊
阅读(11)
评论(0)
推荐(0)
编辑
delphi tStringList 添加另一个 tStringList及不重复项
摘要: aStringList.CommaText:=ListBox1.Items.CommaText; aList:=TStringList.Create; aList.LoadFromFile('keyWord.txt'); aStringList.CommaText:=aStringList.Comm
阅读全文
posted @ 2024-04-19 10:50 涂磊
阅读(43)
评论(0)
推荐(0)
编辑
上一页
1
···
4
5
6
7
8
9
10
11
12
···
96
下一页