ListView Eintrag durchstreichen?

[AlexII]

Wie macht man das?

Delphi-Quellcode:

ListView1.Font.Style := ListView1.Font.Style + [fsStrikeOut];

bezieht sich auf die ganze Liste, ich möchte aber nur einen Eintrag bzw. Zeile streichen.

Danke!

[himitsu]

Diesen Eintrag selber malen und da kannst dann machen was du willst. (OwnerDraw)

[AlexII]

Zitat:

Zitat von himitsu (Beitrag 1272906)

Diesen Eintrag selber malen und da kannst dann machen was du willst. (OwnerDraw)

Anders nicht? Ist das aber kompliziert...

[himitsu]

Nein, anders nicht.

Wenn man Glück hat, dann folgt der OwnerDraw-Methode dennoch die Default-Methode, welche Farb/Schriftdefinitionen aus der eigenen Methode nicht wieder überschreibt.
Dann bräuchte man für jeden Eintrag nur den Font entsprechend setzen und würde den Rest dem DefaultDraw überlassen.

Aber die ListView macht nur entweder das Eine oder das Andere und das für alles.

[AlexII]

Schade... vllt eine andere Frage nebenbei...

Wie lasse ich in einer ListView bei allen Einträgen die CheckBox auf True setzen? Vorhanden sind sie schon, muss sie nur noch abhacken.

[baumina]

Abhacken tut sicher sehr weh, aber fürs abhaken der Items, gibt's da sicherlich eine Eigenschaft "Checked".

[Headbucket]

Zitat:

Zitat von AlexII (Beitrag 1272912)

Wie lasse ich in einer ListView bei allen Einträgen die CheckBox auf True setzen? Vorhanden sind sie schon, muss sie nur noch abhacken.

So schwer ist das doch nicht... .

Delphi-Quellcode:

for i := 0 to ListView1.Items.Count - 1 do
  Listview1.Items[i].Checked := true;

Alternativ einfach eine CheckListBox verwenden. Dort gibt es die Eigenschaft "CheckAll".

Grüße
Headbucket

[Dejan Vu]

Zitat:

Zitat von baumina (Beitrag 1272914)

Abhacken tut sicher sehr weh...

Prust. :-D Mein LCD ist jetzt saubergesprüht.