Delphi原生DBGrid学习 - 随笔分类 - 涂磊

DBGrid之进度条显示

摘要：https://www.packtpub.com/en-us/product/delphi-cookbook-second-edition-9781785287428/chapter/delphi-basics-1/section/customizing-tdbgrid-ch01lvl1sec11 阅读全文

posted @ 2024-08-12 15:18 涂磊阅读(54) 评论(0) 推荐(0) 编辑

could not convert variant of type(NULL) into type(OleStr)

摘要：问题出在如果筛选出Column.Field.Value为空值，不能转为 OleStr类型，要用VarToStrDef进行转换。另外一种解决方法 if not varisnull(Column.Field.Value) then ComboBoxEx1.ItemIndex := ComboBo 阅读全文

posted @ 2024-05-20 10:21 涂磊阅读(206) 评论(0) 推荐(0) 编辑

delphi DBNavigator1 删除前后事件

摘要：//擦除原来线 procedure TForm1.DBNavigator1BeforeAction(Sender: TObject; Button: TNavigateBtn); begin if button=nbDelete then DBtooLine( clBtnFace,clBtnFac 阅读全文

posted @ 2024-04-28 15:51 涂磊阅读(33) 评论(0) 推荐(0) 编辑

FireDAC将UniDBGrid数据另存为网页HTML格式，方便导出

摘要：procedure DBGrid1ToHTML(aFDquery :TFDQuery;aHTMLFileName:string); var aHTMLtext: TstringList; j: integer; begin aHTMLtext := TstringList.Create; aHTML 阅读全文

posted @ 2024-04-15 15:45 涂磊阅读(19) 评论(0) 推荐(0) 编辑

FireDAC之FDTable1学习_汇总

摘要：不能有BLOG类型字段，否则会错误退出。如果表结构发生变化，只能用FDTable1来刷新显示，不能用FDQuery1 SQLite3框架源代码下载 01].Filter 属性 02].FDTable1的Locate操作 03]只返回前几行 01].Filter 属性，相当于添加 SQL语句的W 阅读全文

posted @ 2024-04-13 11:06 涂磊阅读(57) 评论(0) 推荐(0) 编辑

FireDAC之FDQuery1.Filter := 'id >= 2';学习

摘要：Filter是在已select的数据里筛选数据，不再从数据库里 select could not convert variant of type(NULL) into type(OleStr) 问题出在如果筛选出Column.Field.Value为空值，不能转为 OleStr类型，要用Var 阅读全文

posted @ 2024-04-13 10:57 涂磊阅读(51) 评论(0) 推荐(0) 编辑

如何用DBGrid1一直显示数据库里的数据，并设置好显示列宽

摘要：procedure TMainForm.UniFormCreate(Sender: TObject); begin FDConnection1.Connected:=true; FDQuery_user.Active:=true; FDQuery_user.SQL.Text:= 'select id 阅读全文

posted @ 2024-04-12 15:36 涂磊阅读(53) 评论(0) 推荐(0) 编辑

Delphi10.3FireDAC的FDConnection1可直接书写SQL语句,所有表名和表结构字段

摘要：https://docwiki.embarcadero.com/RADStudio/Sydney/en/Querying_Metadata_(FireDAC) 不必这样麻烦也可以代码里直接运行SQL语句 if FDconnection1.Connected then FDConnection1. 阅读全文

posted @ 2024-03-19 09:19 涂磊阅读(156) 评论(0) 推荐(0) 编辑

FireDAC中FDQuery1中SQL语句中的参数使用(19)

摘要：假设数据库已正常连接双击FDQuery1,SQL语句中以冒号开头就是参数，后面就是参数名然后第二Parameters页，左边列表就有就该参数名，然后给参数的DataType,Value值，再点Execute，就可看到查询结果。其后　将上面的　界面，变成代码实现即可 procedure TFo 阅读全文

posted @ 2024-03-17 16:31 涂磊阅读(138) 评论(0) 推荐(0) 编辑

DBGrid之某特定单元格的颜色设置(15)

