我参照帮助问档
结果不行嘛?3x
结果不行嘛?3x
解决方案 »
- 这想在类Create 时初始化一些数据,为什么老是报错呀
- 成都汉科计算机信息技术有限公司招聘
- 关于delphi自带mediaplayer的总题,很头疼!!
- 如何实现模板类?
- 怎样尽可能的减小richedit的行间距?(最好减小到0)
- 急求fastreport最简单的统计
- 一个单线程可以同时用吗?
- 帮忙给个 InstallShield Express Custom Editon for Delphi6
- ======ADOConnection的问题=======
- 小妹想编个聊天程序,不知那位大虾可以给我一份源代码参考参考!
- 怎么将这段BCB代码用DELPHI实现?在线等~~~~~~~~~~~``
- Label的caption内容显示问题
TForm1 = class(TForm)
Button1: TButton;
private
{ Private declarations }
public
{ Public declarations }
end;这就是一个很简单的类的例子
单独写在一个单元中
写在你的窗口文件的原文件中
unit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
MyClass=class//自己定义的类
params1:integer;
params2:string;
procedure myproc(params:string);
end;type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}{ MyClass }procedure MyClass.myproc(params: string);
begin
params2:=params;
end;end.