Registriert seit: 26. Mai 2004
3.159 Beiträge
|
AW: Property via AsString;AsInteger;AsBoolean;.. laden
23. Aug 2012, 14:00
Wenn du den Implicit-Operator überladen würdest, solltest du deine Setter-Methode so belassen können, wie du es hast. Mal schnell aus dem Kopf heraus aufgeschrieben:
Delphi-Quellcode:
TBlub = class
private
FRec : TMyRecord;
procedure SetRec(Value: TMyRecord);
public
property Rec : TMyRecord read FRec write SetRec;
end;
procedure TBlub.SetRec(Value: TMyRecord);
begin
FRec := Value;
end;
TMyRecord = class
private
FValue : Integer;
public
operator Implicit(Value: Integer): TMyRecord;
property Value : Integer read FVaule;
end;
TMyRecord.Implicit(Value: Integer): TMyRecord;
begin
Result.FValue := Value;
end;
»Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)
|