![](https://img-blog.csdnimg.cn/20201014180756780.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
自学delphi
火焱山
这个作者很懒,什么都没留下…
展开
-
Delphi指针
var s1,s2:^string; s3:string;begin new(s1); new(s2); s1^:='MingRiSoft'; s2^:='Kaihongliu'; s1:=s2; s2^:='Welcome You !'; s3:='New Memory'; s2:=@s3; s1^:=s2^; s3:='Is right';转载 2013-08-10 15:45:14 · 462 阅读 · 0 评论 -
整型
类型 数值范围 占字节数 格式shortint -128(-2^7) ~ 127(2^7-1)1 带符号8位byte 0 ~ 255(2^8-1)1 无符号8位smallint -32768(-2^15) ~ 32767(2^15-1)2 带符号16位word 0 ~ 65535(2^16-1)2 无符号16位integer smallint或longint转载 2013-08-10 09:03:31 · 482 阅读 · 0 评论 -
SendMessage动作
TTreeView:(引用CommCtrl)SendMessage(TreeView.Handle,TVM_SETBKCOLOR,0,RGB(255,0,0)); 设置TV背景颜色SendMessage(Button.Handle,WM_LBUTTONDOWN,0,0); 鼠标左键按下SendMessage(Button.Handle,WM_LBUTTONUP,0,0); 鼠标左键转载 2013-08-10 16:43:42 · 587 阅读 · 0 评论 -
StrToIntDef - 函数功能及说明
Delphi函数: 首部 function StrToIntDef(const S: string; Default: Integer): Integer; $[SysUtils.pas 功能 返回字符串S转换成整数 说明 字符串非整数表达时则返回默认值Default 参考 procedure System.Val 例子 SpinEdit1.Val转载 2013-08-10 08:54:08 · 3889 阅读 · 0 评论 -
GetWindowText 功能
GetWindowText functionCopies the text of the specified window's title bar (if it has one) into a buffer. If the specified window is a control, the text of the control is copied. However, GetWindow翻译 2013-08-10 11:08:05 · 1025 阅读 · 0 评论 -
handle与HWND的差别
HANDLE:句柄,是Windows用来表示对象的(不是C++的对象),HWND是其中一种,HWND是HANDLE,但HANDLE不只是HWND,更具体的查MSDN吧。 HANDLE(句柄)是Windows操作系统中的一个概念。在Windows程序中,有各种各样的资源(窗口、图标、光标等),系统在创建这些资源时会为它们分配内存,并返回标示这些资源的标示号,即句柄。句柄指的是一个核心对象在转载 2013-08-10 10:37:17 · 5811 阅读 · 1 评论 -
向指定窗口发送键击消息Delphi
unit SendKeys;interfaceuses Windows, SysUtils;const SK_BKSP = #8; SK_TAB = #9; SK_ENTER = #13; SK_ESC = #27; SK_ADD = #107; SK_SUB = #109; SK_F1 = #转载 2013-08-22 14:06:33 · 2872 阅读 · 0 评论 -
Delphi 快捷键
分类快捷键解释备注组件设计类Escape选择当前组件容器 Shift + Click选择多个组件;选择窗体 Tab选择下一个组件 Shift + Tab选择上一个组件 方向键选择此方向的下一个组件转载 2013-08-22 14:04:06 · 628 阅读 · 0 评论 -
向Windows窗口发送Alt组合键的问题
关于向Windows窗口发送Alt组合键的问题,这个真是经典问题啊,在网上找了一下,问的人N多,方法差不多,但就是没有很好解决问题。之前找到一个能正确发送的code:(Alt+A)PostMessage(hWnd,WM_SYSKEYDOWN,VK_MENU,0);PostMessage(hWnd,WM_SYSKEYDOWN,0x41,0);Sleep(50)转载 2013-08-22 13:54:54 · 1245 阅读 · 0 评论 -
通过api获取句柄控制其他窗体
很多时候,编写程序模拟鼠标和键盘操作可以方便的实现你需要的功能,而不需要对方程序为你开放接口。比如,操作飞信定时发送短信等。我之前开发过飞信耗子,用的是对飞信协议进行抓包,然后分析协议,进而模拟协议的执行,开发出了客户端,与移动服务器进行通信,但是这有一些缺点。如果移动的服务器对接口进行变更,我所编写的客户端也要进行相应的升级。如果服务器的协议进行了更改,甚至个人编写的这种第三方客户端需要重写。而转载 2013-08-09 14:57:46 · 567 阅读 · 0 评论 -
数据类型基础知识
基本数据类型类型 类型说明 使用说明整形 Integer 标准数据类型,使用前不必定义实型 Reall 标准数据类型,使用前不必定义字符型 Character 标准数据类型,使用前不必定义字符串转载 2013-08-12 09:06:17 · 495 阅读 · 0 评论 -
Char Pchar String的区别
Char是单个字符;PChar 就是指向一个以Null 结尾的每个字符为一个字节的字符串的指针。 (可以看成是一个字符串)String是字符数组,以字符#0结尾;Char只占一字节的空间,而Pchar保存的是一个指针,在现在32位的系统中占有1个指针字节的大小。type PChar=^Char; PChar类型是一个指向Char的指针,并使用Delphi的扩展语法.它也能够转载 2013-08-13 21:19:26 · 827 阅读 · 0 评论 -
Delphi中@,^,#,$特殊符号意义
概述: ^: 指针 @: 取址 #: 十进制符 $: 十六进制符@:取址运算符;var int:integer; p:^integer;begin new(P); int:=24; p:=@int; dispose(P);end;^:指针的引用解析操作符;var pint:^integer;转载 2013-08-14 09:21:27 · 725 阅读 · 0 评论 -
delphi7如何读取excel文件
用ole读excel:会读了后,你自己处理一下要读的数据就行了 var I, J: Integer; MaxRow, MaxCol: Integer; List, Strs: TStringList; ExcelApp, Sheet: Variant; OldTime: TDateTime; begin List := TStringList.Create; S转载 2013-09-03 09:00:32 · 6457 阅读 · 0 评论 -
用Delphi将数据导入到Excel并控制Excel
在日常办公中,用得最多的是Word和Excel,而Excel对数据报表的处理尤为方便(操作公式、打印格式等),如果我们将数据导入到Excel中后,再靠我们平时对Excel熟练的操作很快编辑好我们有用的数据(如领导报表等),通过对Excel的控制,我们可以自动编缉好我们想要的格式和外观。一、调用Excel的方法:一般情况下有两种方法调用Excel:1、 直接使用Delphi自带的组转载 2013-09-03 11:15:54 · 2186 阅读 · 0 评论 -
delphi内存映射与映射数据获取
时间:2011-5-26来源:yang 作者: peng点击: 32次delphi内存映射与映射数据获取1.定义数据结构type//外部接口结构 PBM_Interface = ^TBM_Interface; TBM_Interface = record UserID:Integer; //登陆用户ID转载 2013-09-07 11:20:20 · 1379 阅读 · 0 评论 -
function和procedure
Delphi把操作数据的方法分成了两种,一种是function,另一种是procedure,分别称为“函数”和“过程”,这二者最大的差别就是函数拥有返回值而过程没有,比如按钮的事件响应过程,这就是一个过程,因此它没有返回值;而一个简单的函数如求字符串长度的函数Length,它的函数原形为function Length(S:string):Integer;这个函数有一个参数S,是您要计算的字符串转载 2013-08-14 13:43:20 · 612 阅读 · 0 评论 -
delphi中如何判断是不是数字
如果是判断键盘输入是否数字,可以用上面的算法,很全面了。如果判断文本框或变量中的字符是否为合法数字,可以用下面这个方法:var i: LongInt; f: Double;begin if TryStrToInt(Edit1.Text,i) or TryStrToFloat(Edit1.Text, f) then ShowMessage('是数字')转载 2013-08-14 15:58:19 · 2809 阅读 · 0 评论 -
Delphi时间计算
procedure TForm1.Button1Click(Sender: TObject);varTimeStamp : TTimeStamp;time1, time2 : TDateTime;timeDiff : integer;begin time1 := strToTime(edit1.text); // 转换成时间格式 time2 := strToTime(edit2.转载 2013-08-14 14:48:36 · 1176 阅读 · 0 评论 -
Delphi时间函数
Date 传回目前的日期Unit SysUtils函数原型 function Date: TDateTime;范例 procedure TForm1.Button1Click(Sender: TObject); begin Label1.Caption := 'Today is ' + DateToStr(Date); end;--------------翻译 2013-08-14 14:51:36 · 768 阅读 · 0 评论 -
Delphi SendMessage 使用
查找另外一个窗口的句柄: handle := FindWindow(nil,PChar('窗口的标题'));//查到窗体句柄查找子窗体:childHandle := FindWindowEx(handle,0,'子窗体类','子窗体标题'); SendMessage(TreeView.Handle,TVM_SETBKCOLOR,0,RGB(255,0,0)); 设置TV背景颜色转载 2013-08-09 08:26:46 · 2299 阅读 · 0 评论 -
Memo控件
总行数Memo1.Lines.Count光标所在行i:=SendMessage(memo1.Handle, EM_LINEFROMCHAR, memo1.SelStart, 0);光标所在行的内容Memo1.Lines.Strings[i]更简单的方法i:=Memo1.CaretPos.Y;Memo1.Lines.Strings[i];转载 2013-08-21 16:55:39 · 632 阅读 · 0 评论 -
Delphi7语言基础20130716-3
透明窗体主要是窗体属性AlhphaBlend:选择True;AlphaBlendValue:输入70;值越小越透明。原创 2013-07-16 16:37:06 · 499 阅读 · 0 评论 -
Delphi7语言基础20130716-1
Memo案例,从文本文件中读取文本。Memo1.Lines.LoardFromFile('a:\*.txt');{记得Memo对应的是Lines,不是Text.}原创 2013-07-16 09:11:21 · 573 阅读 · 0 评论 -
控件的安装
第一步:点击“ File ”-“ New ”菜单中的“ Package – Delphi for Win32 ”,新建一个控件包。 新建控件包第二步:选中右边“ Project Manager ”中“ Contains ”文件夹,点击鼠标右键,在弹出的菜单中选择“ Add ”。 添加第三步:在 Add 对话框中,点击“ Browse ”按钮,选择要安装的 PAS 文件,原创 2013-07-13 14:13:30 · 752 阅读 · 0 评论 -
Delphi7语言基础20130713-1
数据类型:(1) 基本数据类型:a、 整数类型:(通用类型<32位>:Integer-有符号;Cardinal-无符号)具体:有符号:Shortint<8位>,Smallint<16位>,Longint<32位 >无符号:Byte<8位>,Word<16位>,LongiWord<32位 >转载 2013-07-13 11:20:24 · 849 阅读 · 0 评论 -
文本框程序
有了文件,新建和退出功能的文本框程序。原创 2013-07-13 10:55:49 · 571 阅读 · 0 评论 -
常见的Delphi文件类型20130712-3
本书已经上传到资源了,想要下载的搜索一下DELPHI.7编程入门篇.可以找到下载。原创 2013-07-12 11:12:24 · 488 阅读 · 0 评论 -
Delphi7语言基础20130712-2
常量与变量:一般位于函数或者过程的起始位置定义。变量1变量的声明标量说明的一般形式为:var:;2变量的格式:与标识符类似;3局部变量和全局变量局部变量不能初始化,全局变量可以初始化,但在声明多个同类型变量时不能初始化。常量字面常量1整数常量,如 3,1000,-90。在Object Pascal中十六进制以$开头,如$20表示10进制的32原创 2013-07-12 10:22:44 · 748 阅读 · 0 评论 -
Delphi7语言基础20130712-1
从最最基础学起。注译:块注译{注译}(* 注译*)单行注译//命名:命名对象可以是常量,变量,函数,过程等用户自己书写的定义的标识。在Object Pascal里布恩大小写。命名原则:用意思明确的英文单词或者词组命名,且首个字母大写,若是多个单词(不能在单词间插入空格),采用驼峰格式。例:jklasdf //没有意义原创 2013-07-12 08:47:39 · 584 阅读 · 0 评论 -
发现delphi 2010 和 delphi 7差别挺大
教材是delphi 7的,界面和2010相差较大,还是要改装 delphi 7查了一下两种版本,多数老用户建议还是从delphi 7开始学习。重装开发平台。原创 2013-07-11 20:00:56 · 4442 阅读 · 0 评论 -
Delphi
Delphi发音['delfai],希腊古都,Apollo(太阳神)的神殿而著称。原创 2013-07-11 09:31:47 · 474 阅读 · 0 评论 -
Delphi7语言基础20130716-2
进度条原创 2013-07-16 15:30:29 · 551 阅读 · 0 评论 -
Delphi7语言基础20130716-4
设置系统时间原创 2013-07-16 16:56:44 · 423 阅读 · 0 评论 -
Delphi7语言基础20130717-2
ListBox原创 2013-07-17 16:54:30 · 522 阅读 · 0 评论 -
Delphi SendMessage 使用2
查找另外一个窗口的句柄: handle := FindWindow(nil,PChar('窗口的标题'));//查到窗体句柄查找子窗体:childHandle := FindWindowEx(handle,0,'子窗体类','子窗体标题'); 另外有个枚举子窗体的API,EnumChildWindows(主创体句柄,@回调函数,用户参数);用这个函数需要自己写一个回调的函数,比如:转载 2013-08-09 08:59:19 · 618 阅读 · 0 评论 -
学用 TStringGrid [3] - Cols、Rows
须知: TStringGrid 的每行、每列都是一个 TStrings 对象.本例功能:1、分别按列与行修改;2、分别按列与行读取运行效果图://本例代码:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,转载 2013-08-20 22:26:14 · 549 阅读 · 0 评论 -
小技巧 怎么查看函数定义
在你的代码编译没有问题的情况下可以用 CTRL+鼠标点击函数名称。翻译 2013-08-20 14:05:52 · 1080 阅读 · 0 评论 -
几种多线程的操作方式
在了解多线程之前我们先了解一下进程和线程的关系一个程序至少有一个主进程,一个进程至少有一个线程。为了保证线程的安全性请大家看看下面介绍 Delphi多线程同步的一些处理方案大家可以参考:http://www.cr173.com/html/16747_1.html主线程又程为UI线程。进程和线程的主要差别在于它们是不同的操作系统资源管理方式。进程有独立的地址空间,一个转载 2013-08-19 20:50:25 · 706 阅读 · 0 评论 -
Delphi中or的使用
delphi中or,and 的优先级都比较高 要加上();if (xtd=q2) or (xtd=w2) or (xtd=e2) or (xtd=p2) or (xtd=t2) or (xtd=y2) or (xtd=u2) then...翻译 2013-08-20 08:56:10 · 1622 阅读 · 0 评论