Hallo,
ich habe folgendes Problem:
Zum Drucken von Daten habe ich eine Form die eine Vor-Selektion der zu druckenden Daten enthält.
Auf dieser Form befindet sich eine CheckListBox in der ich die Datensätze über
Code:
CheckListBox.AddItem(MyDummy.Dummy1, MyDummy);
reinschreibe.
So ganz nebenbei:
Code:
type
TDummyData = class
public
Dummy1: String;
Dummy2: Integer;
...
procedure ReadFromStream(aStream: TStream);
procedure WriteToStream(aStream: TStream);
end;
Nachdem die endgültige Selektion vorgenommen wurde und der Button 'Drucken' gedrückt wurde übernimmt wieder mein Haupt-Form und liest die Daten (Checked und die Object-Referenz) aus; wenns dann mal klappt.
Das Auslesen erfolgt über:
Code:
MyDummy := Form1.CheckListBox.Items.Objects[Index];
was aber dummerweise beim Komplieren zu einer Fehlermeldung führt.
Incompatible types: 'TDummyData' and 'TObject'
Einfügen über addItem scheint zu klappen (oder liegt da schon ein Fehler), aber das auslesen ...
Was mache ich falsch ?
Gruß,
Karsten