随笔分类 -  Delphi

摘要:一、string转为ansistring1、直接赋值 (有警告)2、ansistring()类型强制转换。(无警告) 二、ansistring 转为string 1、直接赋值 (有警告)2、string()类型强制转换。(无警告) 三、string 转为Tbytes 1、bytes:= byteso 阅读全文
posted @ 2021-08-24 13:16 覆雨翻云 阅读(544) 评论(0) 推荐(0)
摘要:快捷键对于提高编程速度有着很重要的影响,本文汇总整理了Delphi常用的快捷键,供大家参考之用: Ctrl+PageUp将光标移至本屏的第一行,屏幕不滚动。Ctrl+PageDown将光标移至本屏的最后一行,屏幕不滚动。Ctrl+↓向下滚动屏幕,光标跟随滚动不出本屏。Ctrl+↑向上滚动屏幕,光标跟 阅读全文
posted @ 2020-08-08 15:22 覆雨翻云 阅读(632) 评论(0) 推荐(0)
摘要:超简单~加个函数转换下就OK了~ UTF8Decode() 我的用法是Memo1.text:=UTF8Decode(idhttp1.get('')); 转自: http://hack518.blog.sohu.com/99364146.html https://www.iteye.com/blog/ 阅读全文
posted @ 2020-06-20 18:11 覆雨翻云 阅读(2566) 评论(0) 推荐(0)
摘要:Delphi日期时间,就是常见的 2014-05-02 10:37:35 UNIX日期时间,一个整数,从1970/01/01 开始的秒数,int64位 标准UTC时间, 世界统一时间,世界标准时间,国际协调时间,简称UTC 不属于任意时区 中国大陆、中国香港、中国澳门、中国台湾、蒙古国、新加坡、马来 阅读全文
posted @ 2020-06-19 21:46 覆雨翻云 阅读(870) 评论(0) 推荐(0)
摘要:语法: myTcolor:=rgbtocolor(redvalue,greenvalue,bluevalue); 例子: form1.color:=rgbtocolor(255,0,0); 函数: function RGBToColor(R,G,B:Byte): TColor; begin Resu 阅读全文
posted @ 2020-06-12 14:51 覆雨翻云 阅读(391) 评论(0) 推荐(0)
摘要:注意一点的是,由于函数名 ClientToScreen,被控件的方法与API函数同名使用,所以造成在调用时delphi优先调用控件的ClientToScreen方法。如果只想调用API函数,那么可以用 windows.ClientToScreen。 源代码如下: unit Unit1; interf 阅读全文
posted @ 2020-04-13 20:00 覆雨翻云 阅读(1059) 评论(0) 推荐(0)
摘要:在按键处理的代码里填上 e.Handled = true; 就没声音了 private void textBoxCodebar_KeyPress(object sender, KeyPressEventArgs e) { if (e.KeyChar == Convert.ToChar(Keys.En 阅读全文
posted @ 2020-02-15 18:52 覆雨翻云 阅读(458) 评论(0) 推荐(0)
摘要:摘自:http://www.ej38.com/showinfo/delphi-131567.html 一、引子: 现在的Windows应用程序几乎都使用图标、图片、光标、声音等,我们称它们为资源(Resource)。最简单的使用资源的办法是把这些资源的源文件打入软件包,以方便程序需要的时候调用。资源 阅读全文
posted @ 2020-02-05 10:44 覆雨翻云 阅读(190) 评论(0) 推荐(0)
摘要:编译问题:为什么我去掉Build with runtime packages,编译没问题??? 如果不去掉,就有错误:[Linker Error] Unresolved external 'TXNetDataPkg::' referenced from D:\BOC933\CHARTS\XPLUTU 阅读全文
posted @ 2019-07-24 18:21 覆雨翻云 阅读(336) 评论(0) 推荐(0)
摘要:XLSReadWriteII是一个读写Excel的组件。他的一般已用只要按照Demo操作基本都能实现,只要不是非常复杂的应用,XLSReadWriteII还是能够胜任的。 最近被派了一个写入图库的应用,图库是Gallery2图库,本身支持自定义字段功能,原始文件是一个排版完整的Excel表格,程序的 阅读全文
posted @ 2019-03-25 20:41 覆雨翻云 阅读(2131) 评论(0) 推荐(0)
摘要:如果用的delphi在你的单元里用uses midaslib这个东西就可以把midas静态连接到你的程序楼上的也可以 在程序中使用winexec("regsvr32.exe midas.dll",SW_NORMAL);注册midas组件 可能是注册表中记录的<path>midas.dll不存在,可以 阅读全文
posted @ 2019-03-21 09:26 覆雨翻云 阅读(1350) 评论(0) 推荐(0)
摘要:最近用delphi xe做了个东西,因为以前一直使用Delphi 7做开发,delphi 7 到delphi XE有了很大的变化,最大的变化就是对Unicode的支持,所以刚开始使用DELPHI XE时还有些不太习惯,尤其在字符串处理的时候。 DELPHI XE 增加了UnicodeString 类 阅读全文
posted @ 2018-11-08 19:09 覆雨翻云 阅读(1065) 评论(0) 推荐(0)
摘要:一个Unicode字符串,如何判断其中都是可见字符? 注意string从来不是widestring,D2009之前string是ansistring, 从D2009开始,string是unicodestring。unicodestring和widestring虽然都是UTF-16字符串,但不是同一种 阅读全文
posted @ 2018-11-08 19:05 覆雨翻云 阅读(735) 评论(0) 推荐(0)
摘要:以前都是这么用的,可是今天却一直提示Parameter jfdh_id not found,把Parameters.ParamByName('jfdh_id').Value := getid();这句注释掉后,就提示后边的参数没有找到。 有人说values后要加空格,加了不行。重新写一遍,看是不是输 阅读全文
posted @ 2018-10-23 15:28 覆雨翻云 阅读(14161) 评论(0) 推荐(0)
摘要:复合控件复合控件是Delphi控件中非常重要的一种控件,复合控件就是将两个或两个以上的控件重新组合成一个新的控件。例如TspinEdit、TlabeledEdit、TDBNavigator等就是复合控件,TDBNavigator其实就是在一个Panel放上若干个Button而已。制作一个复合控件时, 阅读全文
posted @ 2018-09-21 15:44 覆雨翻云 阅读(611) 评论(0) 推荐(0)
摘要:procedure TCustomerForm.FindCustomerInfo;var strSql:string;begin // BL_HV_FindCustomerInfo 存储过程的名称,后面是需要的全部的参数 strSql:='exec BL_HV_FindCustomerInfo :S 阅读全文
posted @ 2018-08-28 16:29 覆雨翻云 阅读(498) 评论(0) 推荐(0)
摘要:#和0的区别: #是对应位有值显示,无值不显示 0是对应位有值显示,无值显示0 分号后的字符串是对负值的格式化特殊定义: s := FormatFloat('00.0;(0.00)',1.123); //返回: 01.1 s := FormatFloat('00.0;(0.00)',-1.123); 阅读全文
posted @ 2018-08-17 10:29 覆雨翻云 阅读(502) 评论(0) 推荐(0)
摘要:在delphi中,C#也是如此,对象的地址与对象变量(引用)的地址不是同一个概念。要加以区别。 procedure TForm1.btn1Click(Sender: TObject); var p1: Pointer; p2: Pointer;begin if TObject(btn1) = TOb 阅读全文
posted @ 2018-06-30 16:40 覆雨翻云 阅读(296) 评论(0) 推荐(0)
摘要:用了这些年的Delphi,竟然对Currency及TBCDField一知半解,下文给了很好的讲解,值得一读。 一. BCD类型 BCD即Binary-Coded Decimal?,在Delphi中,BCD字段类型可以精确保存浮点数据类型。 Delphi支持的BCD码的数据类型名为TBCD,它的定义如 阅读全文
posted @ 2018-06-28 16:41 覆雨翻云 阅读(755) 评论(0) 推荐(0)
摘要:操作步骤: 1.打开delphi,菜单选择compoents->import Activex control,然后选择那个mscomm32.ocx安装即可。 2.注册MScomm控件 开始-》运行-》 regsvr32 MScomm32.ocx 如果在delphi中使用Mscomm控件出现如下错误提 阅读全文
posted @ 2018-05-13 11:41 覆雨翻云 阅读(650) 评论(0) 推荐(0)