StringGrid mit Objekten?

[Sharky]

Hai,

ich kann einer Zelle eines StringGrids ja ein TObject zuordnen.

Wie genau muss ich denn da vorgehen und wie geben ich das Object wieder frei wenn die entsprechnde Zelle (bzw die Zeile) des Grids gelöscht wird?

Ich blicks heute einfach nicht http://www.sharkys-home.de/smiles/alkohol.gif

[Blizzard]

du kannste jede zeile bzw spalte mit row bzw col als tstrings erhalten und damit kannste dann die objecte zuweisen und auf sie wieder zugreifen um sie z.b. freizugeben

so nach dem motto
stringgrind.row[0].object[0].free; //Object von zeile 1, spalte 1

mfg Blizzard

[Sharky]

Hai Blizzard,

ersteinmal Danke.

Aber irgendwie blicke ich es heute nicht.
Ich hatte vor zu den Zeilen eines Stringgrids zusatzinfos in einem Record bzw TObject zu speichern.

Ich habe also einen TObject:

Delphi-Quellcode:

 TPosdaten = class (TObject)
              typ : Char;
              sonderpreis,
              aktion : Boolean;
              aktion_bis : TDateTime;
              mwst,
              preis,
              rabatt : Real;
              einheit,
              bezeichnung,
              beschreibung : String;
              besch_zeilen,
              besch_zeichen : Integer;
             end;

Nun mache ich folgendes:

Delphi-Quellcode:

procedure TFRM_Neu_Vorgang.PosInGrid(Sender: TObject);
var
 position : TPosdaten;
begin
  position := TPosdaten.Create;
  position.typ := 'a';
  position.preis := art_preis;
  position.rabatt := rabatt;
  AdvStringGrid1.Objects[0,row] := position;
end;

Ist das richtig so?

Jetzt aber die Frage: Wie komme ich an die Daten wieder drann?

[Blizzard]

genau gleich

position:=TPosdaten(AdvStringGrid1.Objects[0,row]); mfg
Blizzard

[Sharky]

Danke