基础共366篇

Delphi 中的常用事件

Delphi 中的常用事件OnActive 焦点称到窗体或控件时发生 OnClick 鼠标单击事件 OnDbClick 鼠标双击事件 OnClose和OnCloseQuery 当关闭一个窗体时就会响应OnClose和OnCloseQuery事件 ,OnCloseQu...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
04414

我的Delphi开发经验谈

我的Delphi开发经验谈--------开发环境--------Delphi 7是一个很经典的版本,在Win2000/XP下推荐安装Delphi 7来开发软件,在Vista下推荐使用Delphi 2007开发软件。安装好Delphi 7后,应立即安装...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
05815

DELPHI窗口界面必学的知识

DELPHI界面必学的知识窗体的属性1.Appearance属性功能:设置窗体中控件是否以三维立体方式显示。取值:1) 1-3D 默认设置,以三维立体方式窗体上的控件。2) 0-Flat 以二维方式显示窗体上的控件...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
04513

delphi文本文件读与写

delphi文本文件读与写前言:Delphi 支持三种文件类型: 文本文件、记录文件、无类型文件。文本文件是以行为单位进行读、写的。由于每一行的长度不一定相同,不能计算出给定行在文件中的确切位置,...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
0356

Delphi中建议使用的语句

【重要】Delphi中建议使用的语句━━━━━━━━━━━━━━━━━━━━━━━━━━网上找来的 感觉对入门者很有启示 收藏一下了!No.1 判断逻辑类型 }var B: Boolean;beginB := Boolean(2);...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
0548

delphi with 语句的妙用

delphi with 语句的妙用//一般写法varMyForm1: TForm1;beginMyForm1 := TForm1.Create(nil);MyForm1.ShowModal;MyForm1.Free;end;-----------------------------------------------------------...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
04910

在Delphi中简单的调用单元unit实例

在Delphi中简单的调用单元unit实例 一,新建一个工程文件,默认的文件是unit1,代码如下:unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Di...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
04115

Delphi 7 简单语法

Delphi 7 简单语法1. 简单语句(1)赋值语句形式:变量 := 表达式赋值符号为“: =”。不论给属性还是给变量赋值,都是将右边的值赋给左边的属性或变量。当将一个属性值、变量、常量或文本数据...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
0376

DELPHI四舍五入问题解决

这段时间在用DELPHI做一个财务系统时发现每一行的小计取了两位小数后与用SQL的ROUND查询出来的不一样,在程序中是用FormatFloat('0.00',ItemSum)函数来取值的,再用DXDBGRID网格显视合计,最终...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
0368

选择 Delphi 的 9 条理由

Delphi 的特点:开发快速、执行高效,而且至今没有它不能开发的东西(包括 VxD)——如果想高速地开发出高质量的应用,那么,Delphi 无疑是最佳选择——请注意,我说的是“最佳”... 废话止,列...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
04611

DELPHI字符串、数组操作函数

对字符串及数组的操作,是每个程序员必须要掌握的。熟练的使用这些函数,在编程时能更加得心应手。 1.【Copy】 功能说明:该函数用于从字符串中复制指定范围中的字符。该函数有3个参数。第一个...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
06412

delphi 禁止窗口移动

procedure TForm1.FormCreate(Sender: TObject); begin self.Align:=alcustom; end;
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
05411

delphi:out参数和var参数的区别

delphi:out参数和var参数的区别out主要用于COM和CORBA技术中。procedure TForm1.Hello(out s:String);begins:='Hello,'+ S;end;procedure TForm1.Button10Click(Sender: TObject);varA:string;b...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
0376

DELPHI 窗口全屏

procedure TForm1.Button1Click(Sender: TObject);begin//覆盖任务栏Self.BorderStyle := bsNone;Self.Left := 0;Self.Top := 0;Self.Width := Screen.Width;Self.Height := Screen.Height;end;...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
03210

delphi with do和for do语句

1.with 对象名 do语句只是为了减少输入的字符,不必每次重复名字,直接写变量//**************procedure TForm1.Button1Click(Sender: TObject);//正常写法beginedit1.text :='hello';edit1.color...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
04214

delphi 跳出FOR循环

