Comboboxen in einem StringGrid

[gordon freeman]

Hi Leute,

ich will in einer bestimmten Spalte eines StringGrids nur Comboboxen anzeigen, die alle die selben Auswahlmöglichkeiten haben. Zum Anzeigen von Objekten im StringGrid hab ich die beiden Themen hier gefunden:

Thema 1
Thema 2

Allerdings haben sie mir nicht wirklich weitergeholfen, da ich nicht wirklich alles verstanden habe, das dort gesagt wurde. Außerdem zielten diese Beiträge darauf ab, dass dieAnzahl der Zeilen des StringGrids bekannt war. Ich habe allerdings einen dynamischen Grid, der immer, wenn in eine Zeile etwas eingegeben wird eine neu unten dran packt!

Wie kann ich jetzt

• a) Genau so viele ComboBoxen erstellen, wie ich Zeilen in meinem StringGrid habe?
• b) Diese ComboBoxen dann in die entsprechende Spalte des Grids einfügen?

tia, read you, gordon

[alcaeus]

Hallo Gordon,

wir verwenden in unserem Betrieb für solche Dinge das QuantumGrid, AFAIK kann man bei der Komponente definieren, welches Control in einer Spalte sein soll. Allerdings muss ich sagen dass die Verwendung der Kompo ziemlich gewöhnungsbedürftig ist, du kannst sie dir aber mal ansehn...

Greetz
alcaeus

[gordon freeman]

Hab sie mir angeschaut, würde allerdings lieber mit 'nem normalen StringGrid arbeiten. Mein eigentliches Problem ist dabei folgendes:

Wenn ich ein Objekt einer Klasse erstellen will, muss ich es ja auch als Variable deklarieren. WEnn ich jedoch nicht weiß, wie viele Objekte dieser Klasse ich erzeugen will kann ich doch nicht auf gut Dünken erstmal 100 deklarien, falls ich sie brauche?
Da muss es doch eine elegantere Lösung geben, doer?

[xineohp]

moin,

speicher die Objekte doch in einem dynamischen Array, das kannst du dann bei Bedarf vergrößern/verkleinern.

[gordon freeman]

Sorry, hab mich gerade erst in das dynamische Erstellen von Objekten eingearbeitet. Könnteste vieleicht etwas Code zeigen, wie so was mit 'nem dynamischen Array voller Objekte aussehen könnte?

[xineohp]

Deklaration:
var ObjektArray: array of tButton; zum Erzeugen:

Delphi-Quellcode:

var i: integer;
begin
  setlength( ObjektArray, 5 );
  For i:=0 to length(ObjektArray)-1 do // dyn. Array laufen von 0 bis length()-1
  begin
    ObjektArray[i] := tButton.Create(Form1); // wobei Form1 natürlich auch ein anderer Besitzer sein kann.
    ObjektArray[i].Parent := Form1; // Parent gibt an, welches übergeordnete Objekt für das Neuzeichnen verantwortlich ist. Parent muss man nur bei visuellen Objekten setzen.
  end;
end;

zum Freigeben:

Delphi-Quellcode:

var i: integer;
begin
  For i:=0 to  length(ObjektArray)1 do
    ObjektArray[i].Free;
end;

[gordon freeman]

Danke für die Antwort, werd's morgen mal versuchen zu implementieren

[ibp]

wenn alle comboboxen dieselbe auswahl haben, dann brauchst du ja nur eine zu erstellen und diese dann anzeigen, wenn der usr auf der entsprechenden spalte steht!

[gordon freeman]

Nur, um Misverständnisse auszuschließen:

Ich soll also eine ComboBox erzeugen und die dann in der entsprechenden Spalte immer dann anzeigen , wenn das OnSelectCell-Ereignis auf diese Spalte weist?

Warum bin ich da nicht drauf gekommen

Danke für die Idee, werd's heute nachmittag mal ausprobieren!!!

[ibp]

Zitat von gordon freeman:

Ich soll also eine ComboBox erzeugen und die dann in der entsprechenden Spalte immer dann anzeigen , wenn das OnSelectCell-Ereignis auf diese Spalte weist?

... nicht spalte sondern zelle!