Thema: Delphi TObject und extended

Einzelnen Beitrag anzeigen

Benutzerbild von Stevie
Stevie

Registriert seit: 12. Aug 2003
Ort: Soest
4.016 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#4

Re: TObject und extended

  Alt 18. Mai 2010, 10:12
Erst einmal vorweg: Ich persönlich halte es sowieso für schlechten Stil, alles was kein Objekt ist, umzucasten, ums als TObject an eine Stringliste zu hängen.
Zu deinem konkreten Problem:
Ich würde eine simple Hilfsklasse bauen, diese instanzieren, und die Instanz an die Stringliste hängen.
Delphi-Quellcode:
type
  TExtended = class
  private
    FValue: Extended;
  public
    constructor Create(const Value: Extended);
    property Value: Extended read FValue write FValue;
  end;
liste.objects[i]:= TExtended.Create(ExtendedWert); Denke hierbei daran, dass du die Objekte wieder freigeben musst. Evtl ist ein OwnsObjects = True beim Create deiner Stringliste schon genug, das musst du je nach Verwendung entscheiden.

@mkinzler: Sauber, schön den Nachkommateil wegschneiden
Stefan
“Simplicity, carried to the extreme, becomes elegance.” Jon Franklin

Delphi Sorcery - DSharp - Spring4D - TestInsight
  Mit Zitat antworten Zitat