implizites Type-Casting :
https://docwiki.embarcadero.com/RADS...toren_(Delphi)
VariableMitInternemTyp := VariableMitExternemTyp;
oder via Record-Helper ein passenderes "IstLeer" hinzufügen
oder kapseln
Delphi-Quellcode:
type
TMyRecord = record
{private}
Intern: TRect;
function GetWidth: Integer;
procedure SetWidth(Value : Integer);
...
{public}
property Top: Integer read Intern.Top write Intern.Top;
property Left: Integer read Intern.Left write Intern.Left;
property Width: Integer read GetWidth write SetWidth;
property Height: Integer read GetHeight write SetHeight;
end;
Was ist "Extern"?
Wenn es eine
DLL ist, dann verbietet dir niemand intern einen anderen/eigenen Typen zu benutzen (so lange er von den Daten/Feldern her identisch/kompatibel ist)