Einzelnen Beitrag anzeigen

Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#9

Re: Eigenen Datentyp anzeigen

  Alt 22. Feb 2006, 00:23
für sowas gibt es eine Extra Methode welche du überschreiben musst. Damit hast du die Möglichkeit properties die nicht published sind auch in der DFM zu speichern (gegebenfalls auch binaryproperties die nicht auftauchen im Objectinspektor). Die Methode welche du überschreiben musst heißt:
procedure DefineProperties(Filer: TFiler); diese kann wie folgt aussehen wenn sie überschreiben ist:
Delphi-Quellcode:
procedure TYourClass.DefineProperties(AFiler : TFiler);
begin
  inherited;
  AFiler.DefineBinaryProperty('Data', FReadBinProp, FWriteBinProp, Count > 0);
end;
wobei "FreadBinProp" und "FWriteBinProp" Methoden sind welche einen Stream erwarten und wie folgt definiert sind
Delphi-Quellcode:
procedure TYourClass.FWriteBinProp(AStream: TStream);
begin
  SaveToStream(AStream);
end;

procedure TYourClass.FReadBinProp(AStream: TStream);
begin
  LoadFromStream(AStream);
end;
Es ist ja auch irgendwo logich dass, das ganze zur zeit nicht in der DFM auftaucht denn woher soll delphi wissen wie es die Objectlist speichern soll bzw. die Objecte darin.
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat