procedureTForm1.Button1Click(Sender:TObject);varValeurAleatoire:integer;beginrepeatValeurAleatoire:=…
procedureTForm1.Button1Click(Sender:TObject);vari:integer;beginfori:=StrToInt(Edit1.Text)downto1doMe…
按Ctrl+Shift+F（注意：如果你装了某狗输入法，会把这个Delphi快捷键冲突掉）。弹出如下窗体。然后查找<img…
typeTB2TSize=(_5,_6,_7,_8);procedureTForm1.Button4Click(Sender:TObject);varb2t:TB2TSize;beginShowMes…
unitumy;interfacetypeTMode=(Model,Mode2,Mode3);constsMode:array[TMode]ofstring=(//'模式1',//'模式2',…
Delphi程序不仅可以用于数值处理，还更广泛的用于处理非数值的数据。例如：性别、月份、星期几、颜色、单位…
前言:所谓"流",就是一段数据或是一块内存;在进行流操作时,我们不必关心流中的数据到底是什么;只需要知道流的…
在case语句中使用字符串在case语句中使用字符串---by熊恒(beta)我今天要介绍的是一个比较另类的方法。大家都…
procedureTForm1.Button2Click(Sender:TObject);varaChar:Char;beginforaChar:='a'to'z'doMemo1.Lines.Add(…
varS:s****ing;I:Integer;Found:Boolean;beginS:='HelloWorld';Found:=False;forI:=Low(S)toHigh(S…
usesCharacter;procedureTForm1.Button1Click(Sender:TObject);varnumber:Integer;aText:string;beginnumbe…
procedureTForm1.btn1Click(Sender:TObject);beginShowMessageFmt('%D',[DebugHook]);end;
unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,St…
1.什么是包？Delphi中的包是Delphi程序间通讯与模块化的一个方法，其中包可分为设计包（比如控件都有一个设…
要点:1.指针的2中定义方法PInteger和^Integer2.取地址符号@和Addr函数3.取内容符号^,比如MyPointInt1^则是取…
要点:1.指针指向的地址或许不一样，也不管指针是多少级的指针，他们指针本身都是一样的，都可以用PInteger来…
要点:1.指针指向的内容的大小因数据类型的不同而不同，指针本事的大小，都是4字节2.sizeof函数是取形参所占…
要点:1.GetMem函数是分配内存，第二个参数为分配内存的字节长度2.MyPoint1增加之后，如果需要释放MyPoint1数…
要点：1.数组名称要用@取地址才能作为地址,与c++有点不同2.StrCopy函数是把第二个参数复制到第一个参数地址…
programProject;****$APPTYPECONSOLE****functiontest(a,b:integer):integer;inline;beginResult:=a+b;end;…