Kleine Demo ohne Typisierung (eine solche böte sich zwar wahrscheinlich an, aber ich will es nicht zu kompliziert machen):
Delphi-Quellcode:
procedure ChangeArrayFirstElement(
var Arr:
array of string);
//Var-Parameter
begin
if Length(Arr) > 0
then
Arr[0] := '
Blabb';
end;
procedure TForm1.Button1Click(Sender: TObject);
var
TestArr:
array[0..10]
of string;
begin
TestArr[0] := '
Wuppdi';
ShowMessage(TestArr[0]);
ChangeArrayFirstElement(TestArr);
ShowMessage(TestArr[0]);
end;
Danke für das Beispiel , aber warum hast du bei der Prozedur " ChangeArrayFirstElement" im Kopf mit var gearbeitet , warum ist das Call-by-Reference ?