摘要：
function gethostbyname(name: PAnsiChar): PHostEnt; stdcall;// 通过域名或者主机命返回IP地址. 传进去的参数是一个域名或者主机名.返回值是一个Hostent指针结构.(如果传进去的是一个空字符串,那么返回的是本机的主机名与IP地址)function gethostname(name: PAnsiChar; len: Integer): Integer; stdcall;// 得到本机主机名或者域名.有两个参数,一个是用来存放主机名或者域名的变量,一个是缓冲区的大小.PHostEnt在delphi定义如下typePHostEnt = 阅读全文
摘要：
implementationtype Add = function(I : Integer):Integer; //声明一个方法类型，真心觉得delphi中的类型太多太多了，需要学习的路还很长.//--------------------------------------------------------------------------------------------------------------------function Addx(I : Integer): Integer; //声明一个和上面方法类型相同参数的函数。 begin Result := I * 2; end 阅读全文
摘要：
Procdure //过程，没有返回值 比如， Procedure ShowName(Str : String);Function //函数，有返回值。 比如， Function ShowName(Str : String): String;如果把函数或者过程定义在 implementation 区域中， 那么该函数或者过程只能在本单元被访问。如果把函数或者过程定义在 interface 区域中，那么该函数即可被别的单元访问。 但是，必须在uses后面。 阅读全文
摘要：
TMyForm = class private FName : String; FAge : Integer; protected procedure ShowName;virtual; // 将要被覆盖的虚方法。 end; TMyForm2 = class(TMyForm) Procedure ShowName;override; // 覆盖； end; TMyForm3 = class(TMyForm2) procedure ShowName;override;final; // 最终覆盖，再往下就无法覆盖了。Final指令字的作用就让方法无法继续覆盖。 end; One = class. 阅读全文
摘要：
unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { 阅读全文
摘要：
unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;type TForm1 = class(TForm) Button1: TButton; procedure FormCreate(Sender: TObject); procedure Button1Click(Sender: TObject); pr 阅读全文
摘要：
unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;type TForm1 = class(TForm) Button1: TButton; Button2: TButton; Button3: TButton; Button4: TButton; Button5: TButton; procedure 阅读全文
摘要：
unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.OleCtnrs;type TForm1 = class(TForm) Button1: TButton; Button2: TButton; Button3: TButton; procedure Button1Click(Sender: T 阅读全文
摘要：
Delphi的方法类型有：1.静态方法 (Static) 默认类型，可以省略关键字2.虚拟方法 (Virtual)3.动态方法 (Dynamic)4.消息方法 (Message)5.抽象法方 (Abstract)=======================================================1）静态方法[static]静态方法类似于通常的过程和函数，编译器在编译时就已指定了输出该方法的对象实例。静态方法的主要优点是调用速度快。eg：type TAnimal = class(TObject) procedure Sound; procedure Sleep; ... 阅读全文
摘要：
unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;type TForm1 = class(TForm) Button1: TButton; Button2: TButton; procedure Button1Click(Sender: TObject); procedure Button2Click( 阅读全文