Delphi中类的静态方法

 时间:2024-10-14 14:44:49

1、打开Delphi7集成开发环境,在默认工程的Form1窗体放一个Button1控件。

Delphi中类的静态方法

2、在Unit.pas源代码文件中,定义一个类,包含类方法代码如下;implementation{$R 忮氽阝另*.dfm}type TMyJTClass = class private public class procedure warn(s: string);end;{ TMyJTClass }class procedure TMyJTClass.warn(s: string);beginend;注意类方法不能定义在private区

Delphi中类的静态方法

3、在类方法中写如下代码:{ TMyJTClass }class procedure TMyJTClass.warn(s: string);begin showMessage('我是类方法');end;

Delphi中类的静态方法

4、双击Button1按钮,进入事件方法,并写如下代码:procedure TForm1.Button1Click(Sender: TObject);vars:string;begin TMyJTclass.warn(s);end;这是通过类来调用。

Delphi中类的静态方法

5、F9运行程序,点击Button1按钮,会弹出‘我是静态方法’对话框

Delphi中类的静态方法

6、双击Button1按钮,进入事件方法,并修改如下代码:procedure TForm1.Button1Click(Sender: TObje艘早祓胂ct);vars:string;myJTObj:TMyJTclass;begin myJTObj:=TMyJTclass.Create; myJTObj.warn(s);end;这是通过对象调用的静态方法

Delphi中类的静态方法

7、F9运行程序,点击Button1按钮,会弹出‘我是静态方法’对话框

Delphi中类的静态方法
  • 基于FPGA的拔河游戏机的设计与实现
  • 在学校如何做好防震准备
  • 如何进行定制Ubuntu系统
  • 单片机自学教程
  • STM 32固件库下载最新
  • 热门搜索
    土木工程专业怎么样 经营模式怎么写 汉乐府简介 普希金简介 只是爱要怎么说出口 张居正简介 袁世凯简介 狗狗大全 沈阳故宫简介 日本美女漫画大全