为什么我的自定义函数都不能用

Question

比如窗体为form1我的
procedure form1.abc();它老是提示undeclared identifier:'form1'
意思是说form1没定义吧还有自定义函数里的所有组件都不可用
全部都提示定义的样子
像combobox1.text
他就提示combobox1未定义了
。。什么原因呢

Answer 1

procedure Tform1.abc(); //加个T试试看

Answer 2

将procedure form1.abc();改为procedure Tform1.abc();

Answer 3

恩，加了这个没错了
但那还是
自定义函数里的所有组件都不可用
全部都提示定义的样子
像combobox1.text
他就提示combobox1未定义了

Answer 4

你自定义函数里的所有组件是不是都在TForm1里，要不你加上TForm1.combobox1.text,看看可不可以。

Answer 5

type
  TForm1 = class(TForm)
    ……
    procedure FormCreate(Sender: TObject);
    procedure abc();  //你定义的函数
  private
    { Private declarations }
  public
    { Public declarations }
  end;implementation//实现部分
procedure TForm1.abc();
begin
……
end;