Hallo,
ich habe einen Typ definiert den ich als Rückgabe einer Funktion verwende. Nun stellt sich bei mir aber die Frage, wie es richtig sein müsste. Folgendes Beispiel soll zeigen was ich meine:
Delphi-Quellcode:
type
TEigenerTyp = record
Wert1 : String[50];
Wert2 : String[50];
end;
function TForm1.FunktionAB: TEigenerTyp;
begin
Result.Wert1 := 'AAAA';
Result.Wert2 := 'BBBB';
end;
// Variante A
procedure TForm1.Button1Click(Sender: TObject);
begin
Caption := FunktionAB.Wert1;
Label1.Caption := FunktionAB.Wert2;
end;
// Variante B
procedure TForm1.Button1Click(Sender: TObject);
var
EigenerTyp: TEigenerTyp;
begin
EigenerTyp := FunktionAB;
Caption := EigenerTyp.Wert1;
Label1.Caption := EigenerTyp.Wert2;
end;
Die Frage ist sicherlich eindeutig zu erkennen: Sollte ich erst eine Variable deklarieren oder gleich den Wert aus der Funktion entnehmen? Was ist Resourcen schonender und was ist eigentlich der richtige Weg?
Gruß
Mazel