UC知道DELPHI请教：在过程中调用控件
来源：百度知道 编辑：UC知道 时间：2024/05/21 18:36:00
怎么修改才能够运行呀？
procedure test;
begin
Edit1.text := 'TEST';
end;
谢谢jxsbb的回答，不过问题不出在那，而是在TEST过程中给EDIT1.TEXT赋值就出错，错误信息如下：
[错误] Unit1.pas(29): Undeclared identifier: 'Edit1'
[错误] Unit1.pas(29): '(' expected but ':=' found
[致命错误] Project1.dpr(5): Could not compile used unit 'Unit1.pas'
procedure test;
begin
Edit1.text := 'TEST';
end;
谢谢jxsbb的回答，不过问题不出在那，而是在TEST过程中给EDIT1.TEXT赋值就出错，错误信息如下：
[错误] Unit1.pas(29): Undeclared identifier: 'Edit1'
[错误] Unit1.pas(29): '(' expected but ':=' found
[致命错误] Project1.dpr(5): Could not compile used unit 'Unit1.pas'
呵呵，我帮你改吧
function test(str:string):string;
begin
Result := str ;
end;
procedure TForm1.Button1Click(Sender:TObject)
begin
test(Edit1.text);
end;
你写的是一个过程，这个你得调用这个过程，例如：
procedure form1buttonclick(sender:tobject);
begin
test;
end;
说明你的窗口上没有edit1这个控件，或者edit控件的名字做了修改。