| | | | | |

2024年1月28日

摘要：参考：VCL下ListBox自画,Lazarus也一样 uses LCLType; ListBox的两个设置：自画事件：ListBox1DrawItem procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer; 阅读全文

posted @ 2024-01-28 18:45 涂磊阅读(55) 评论(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 涂磊阅读(63) 评论(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 涂磊阅读(57) 评论(0) 推荐(0) 编辑

2024年1月16日

更改默认托盘图标

摘要：阅读全文

posted @ 2024-01-16 14:54 涂磊阅读(42) 评论(0) 推荐(0) 编辑

unigui中unidbnavigator的相关设置

摘要：参考自带DEMO ：C:\Program Files (x86)\FMSoft\Framework\uniGUI\Demos\Desktop\DBNavigator - Custom Icons 01]unigui中unidbnavigator的图标设置 02]unigui中设置unidbnavig 阅读全文

posted @ 2024-01-16 14:49 涂磊阅读(119) 评论(0) 推荐(0) 编辑