Hi,
Du kannst auch eine Structur (Record) übergeben. Das lohnt aber nur bei vielen Parametern. Hier Füllst du den Record erst mit null (Fillchar-Methode) und weist dann deine wenigen Parameter zu. Diesen Record übergibst du dann in deiner Methode als Parameter.
Delphi-Quellcode:
type
TMyRecord = Record
Param1 : String;
Param2 : String;
Param3 : String;
Param4 : Integer;
Param5 : Integer;
Param6 : String;
Param7 : String;
end;
Procedure Todo(Params : TMyRecord);
Ein Aufruf kann dann wie folgt geschehen:
Delphi-Quellcode:
procedure Test;
var Params : TMyRecord;
begin
Fillchar(Params, Sizeof(TMyRecord), #0);
Params.Param1 := 'Mein wert:';
Params.Param4 := 5;
ToDo(Params);
end;
Was du dann in ToDo machst weist du besser wie ich. Beachte aber, dass mit FillChar alle werte auf 0 gesetzt werden. Entsprechende Prüfungen auf gültige Werte sind somit obligatorisch.
Gruß oki