随笔分类 -  Delphi

Json解析
摘要：1 //JSON解析 2 function TForm5.JsonResolve(sStr:string):string; 3 var 4 jSOObj:ISuperObject; 5 jOObj:ISuperObject; 6 jRoot,jSid:ISuperObject; 7 sRoot,sSid:string; 8 arrayStr:TSuperArr... 阅读全文
posted @ 2019-05-31 17:31 一字节 阅读(403) 评论(0) 推荐(0)
创建新的MessageBox窗口前，先关掉之前已经创建好的
摘要：procedure TForm2.Timer1Timer(Sender: TObject); var h:HWND; begin h := FindWindow(nil,PAnsiChar('123')); if h > 0 then begin //PostMessage(h,WM_SYSCOMMAND, SC_CLOASE,0);//现在这样写法不管用 Send... 阅读全文
posted @ 2018-09-11 15:54 一字节 阅读(155) 评论(0) 推荐(0)
TcxCheckComboBox的使用
摘要：一下就忘记怎么用了，记录一下吧 想要框里面默认为空，Miscellaneous的propertier属性的EmptySelection设置为空就好 用下拉框第一个数据来填充：cxCheckComboBoxArea.States[0] := cbsChecked; 清空此框：cxCheckComboB 阅读全文
posted @ 2018-08-07 18:03 一字节 阅读(1098) 评论(0) 推荐(0)
Delphi调用C#的DLL
摘要：1、 之前是水司只给了C#加密解密部分的代码，然后自己封装Dll的时候以为直接类库生成dll，Delphi直接调用就可以了，但是测试发现，原来是没有把这自己写的函数加在新建的接口文件里面，加在接口文件里面必须指定是public，不然生成的tlb文件看不到函数 2、 先切换到Dll所在路径，然后Tlb 阅读全文
posted @ 2018-07-05 09:31 一字节 阅读(967) 评论(0) 推荐(0)
StringGrid数据导出到Excel
摘要：1、控件： StringGrid1: TRzStringGrid; ADOConnection1: TADOConnection; ADOTable1: TADOTable; DataSource1: TDataSource; Button1: TButton;//导出数据 Button2: TBu 阅读全文
posted @ 2018-04-25 17:23 一字节 阅读(578) 评论(0) 推荐(0)
从Excel导入信息在StringGrid显示
摘要：1、控件：2个Button，1个label，1个edit，1个StringGrid，1个OpenDialog，1个PopuMenu 2、双击‘......’按钮，选择文件路径 3、双击‘读取’按钮 4、PopuMenu添加PopuMenu右键弹出事件 5、给PopuMenu添加一个右键的值，双击会弹 阅读全文
posted @ 2018-04-23 17:08 一字节 阅读(380) 评论(0) 推荐(0)
Delphi的TDataSetProvider、TDataSet、TAdoQuery、TDataSource、TDataModule控件的组合使用
摘要：Delphi的TDataSetProvider、TDataSet、TAdoQuery、TDataSource控件的组合使用 照旧先上控件布局图： 1、File-New-VCL Forms Application，找到控件挨个填上去 用到的控件：Button、TDataSetProvider、TDat 阅读全文
posted @ 2018-03-22 16:38 一字节 阅读(830) 评论(0) 推荐(0)
初学Delphi与sql server的存储过程
摘要：照旧，先上delphi的界面控件布局： 1个adoconnection、1个adoquery、1个DataSource、1个button、1个dbgrideh（随意） 前期准备：1、设置adoconnection的connectionstring，为了方便：Provider=SQLOLEDB.1;P 阅读全文
posted @ 2018-03-21 09:47 一字节 阅读(415) 评论(0) 推荐(0)
delphi简单的分页实现（高手可以不看）
摘要：适合初学者，练习几个控件的使用 1、先放一张界面控件布局： 4个button，2个label，1个edit，1个TRzsplitter（把界面分割成上下2部分），1一个adoquery，1个adoconnection，1个datdasource，1个DBgridEh（原生的dbgrid也可以） 2、 阅读全文
posted @ 2018-03-20 15:07 一字节 阅读(3654) 评论(0) 推荐(0)
Delphi的简单的Http请求格式
摘要：界面新加：IdHTTP1: TIdHTTP;控件 声明 sResult: TStringStream; sParamList: TStringList; 创建 sParamList := TStringList.Create; sResult := TStringStream.Create(''); 阅读全文
posted @ 2018-03-14 17:22 一字节 阅读(603) 评论(0) 推荐(0)
Delphi的RzDbgrid改变某行的背景色
摘要：本想改变符合条件的行的背景色，试了DbgridEh和原生的Dbgrid直接在DrawColumnCell事件中写重绘代码就好了，But在RzDbgrid就不起效果，查了好一会，百度了一大堆，都是千篇一律，就是一个复制粘贴，放弃了 然后重新又看了下这个控件的各个属性，发现DefaultDrawing这 阅读全文
posted @ 2018-03-14 17:10 一字节 阅读(945) 评论(0) 推荐(0)
Delphi关于ADO控件的简单使用
摘要：控件：TAdoQuery、ADOConnection、TDataSource、TRzDBGrid 1、新建Vcl Form Application 2、在窗体上添加TADOConnection，设置连接数据库的参数，2种方法： 1>双击该控件，build通过设置数据源来连接数据库 注意：如果是连本地 阅读全文
posted @ 2017-10-31 16:44 一字节 阅读(2498) 评论(0) 推荐(0)
Delphi连接数据库的两种方式
摘要：标准Adoconnection连接串： //数据源选择：微软提供的驱动 Microsoft OLE DB Provider For Oracle 所生成的串 ConnectionString := 'Provider=MSDAORA.1;Password=pass;User ID=username; 阅读全文
posted @ 2017-10-31 16:42 一字节 阅读(3172) 评论(0) 推荐(0)
Delphi子窗体随主窗体大小而变化
摘要：当然办法有很多种，我建议用TRzsplitter更好点， TRzsplitter分割，在其上边放置panel，然后把align置为alClient，则可以随着主窗体的大小而一起变动 选中此控件右键editor Splitter，Orientation可以设置为水平分割或者垂直分割，其他属性自己摸索吧 阅读全文
posted @ 2017-10-31 16:33 一字节 阅读(849) 评论(0) 推荐(0)
Delphi关于TAdvStringGrid控件颜色的设置
摘要：FixedFont-Color 标题行和列字体的颜色 Font-color 单元格字体的颜色Visual-color 整个表格的背景色填充 阅读全文
posted @ 2017-09-25 16:36 一字节 阅读(1045) 评论(0) 推荐(0)
串口通信
摘要：串口通信：外设与软件之间的通讯协议 1、先上一张串口的数据格式图 ①起始位：用于标志传输一个字符的开始，接收方可用起始位使自己的时钟和发送方的数据同步； ②数据位：依次为D0-D6（低位到高位）， ③校验位：D7位数据校验位可有可无（奇校验，数据位的1的数量为奇数，则用0表示；偶校验，数据位的1的数 阅读全文
posted @ 2017-09-01 15:12 一字节 阅读(465) 评论(0) 推荐(0)