Willste wissen ob der gesamte Record Speicherplatz mit 0xff gefüllt ist?
Delphi-Quellcode:
function IsInvalid(ARecord: TSitzung): boolean;
var
lPtr: PByte;
lEnd: Pointer;
begin
result := true;
lPtr := @ARecord;
lEnd := lPtr;
Inc(lEnd, SizeOf(TSitzung));
while ( lEnd < lPtr ) do
begin
if lPtr^ <> $ff then
begin
result := false;
break;
end;
Inc(lPtr);
end;
end;
Aber grundsätzlich hast du ein Designproblem, wenn du bei einem Record so etwas abfragen müsstest. Ich lege dir auch shmia Vorschlag an's Herz.