Delphi2010 - 随笔分类(第4页) - 涂磊

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

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

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

Delphi 10.3编译错误：[BRCC32 Error] "brcc32" exited with code 1.错误原因：工程丢失图标。

摘要：Delphi 10.3编译错误：[BRCC32 Error] "brcc32" exited with code 1. 错误原因：工程丢失图标。阅读全文

posted @ 2024-03-17 15:49 涂磊阅读(88) 评论(0) 推荐(0) 编辑

delphi 新版内存表 FDMemTable使用SQL查询(02)

摘要：不用在界面上设置，直接复制源代码即可链接：https://pan.baidu.com/s/1AmQjlZ9TcvXcZqjWzIkurA 提取码：t1bm fdLocalSql可以对fdMemTable内存表进行SQL查询（可以对多个fdMemTable内存表进行联表查询哦），fdLocalS 阅读全文

posted @ 2024-03-01 15:00 涂磊阅读(537) 评论(0) 推荐(0) 编辑

delphi 新版内存表 FDMemTable日常操作(01)

摘要：更多详细操作，请见：https://www.cnblogs.com/karkash/p/16310441.html 01]建立缓存表 procedure TForm1.FormCreate(Sender: TObject); begin FDMemTable1.Close(); FDMemTable 阅读全文

posted @ 2024-02-29 20:36 涂磊阅读(464) 评论(0) 推荐(0) 编辑

delphi10.3下学习ClientDataSet1全攻略

摘要：0]ClientDataSet1.Active 设为true弹出AVdsnap260.bpl错误的解决办法 Access violation at address 5134E27F in module 'dsnap260.bpl'. Read of address 00000000. :因为与Del 阅读全文

posted @ 2024-02-27 14:31 涂磊阅读(187) 评论(0) 推荐(0) 编辑

ClientDataSet1.Active 设为true弹出AVdsnap260.bpl错误的解决办法

摘要：Access violation at address 5134E27F in module 'dsnap260.bpl'. Read of address 00000000. 这是先装delphi10.3,再装Delphi7造成的。解决办法，将Midas.dll从C:\Program Files 阅读全文

posted @ 2024-02-27 11:43 涂磊阅读(14) 评论(0) 推荐(0) 编辑

ImageList1控件的使用原则

摘要：ImageList1的功能是设计时候，保存好一系列的图片。在设计加载后，绑定好使用控件，这里我们以TrayIcon1控件为例子要更改 TrayIcon1控件的图标属性，不能通过修改ImageList1，要通过更改 TrayIcon1控件的相关属性， TrayIcon1.IconIndex: 阅读全文

posted @ 2024-02-27 10:53 涂磊阅读(66) 评论(0) 推荐(0) 编辑

delphi10.3农历日历控件安装使用

摘要：delphi10.3农历日历 1]DateCn.pas，只显示某天为农历几月几日,不可视控件 DateCn.pas单文件下载链接：https://pan.baidu.com/s/1D_oj9I1BOVNbjfKzWQQIUQ 提取码：lz2v procedure TForm1.FormCrea 阅读全文

posted @ 2024-02-23 16:08 涂磊阅读(102) 评论(0) 推荐(0) 编辑

解决Delphi7编译工程时提示Internal error:LA30、Access violation at address xxxxxxxx in module ‘RLINK32.DLL‘错误

摘要：https://blog.csdn.net/gust2013/article/details/125258100 阅读全文

posted @ 2024-02-11 19:29 涂磊阅读(93) 评论(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 涂磊阅读(78) 评论(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 涂磊阅读(60) 评论(0) 推荐(0) 编辑

delphi 如何把一首mp3歌曲存入SQLite3里面qq81709989 (ChatGPT-4)

摘要：// 导入需要的单元uses System.IOUtils, System.SysUtils, FMX.Media, FMX.Types, Data.DB, FireDAC.Comp.Client, FireDAC.Stan.Param;// 定义一个全局变量，表示数据库连接var DBConnec 阅读全文

posted @ 2024-01-11 18:24 涂磊阅读(56) 评论(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如何获得控件的On属性事件列表?

摘要：也可参考 cxRTTIInspector1学习(20) 用RTTI https://www.jianshu.com/p/784db6186e49 uses strutils, rtti, System.typinfo; procedure TForm2.FormCreate(Sender: TObj 阅读全文

posted @ 2023-12-24 20:09 涂磊阅读(16) 评论(0) 推荐(0) 编辑

Delphi 枚举转字符串

摘要：implementation Uses TypInfo; procedure TForm3.FormCreate(Sender: TObject); //定义枚举类型 type TDayOfWeek=(Monday,Tuesday,Wednesday,Thursday,FriDay,Saturday 阅读全文

posted @ 2023-12-24 18:38 涂磊阅读(95) 评论(0) 推荐(0) 编辑

delphi - 调整表单大小，同时保持纵横比

摘要：https://www.coder.work/article/5928583 在Form1的 OnCanResize 事件添加以下处理程序似乎对我来说效果很好: procedure TForm2.FormCanResize(Sender: TObject; var NewWidth, NewHeig 阅读全文

posted @ 2023-12-23 09:40 涂磊阅读(45) 评论(0) 推荐(0) 编辑

Delphi：循环语句for-in

摘要：https://www.jianshu.com/p/0fd88af44e4b 1.for-in 循环中，循环对数组，列表，字符串或其他有序类型的容器的每个元素进行操作。 2.打开IDE，新建VCL应用，添加一个button1，一个memo1，双击button1，编写代码： procedure 阅读全文

posted @ 2023-12-22 16:41 涂磊阅读(157) 评论(0) 推荐(0) 编辑

Delphi新语法IfThen

摘要：https://docwiki.embarcadero.com/Libraries/Sydney/en/System.StrUtils.IfThen function IfThen(AValue: Boolean; const ATrue: string; AFalse: string = ''): 阅读全文

posted @ 2023-12-21 15:42 涂磊阅读(181) 评论(0) 推荐(0) 编辑

(01)lazarus学习之下载安装_查找控件

摘要：从https://www.lazarus-ide.org/下载，类似Delphi7 如果安装第三包出了问题，可以点击下面恢复查找控件方法: 阅读全文

posted @ 2023-12-15 15:51 涂磊阅读(240) 评论(0) 推荐(0) 编辑

VCL可视控件的鼠标拖动移动

摘要：procedure TForm2.ListBox1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin releaseCapture; ListBox1.Perform(W 阅读全文

posted @ 2023-11-22 15:59 涂磊阅读(27) 评论(0) 推荐(0) 编辑

随笔分类 - Delphi2010

搜索

随笔分类 (686)