自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(6)
  • 问答 (1)
  • 收藏
  • 关注

原创 Delphi读取网络图片

idhttp1.Get('http://图片地址.jpg',imagestream);//修改此处网址就可以。在窗体添加一个Image,一个IdHttp,一个Button。上方 uses 后添加个 Jpeg。

2023-11-04 11:45:51 162 1

原创 Delphi 的combobox 从数据库获取下拉菜单内容

ComboBox1.Items.Add(ADOQuery1.FieldByName('产地').AsString);ComboBox1.Items.Add(ADOQuery1.FieldByName('产地').AsString);SQL.Add('select * from WZ原料产地');SQL.Add('order by 产地');

2023-11-03 07:51:21 296

原创 delphi打印,最简单的打印功能

excel.workbooks.open(extractfilepath(application.exename)+'excel\学生信息表.xls');sheet.cells[i+2,3]:=ADOQuery1.FieldByName('备注').AsString;sheet.cells[i+2,1]:=ADOQuery1.FieldByName('姓名').AsString;sheet.cells[i+2,2]:=ADOQuery1.FieldByName('学号').AsString;

2023-11-02 07:53:30 516

原创 delphi dbgrideh求和,dbgrideh平均数

delphi dbgrideh求和,dbgrideh平均数

2023-11-01 07:52:51 887

原创 Delphi SQL.Add(‘ 下查询的表名不明确时

SQL.Add(' select * from [dbo].[工资表'''+FormatDateTime('yyyyMM',DateTimePicker1.DateTime)+'''] ');如表名'工资表'三个字,加上每个月年月组成。

2023-10-31 14:30:10 134

原创 delphi grideh定位到满足某条件那行,即定位到等于某值的那行

ADOQuery1.locate('编号;名称',vararrayof(['20230101','王明']),[loPartialKey]);ADOQuery1.Locate('编号','20230101',[loPartialKey]);如下,定位到某两列,各自满足条件。如下,定位到某一列满足某条件。

2023-10-30 16:10:59 298

MsComm32 comm控件安装

MsComm32 comm控件安装 里面的readme是安装步骤必看

2023-11-02

Delphi电子秤称重记录(包含物理配置,控件以及程序)

Delphi电子秤称重记录(包含物理配置,控件以及程序)

2023-10-31

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除