Question

delphi 我想在一个方法里边修改窗体上LABEL的caption，结果这样不行，请问怎样改？

unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Label1: TLabel;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
Label1: TLabel;
implementation
{$R *.dfm}
function a:Boolean;
begin
ShowMessage('');//这个可以生效
Label1.Caption:='1234';//无法生效
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
unit1.a;
end;
end.

Answer 1

function a:Boolean;
begin
ShowMessage('');//这个可以生效
// label1要加对应单元名
Form1.Label1.Caption:='1234';//无法生效
end;