delphi中退出方法的关键字 exit
摘要：在delphi中，没有return的用法，只有exit.delphi中的exit相当于C中的break和return用法。而exit可以结束过程（函数），也可以结束进程。如果在主窗体，exit相当于结束进程，如果在过程（函数）中，则是结束过程（函数）。
阅读全文
posted @
2014-03-25 11:19
babyblue
阅读(1458)
推荐(0) 编辑
delphi memo控件对粘贴板的支持
摘要：复制: memo1.SelectAll;//SelectAll就是全选，只有先选择才能复制、剪切操作。如果想选某几个字可以使用SelStart和SelLength选择 memo1.CopyToClipboard;//复制到粘贴板剪切： memo1.SelectAll; memo1.CutToClipboard;粘贴：memo1.PasteFromClipboard;
阅读全文
posted @
2014-03-19 09:51
babyblue
阅读(884)
推荐(0) 编辑
修改delphi 窗体名称
摘要：默认的情况下,IDE帮我们建立的窗体类都如下:type TForm1 = class(TForm) ScrollBox1: TScrollBox; GroupBox1: TGroupBox; ScrollBox2: TScrollBox; RadioGroup1: TRadioGroup; private { Private declarations } public { Public declarations } end;var Form1: TForm1;在项目程序里面一般都有类似下面的引用:program Project1;uses For...
阅读全文
posted @
2014-03-18 19:37
babyblue
阅读(2392)
推荐(0) 编辑
Delphi之TStrings和TStringLists类
摘要：有些类不是组件，但它们支持存在的组件。这些类是其他组件的典型属性，直接由TPersistent派生，如TStrings、TCanvas和TCollection。TStrings和TStringLists类 TStrings是一个抽象类，使你可以操纵属于组件(如TListBox)的字符串列表。TStrings实际上并不管理字符串的内存(那是由拥有TStrings类的组件管理的)，它只是定义了方法和属性来访问和操纵组件的字符串，而不是使用组件的Win32 API函数和消息。 注意，我们所说的TStrings是一个抽象类。这就意味着TStrings并没有真正实现操纵字符串的代码,它只是定义了必要..
阅读全文
posted @
2014-03-18 15:36
babyblue
阅读(144)
推荐(0) 编辑
delphi动态创建控件的例子
摘要：unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls; type TForm1 = class(TForm) pnl1: TPanel; btn1: TButton; btn2: TButton; procedure btn1Click(Sender: TObject); procedure btn2Click(Sender: TObject); pri...
阅读全文
posted @
2014-03-18 15:09
babyblue
阅读(992)
推荐(0) 编辑
dephi byte 数组转换为 String
摘要：procedure TForm1.Button1Click(Sender: TObject);var arr : array [0..5] of byte;begin arr[0] := ord('a'); arr[1] := ord('b'); arr[2] := ord('c'); arr[3] := ord('d'); arr[4] := ord('e'); arr[5] := 0 edit1.Text := pchar(@arr);end;
阅读全文
posted @
2014-03-18 11:45
babyblue
阅读(205)
推荐(0) 编辑
delphi 7 版本下的MD5加密类
摘要：使用说明:1、 MD5String、MD5File、MD5Print、MD5Match这四个函数是供调用的。其他是用来辅助这几个函数的子函数。2、MD5String为加密字符串。3、MD5File为加密这个文件。4、MD5Print是将加密后的密文转换成字符串。5、MD5Match是用来比较密文是否一致。加密字符串aaa MD5String('aaa')将加密后的aaa显示出来 MD5Print(MD5String('aaa'))比较两次密文是否一致： MD5Match(MD5String('第一次明文'),MD5String('第二次输
阅读全文
posted @
2014-03-18 11:22
babyblue
阅读(1618)
推荐(1) 编辑
delphi常用字符串函数大全
摘要：注意需要引入:StrUtils, SysUtils 两个文件代码uses StrUtils;【字符串函数大全】 首部 function AnsiResemblesText(const AText, AOther: string): Boolean; $[StrUtils.pas 功能 返回两个字符串是否相似 说明 ANSI(American National Standards Institute)美国国家标准协会;不区分大小写 参考 function StrUtils.SoundexProc; var StrUtils.AnsiResem...
阅读全文
posted @
2014-03-17 17:38
babyblue
阅读(202)
推荐(0) 编辑
delphi项目按F9闪退的问题
摘要：检查下主窗口吧，工程文件源码中是否有以下代码Application.Initialize;Application.CreateForm(TForm1, Form1); //这个就是主窗口Application.Run;
阅读全文
posted @
2014-03-14 11:20
babyblue
阅读(322)
推荐(0) 编辑
Class TMemo not found
摘要：Project Project1.exe raised exception class EClassNotFound with message 'Class TMemo not found'.Process stopped.Use Step or Run to continue.由于在Tmemo的name属性值为空，而导致错误Class TMemo not found，很奇怪为什么会出现这样的错误，不过将其值加上后，运行就正常呢，查看tmemo的lines属性，会发现将lines里面的值删除掉，temo1的默认值也会没呢，估计是这个问题吧
阅读全文
posted @
2014-03-12 16:26
babyblue
阅读(458)
推荐(0) 编辑
delphi简单加密解密函数
摘要：转载自http://www.cnblogs.com/huangygdelphi/articles/2283465.htmlfunction TFrmRegister.EncryptString(Source, Key: string): string;// 对字符串加密(Source:源 Key:密匙)varKeyLen: integer;KeyPos: integer;Offset: integer;Dest: string;SrcPos: integer;SrcAsc: integer;Range: integer;beginKeyLen := Length(Key);if KeyLen
阅读全文
posted @
2014-03-12 15:37
babyblue
阅读(1743)
推荐(0) 编辑
