- 2024-04-19Delphi10.3开发的SQLite3的图形操作小软件
链接：https://pan.baidu.com/s/1Glye61WgYd_wC0uOfx9ZoQ提取码：dqd9关键部份FDConnection1.GetTableNames('','','',ListBox1.Items);StringGrid1.Cells[1,i+1]:=FDMetaInfoQuery1.FieldByName('COLUMN_NAME').AsString;
- 2024-03-21StringGrid1做数据控件的基本常用操作
procedureTForm1.StringGrid1SelectCell(Sender:TObject;ACol,ARow:Integer;varCanSelect:Boolean);varR:TRect;org:TPoint;beginifARow>0thenbegin//标题行不能修改ifnotSQLResutIsEmptythenbeginwithSenderasTStringGriddoif
- 2024-02-23(17)Lazarus学习之StringGrid1
01]下拉ComboBox1选择 参考：C:\lazarus\examples\gridexamples\gridcelleditorprocedureTForm1.StringGrid1SelectEditor(Sender:TObject;aCol,aRow:Integer;varEditor:TWinControl);beginif(aCol=3)and(aRow>0)thenbegin//哪些单元格显示Comb
- 2024-01-21StringGrid1单元格内绘图
varRect:Trect;beginRect:=bg.CellRect(4,3);bg.Canvas.Brush.Color:=clwhite;bg.Canvas.FillRect(rect);bg.Canvas.Draw(rect.Left+trunc((rect.Right-rect.Left-tx2.Width)/2)//单元格水平居中,rect.Top+tr