荔园在线

荔园之美,在春之萌芽,在夏之绽放,在秋之收获,在冬之沉淀

[回到开始] [上一篇][下一篇]


发信人: duck (我是一棵树), 信区: SoftDev
标  题: [合集]Delphi如何设置私有类型的变量
发信站: 荔园晨风BBS站 (2006年01月15日22:32:36 星期天), 站内信件

☆   1  ──────────── 我是分割线 ─────────────────☆
发信人: limee (lily), 信区: SoftDev
标  题: Delphi如何设置私有类型的变量
时  间: 2005年10月19日20:12:03 星期三

type
  TForm1 = class(TForm)
    Memo1: TMemo;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
    procedure FormCreate(Sender: TObject);
  private
    Procedure MsgComm(Var Msg:Tmessage); Message WM_COMMNOTIFY;
    Function  CommWatchProc(Param:POINTER):DWORD;stdcall;
    Procedure CommInit;
    i : Integer; // 这行编译通不过,应该怎么写?


☆   2  ──────────── 我是分割线 ─────────────────☆
发信人: duck (头文字D), 信区: SoftDev
标  题: Re: Delphi如何设置私有类型的变量
时  间: 2005年10月20日08:40:17 星期四

要把变量的声明摆在函数声明前面

   private
     i:integer;
     Procedure MsgComm(Var Msg:Tmessage); Message WM_COMMNOTIFY;
     Function  CommWatchProc(Param:POINTER):DWORD;stdcall;
     Procedure CommInit;


[回到开始] [上一篇][下一篇]

荔园在线首页 友情链接:深圳大学 深大招生 荔园晨风BBS S-Term软件 网络书店