Delphi
文章平均质量分 65
yonghenghaha
这个作者很懒,什么都没留下…
展开
-
Delphi读取INI
2013-02-18 10:51 Delphi 读取INI文件一、有必要了解INI文件的结构:;注释[小节名]关键字=值...---- INI文件允许有多个小节,每个小节又允许有多个关键字, “=”后面是该关键字的值。---- 值的类型有三种:字符串、整型数值和布尔值。其中字符串存贮在INI文件中时没有引号,布尔真值用1表示,布尔假值用0表示。---- 注释转载 2013-07-11 16:36:02 · 1504 阅读 · 0 评论 -
oracle怎么实现id自增和设置主键
呵呵,这个问题,是从其他数据库转过来的开发者最常见的问题。1、关于主键:在建表时指定primary key字句即可:create table test( id number(6) primary key, name varchar2(30));如果是对于已经建好的表,想增加主键约束,则类似语法:alter table test add constraint pk_转载 2014-06-09 10:28:52 · 702 阅读 · 0 评论 -
delphi调用外部程序
这个程序主要作用就是用Delphi调用外部程序并实现运行过程中不显示/显示运行窗口的功能这样就可以实现运行批处理不出现黑窗口的功能了。具体实现过程如下,如果你其中有不明白的地方可以先放着因为这是给网吧专用的快速入门教程。(如果你没看昨天的教程一,建议你先看)下面是详细实现过程:1、按照昨天讲的方法,放置一个按钮组件到窗口设计界面上,双击按钮,转到代码编辑窗口转载 2014-05-22 09:50:58 · 1560 阅读 · 0 评论 -
delphi发送邮件代码
procedure TForm1.Button1Click(Sender: TObject); begin try IdSMTP1.AuthenticationType:=atLogin; //设置登陆类型 IdSMTP1.Username:=Edit1.Text; //设置登陆帐号 IdSMTP1.Password:=Edit2.Text; //设转载 2013-12-03 16:15:37 · 682 阅读 · 0 评论 -
Delphi 关键字详解
absolute//它使得你能够创建一个新变量, 并且该变量的起始地址与另一个变量相同.var Str: string[32]; StrLen: Byte absolute Str;//这个声明指定了变量StrLen起始地址与Str相同.//由于字符串的第0个位置保存了字符串的长度, 所以StrLen的值即字符串长度.begin Str := 'abc';转载 2013-09-25 16:14:25 · 537 阅读 · 0 评论 -
delphi中pchar、char、string的定义与区别
Char是单个字符;PChar 就是指向一个以Null 结尾的每个字符为一个字节的字符串的指针。 (可以看成是一个字符串)String是字符数组,以字符#0结尾;Char只占一字节的空间,而Pchar保存的是一个指针,在现在32位的系统中占有1个指针字节的大小。type PChar=^Char; PChar类型是一个指向Char的指针,并使用Delphi的扩展语法.它也能够转载 2013-08-29 11:04:56 · 1007 阅读 · 0 评论 -
delphi Format格式化函数
Format是一个很常用,却又似乎很烦的方法,本人试图对这个方法的帮助进行一些翻译,让它有一个完整的概貌,以供大家查询之用:首先看它的声明:function Format(const Format: string; const Args: array of const): string; overload;事实上Format方法有两个种形式,另外一种是三个参数的,主要区别在于它是线程安转载 2013-08-15 11:53:19 · 389 阅读 · 0 评论 -
DELPHI好东西
http://www.cnblogs.com/dabiao/category/221941.html原创 2013-08-26 13:33:52 · 351 阅读 · 0 评论 -
delphi读取excel的两种方法
两种方法,一是用ADO连接,问题是Excel文件内容要规则,二是用OLE打开,但操作就没有象操作数据库那么方便了.一、用ADO连接:设置属性ConnetionString 选择 Microsoft Jet 4.0 OLE DB provider Select or enter a datasorce name -> 选择你要打开Excel文件 User name默认是A转载 2013-08-26 09:47:00 · 931 阅读 · 0 评论 -
截图:截取当前程序的界面,并保存到bmp图片中。
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,Clipbrd;type TForm1 = class(TForm) btn1: TButton; d转载 2013-08-09 11:45:07 · 917 阅读 · 0 评论 -
Delphi——FindFirst学习
FindFirst在SysUtils中声明 原型为Fucntion FindFirst(const Path:String;Attr:Integer;Var F:TSearchRec):Integer;描述:从指定的目录中搜索第一个给定属性文件实例返回结果保存到参数F中,F参数是一个文件结构包含文件信息成功返回0,否则返回错误代码参数Path:包含路径和搜索模糊文件名,包括转载 2013-07-23 13:19:40 · 1702 阅读 · 0 评论 -
Sendmessage最大最小化窗口
keybd_event只用来产生键盘事件,系统捕捉到键盘事件后,会转化为键盘消息的形式派发给拥有键盘输入焦点的应用程序。PostMessage首先把消息发送到指定句柄所在线程的消息队列再由线程派发。SendMessage直接把消息送到指定句柄窗体或控件。SendMessage(hwnd, WM_SYSCOMMAND, SC_MAXIMIZE, 0); // 最大化SendMessa原创 2013-07-11 16:34:28 · 6308 阅读 · 0 评论 -
在delphi ocx控件的安装
第一步: 使用过Activex的人都知道,Activex不注册是不能够被系统识别和使用的,一般安装程序都会自动地把它所使用的Activex控件注册,但如果你拿到的一个控件需要手动注册怎么办呢?如果修改注册表那就太麻烦了,在Windows的system文件夹下有一个regsvr32.exe的程序,它就是Windows自带的Activex注册和反注册工具。它的用法为:regsver32详转载 2013-07-19 16:49:23 · 957 阅读 · 0 评论 -
Delphi下遍历文件夹下所有文件的递归算法
procedure MakeTree(var slFile: TStrings; const FileExt: string);var Sr : TSearchRec; Err : integer; TrSize, FilePath : string;begin Err:=FindFirst('*.*', $11, Sr) ; While (Err = 0)转载 2013-05-13 13:58:09 · 909 阅读 · 0 评论 -
在Delphi中读写TXT文件
Procedure NewTxt(FileName:String);Var F : Textfile;Begin if fileExists(FileName) then DeleteFile(FileName); {看文件是否存在,在就刪除} AssignFile(F, FileName); {将文件名与变量 F 关联} ReWrite(F); {创建一个新的文件并命名转载 2013-07-11 16:32:29 · 564 阅读 · 0 评论 -
Delphi 文件操作
var file_name:string;file_name:='c:\luther.gliethttp.txt';FileWrite(com.log_fd, PChar(file_name)^, length(file_name));文件是同一种类型元素的有序集合,是内存与外设之间传输数据的渠道。文件的本质是一个数据流,所有的文件实际上是一串二进制序列。文件管理包括:1、文件操作转载 2013-03-25 09:25:30 · 450 阅读 · 0 评论 -
DELPHI - FindFirst查找文件
Delphi——FindFirst学习FindFirst在SysUtils中声明 原型为Fucntion FindFirst(const Path:String;Attr:Integer;Var F:TSearchRec):Integer;描述:从指定的目录中搜索第一个给定属性文件实例返回结果保存到参数F中,F参数是一个文件结构包含文件信息成功返回0,否则返回错误代码参转载 2014-05-28 08:59:09 · 3174 阅读 · 0 评论