VST Checkboxen ohne Text

[ToFaceTeKilla]

Hiho zusammen,

ich bastel gerade an einem Programm, das in einem Formular Einträge aus einer DB in einem VST anzeigt. Daneben stehen im VST Checkboxen (die hab ich mit Hilfe der SuFu schon hinbekommen). Was mir aber partou nicht gelingt, ist dass NUR die Checkboxen dastehen: Bei mir steht immer in der selben Spalte noch ein Text, egal ob ich Celltext setze oder nicht.

Hat jemand ne Idee wie ich den weg bekomme?

Danke schonmal.

[Trille]

Meinst du die baumeigenen Checkboxen?

[generic]

bitte einen Screenshot.

[ToFaceTeKilla]

So jetzt kann ich antworten... ging irgendwie auf arbeit ne oO
Ja die baumeigenen mein ich.
Screen hängt an...

[generic]

Die Treelinien bekommst du unter den Treeoptions->PaintOption->toShowRoot weg.
Der Text müsste sich auch in dem Ereignis "onGetText" unterdrücken lassen.

Dort müsstest du auf "Column" und auf "TextType" abfragen.
Für die Spalte setzt du dann Celltext auf "".

Alternativ kannst du auch Celltext garnicht setzen, dann musst du aber im VST erst die Eigenschaft "DefaultText" auf "" setzen.

"" = leer

[ToFaceTeKilla]

Ok, danke schonmal. Die Treelinien sind weg

Aber was genau meinst du mit "auf Column und auf TextType prüfen"?
Das hier: VST.Header.Columns.Index[2]... ? Oder kann man noch anders auf die Columns zugreifen/prüfen?
Glaub die Alternative wird schwierig, weil der Celltext für die anderen Spalten ja aus der DB geladen wird... oder lässt sich der DefaultText für jede Spalte setzen?

Danke

[Luckie]

Warum nimmst du nicht einen für diese einfache Darstellung einen einfachen Listview? Oder was erfordert es, dass du unbedingt den VST benutzt?

[ToFaceTeKilla]

Weil bei uns hier in der Firma immer VST genommen wird und für den auch selbstgeschriebene Proceduren existieren, mit denen die daten importiert werden können und so (wir haben eigene Datenobjekte und da is das alles bisschen komplizierter).
Hat ein ListView denn auch solche Checkboxen (rein interessehalber)?

[ToFaceTeKilla]

AHH alles klar. Hab die Parameter in GetText übersehen. Da steht ja "Column: TColumnIndex".
Mit
if Column=2 then CellText:=''; lässt sich somit ganz leicht der Text entfernen.

Danke dir.