摘要：procedure TForm13.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); begin if (Colum 阅读全文

posted @ 2024-02-23 11:28 涂磊阅读(60) 评论(0) 推荐(0) 编辑

DBGrid之Sqlite3合计行(14)

摘要：Sqlite3合计行(10) 阅读全文

posted @ 2024-02-04 15:34 涂磊阅读(12) 评论(0) 推荐(0) 编辑

DBGrid显示图片(13)

摘要：对应的编辑控件为ComboBoxEx1 procedure TForm13.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawSta 阅读全文

posted @ 2024-01-21 14:02 涂磊阅读(77) 评论(0) 推荐(0) 编辑

DBGrid中插入Edit1(12)

摘要：因为引用 CheckBox1不要双击后，出现 0的Edit显示所以，去掉 dgEditing DBGrid1.Options:= DBGrid1.Options-[ dgEditing]; 所有DBGrid1的Editor控件，事件都要自己写，包括默认Edit procedure TFo 阅读全文

posted @ 2024-01-05 16:36 涂磊阅读(34) 评论(0) 推荐(0) 编辑

DBGrid中插入CheckBox1(11)

摘要：procedure TForm13.DBGrid1CellClick(Column: TColumn); begin if (Column.Field.FieldName = 'aboolean') then begin DBGrid1.SelectedField.DataSet.Edit; if 阅读全文

posted @ 2024-01-05 15:37 涂磊阅读(28) 评论(0) 推荐(0) 编辑

DBGrid中插入ComboBox1(10)

摘要：根据 DBGrid中插入DateTimePicker(08) 类似改编 procedure TForm13.ComboBox1Change(Sender: TObject); //ComboBox1 写回数据库 begin DBGrid1.DataSource.Edit; DBGrid1.Col 阅读全文

posted @ 2024-01-05 11:51 涂磊阅读(43) 评论(0) 推荐(0) 编辑

DBGrid中插入DateTimePicker1(08)

摘要：DBGrid中插入DateTimePicker procedure TForm13.DateTimePicker1Change(Sender: TObject); //写回日期 begin DBGrid1.DataSource.Edit; DBGrid1.Columns[2].Field.Valu 阅读全文

posted @ 2024-01-04 21:43 涂磊阅读(28) 评论(0) 推荐(0) 编辑

Delphi10.3的DBGrid之外键显示(07)

摘要：要在设计的时候，界面上显示值 procedure TForm13.FDQuery1idGetText(Sender: TField; var Text: string; DisplayText: Boolean); begin if Sender.AsInteger =1 then text:='一阅读全文

posted @ 2024-01-04 21:23 涂磊阅读(36) 评论(0) 推荐(0) 编辑

Delphi10.3的DBGrid之列宽(06)

摘要：procedure TForm13.FormCreate(Sender: TObject); begin DBGrid1.Columns[0].Width:=180; end; Delphi实现DBGrid列宽度自动调整https://www.cnblogs.com/tecsoon/archive/ 阅读全文

posted @ 2023-05-15 10:05 涂磊阅读(276) 评论(0) 推荐(0) 编辑

Delphi10.3的DBGrid之FDTable1的Locate(05)

摘要：Delphi10.3的DBGrid之FDTable1的Locate(05) SQLite3框架源代码下载 FDTable是将表一次性加载到内存中,然后定位读取单元格值,适用于频繁读写表格时。设置好Connection ，TableName 然后 FDTable1.Active:=true 阅读全文

posted @ 2023-04-21 14:55 涂磊阅读(97) 评论(0) 推荐(0) 编辑

Delphi10.3的DBGrid之导出为CSV(04)

摘要：Delphi10.3的DBGrid之导出为CSV(04) SQLite3框架源代码下载 procedure DBGridToCSV(aFDquery: TFDQuery; aCSVFileName: string); // CSV格式 var aCSVtext: TstringList; i, j 阅读全文

posted @ 2021-08-12 20:26 涂磊阅读(482) 评论(0) 推荐(0) 编辑

随笔分类 - Delphi原生DBGrid学习

搜索

随笔分类 (685)