Funktion oder procedure???

[Sourcemaker]

Ich weiß nicht ob ich richtig verstanden habe aber vielleicht so:

Delphi-Quellcode:

procedure Ziel(x: TEdit);
begin
   x.Text := 'Errechneter Wert'
end;

procedure Quelle;
var
   xEdit : TEdit;
begin
   Ziel(xEdit);
end;

Wobei wenn du dich ein einer Form befindest das Edit jederzeit direkt erreichen könntest außer es würde der Quelle per Sender übergeben worden
sein;

Delphi-Quellcode:

 
procedure Quelle(Sender: TObject);
begin
   Ziel(TEdit(Sender));
end;

Gruß

Frank