var bStop : Boolean; procedure TForm1.btnStartClick(Sender: TObject); var iLoop : Integer; begin bStop := False; for iLoop := 1 to 1000000000 do begin Application.ProcessMessages; ...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
0459

delphi PChar和Array [0..255] of Char的区别

最近又犯了一个曾经犯过的错误,在编写一个纯API注册机的时候,问题来了。function DialogFunc(hwndDlg: HWND; msg: UINT; wParam: wParam; lParam: lParam): Boolean; stdcall;varName, Email:...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
0497

DELPHI控件安装与删除

DELPHI控件安装与删除控件安装 基本安装 1、对于单个控件,Componet-->install component..-->PAS或DCU文件-->install;2、对于带*.dpk文件的控件包,File-->Open(下拉列表框中选*.d...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
04111

Delphi 中相对路径与绝对路径函数说明

以前也曾经为 Delphi 中相对路径与绝对路径之间的转换烦恼过。但时,用得少,也没过多地去注意了。今天要写一个小程序,又遇到了这个问题。就找资料吧,终于找到了最简单,最直接的方式。现在把...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
02914
delphi case 语句中使用字符串-Delphi编程技巧大全

delphi case 语句中使用字符串

非常遗憾 Delphi 的 case 语句不支持字符串, 但我觉得这也可能是基于效率的考量;如果非要在 case 中使用字符串, 也不是不可以变通, 这里提供了五种方法. 本例效果图:代码文件:-----------------...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
0408

delphi的goto语句

批处理和汇编中倒是都用过goto,delphi这类结构很强的语言N多人不推荐使用goto,对我这样的菜鸟来说无所谓,能用就行。procedure TForm1.Button1Click(Sender: TObject); var&nb...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
04412

delphi API 函数中使用 PChar 参数的几种方法

//以 GetWindowsDirectory 为例:{ 以静态数组做缓冲区 }procedure TForm1.Button1Click(Sender: TObject);varbuf: array[0..MAX_PATH-1] of Char;beginGetWindowsDirectory(buf, SizeOf(buf));S...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
0399

Delphi X 的 Y 次方

X 的 Y 次方varx,y,z: Real;beginx := 2;y := 3;{ 使用 Math.Power }z := Math.Power(x, y);ShowMessage(FloatToStr(z)); //8{ 不想 uses Math, 就用 System.Exp、System.Ln }z := Exp(Ln(x) * ...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
0376

Delphi SameText

SameTextvars1,s2: string;b1,b2: Boolean;begins1 := 'C:Temp';s2 := 'c: emp';b1 := SameText(s1, s2); //Trueb2 := s1 = s2; //FalseShowMessage(BoolToStr(b1,True) + ' - ' + BoolToStr(b2...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
0446

Delphi 如何在定义局部变量时赋初始值

如何在定义局部变量时赋初始值局部变量不像全局变量可赋初始值, 但可以通过编译指令把指定类型的常量当作变量用, 如:-----------------------------------------------------------------------...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
06314

delphi – System.RunError

学习官方示例 - System.RunErrorunit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls;typeTForm1 = class(TForm)Button1: ...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
03412

delphi System 中的数学函数

//绝对值: Absvard: Real;v: Variant;begind := Abs(-1.2);ShowMessage(FloatToStr(d)); {1.2}v := '-100';ShowMessage(v); {-100; v 是变体类型无需转换}v := Abs(v);ShowMessage(v); {100; 如...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
05213

delphi系统默认语言与系统支持的语言列表

系统默认语言与系统支持的语言列表unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls;typeTForm1 = class(TForm)Memo1: ...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
06113

delphi 使用 InputBox、InputQuery 的启发

使用 InputBox、InputQuery 的启发看了 InputBox、InputQuery 函数实现的源码, 有些收获与心得...--------------------------------------------------------------------------------通过 Inpu...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
03911

delphi {$POINTERMATH ON} 方便指针操作的编译指令

{$POINTERMATH ON} 方便指针操作的编译指令编译指令 PointerMath 默认 off; 打开后, 可以像数组一样地读写指针中的系列数据, 非常方便!------------------------------------------------------...
Top_Admin的头像-Delphi编程技巧大全Top_Admin31天前
0537