Hallo!
Ich habe eine kurze Frage, irgendwie bin ich grade zu deppert dafür. Ich habe z.B. folgenden Aufbau:
TMainForm:
Delphi-Quellcode:
unit Mainform;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics [...];
type
TMainFrm =
class(TForm)
[...]
private
[...]
public
[...]
end;
var
MainFrm: TMainFrm;
implementation
uses UnitXYZ, [...];
{$R *.dfm}
Nun habe ich eine
Unit, wie folgt:
Delphi-Quellcode:
unit UnitXYZ;
interface
procedure TuDas(NehmeDenString:
String;);
implementation
uses
MainForm [...];
procedure TuDas(NehmeDenString:
String;);
begin
with MainFrm
do begin
[...]
end;
end;
Die Procedure wird aus verschiedenen anderen Forms ausgeführt. Allerdings hätte ich gerne das "with MainForm do begin ... end;" weg; die gesamte Procedure soll sich eben auf "TMainForm" beziehen. Ich bekomme es nur nicht hin...
Kann mir jemand einen Tipp geben? Ich weiß, dass die Procedur irgendwie so aussehen muss:
Delphi-Quellcode:
procedure TMainFrm.TuDas(NehmeDenString: String;);
begin
[...]
end;
Aber ich bekomm es eben nicht zum laufen, da die Procedure ja irgendwo nochmal deklariert werden muss...