会员
周边
捐助
新闻
博问
闪存
赞助商
所有博客
当前博客
我的博客
我的园子
账号设置
简洁模式
...
退出登录
注册
登录
涂磊的小作,请赐教
| |
新随笔
|
新文章
| | |
管理
上一页
1
···
19
20
21
22
23
24
25
26
27
···
96
下一页
2024年1月28日
(11)lazarus带历史记忆,并模糊带出功能的Edit
摘要: (20) Lazarus学习之ListFilterEdit1过滤ListBox1数据CheckListBox1,ColorListBox1,FileListBox1 procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word; Shift
阅读全文
posted @ 2024-01-28 20:53 涂磊
阅读(28)
评论(0)
推荐(0)
编辑
(10)Lazarus下ListBox自画
摘要: 参考:VCL下ListBox自画,Lazarus也一样 uses LCLType; ListBox的两个设置: 自画事件:ListBox1DrawItem procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer;
阅读全文
posted @ 2024-01-28 18:45 涂磊
阅读(46)
评论(0)
推荐(0)
编辑
2024年1月21日
DBGrid显示图片(13)
摘要: 对应的编辑控件为ComboBoxEx1 procedure TForm13.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawSta
阅读全文
posted @ 2024-01-21 14:02 涂磊
阅读(47)
评论(0)
推荐(0)
编辑
StringGrid1单元格内绘图
摘要: var Rect: Trect; begin Rect:= bg.CellRect(4,3); bg.Canvas.Brush.Color:= clwhite; bg.Canvas.FillRect(rect); bg.Canvas.Draw( rect.Left +trunc(( rect.Rig
阅读全文
posted @ 2024-01-21 09:18 涂磊
阅读(55)
评论(0)
推荐(0)
编辑
2024年1月16日
更改默认托盘图标
摘要:
阅读全文
posted @ 2024-01-16 14:54 涂磊
阅读(37)
评论(0)
推荐(0)
编辑
上一页
1
···
19
20
21
22
23
24
25
26
27
···
96
下一页