Prüfen ob rekord werte enthält

[Sharky]

Zitat von Pseudemys Nelsoni:

...ich übergebe einer funktion ein rekord, der dort gefüllt wird (oder eben auch nicht)...

Hai,
wenn ich das richtig lese wird ja in der Funktion entschieden ob der Record gefüllt wird oder nicht?
Dann übergebe den Record doch als VAR-Paramter an die Funktion und als Ergbniss der Funktion ein True bei gefüllt.

Delphi-Quellcode:

Function FillRecord (VAR value : TMyRecord) : Boolean;
begin
  result := False;
  if (record_wird_gefuell) then
  begin
    result := True;
    value.inhalt := 'blubb';
  end;
end;

procedure Test;
var
  foo : TMyRecord;
begin
  if (FillRecord (foo)) then
  begin
    ShowMessage ('Record ist gefüllt');
  end;
end;