Hallo abc,
als erste würde ich die Prozedur im Public- oder Private-Bereich der Form deklarieren. z.B.:
Delphi-Quellcode:
public
{ Public-Deklarationen }
procedure MB;
Als nächstes muss diese Prozedur ebenfalls im Implementation-Teil der
Unit deklariert werden.
Delphi-Quellcode:
procedure TForm1.MB;
var List:TStringList;
begin
List:=TStringList.Create;
List.LoadFromFile('C:\Text.txt');
Label1.Caption:=List.Strings[0];
Label2.Caption:=List.Strings[1];
Label3.Caption:=List.Strings[2];
List.Free;
end;
Wenn du dies getan hast, kannst du die Prozedur immer aufrufen wenn du sie brauchst. z.B.:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
MB;
end;
Tschüß Markus