Stringlist mit TDateTime

[himitsu]

Zitat von Jumpy:

Wäre es denn nicht einfacher das Datum in einen String umzuwandeln? Oder geht dann die spätere Nutzbarkeit verloren?

Der String ist ja noch größer, als der TDateTime/Double und wenn schon TDateTime keinen Platz hat..........
Und nein, einen String in einen Pointer zu casten ist keine gute Idee (wer an der Referenzzählung rumspielt und davon keine Ahnung hat, der muß irgendwann dafür leiden), es sei denn man nutzt einen PChar, mit eigenem Speicher, was eben größer ist, als der TDateTime.

[Jumpy]

Ich dachte es geht um eine Stringlist...

[himitsu]

Das schon, nur daß dieses TDateTime (DT) in .Objects liegen sollte, wärend im .Strings vermutlich schon ein anderer String liegt.

Zitat:

SL.AddObject(s, TObject(DT));

[FredlFesl]

So gehts doch auch:

Delphi-Quellcode:

Type
  TDateTimeContainer = Class
    DateTime : TDateTime;
    Constructor Create(aDateTime : TDateTime)
  End;

Constructor TDateTimeContainer.Create(aDateTime : TDateTime);
Begin
  DateTime := aDateTime;
End;
...
MyStringList.AddObject (MyString, TDateTimeContainer.Create(MyDateTime));

Man muss die Objekte später nur wieder freigeben, das ist alles.

[DeddyH]

Zitat von FredlFesl:

Man muss die Objekte später nur wieder freigeben, das ist alles.

Oder OwnsObjects der Stringliste (gibt es hoffentlich bereits unter Delphi 2009) auf true setzen.

[himitsu]

Zitat von DeddyH:

gibt es hoffentlich bereits unter Delphi 2009

Spätestens seit D2006/TDE sollte es das schon geben.

[DeddyH]

Mein Delphi 2007 kennt OwnsObjects in TStringlist definitiv nicht.