盒子论坛 v2.1

为什么我定义一个无参的过程也会出错啊，随便定义了个类写个过程就会报这个错误，
如果在tform 下面泻这个过程也一样出错。

代码很简单啊
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

  aaa = class
  private
    { Private declarations }
  public
    Procedure MyProc;
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  MyProc;
end;

Procedure Myproc;
  Begin
//      I:=Param1;
//      j:=Param2;
//  k:=realtoint(Param3);
    End;
end.

出错提示是：
[Error] Unit1.pas(25): Unsatisfied forward or external declaration:
'aaa.MyProc'

请高手们帮我看看，谢了！
----------------------------------------------
-

作者：

sephil (NAILY Soft)	★☆☆☆☆	-
	盒子中级会员

2004/3/2 0:13:10

1楼：

Procedure aaa.Myproc;
  Begin
//      I:=Param1;
//      j:=Param2;
//  k:=realtoint(Param3);
    End;
end.

其实你写完函数声明后按Ctrl+Shift+C
Delphi会帮你自动完成实现代码的框架的
----------------------------------------------
Copyright 2008 ? NAILY Soft

Click here to redirect to my home
Click here to redirect to my blog

作者：

qiongfei (茕菲)	★☆☆☆☆	-
	普通会员

2004/3/3 10:25:24

2楼：

是啊，我也碰到过这样的问题，明明定义了，但是系统还是说我没有定义，我就是按了ctlr+alt+C的啊
----------------------------------------------
-

信息

登陆以后才能回复