TMaskEdit in TListView-Spalte färben

[marcibaer]

Hallo zusammen!

Ich habe folgendes Problem:
ich habe ein TMaskEdit in eine Zelle eines TListViews gesetzt - was sehr gut klappt.
Allerdings lässt sich der Text des MasEdits nicht einfärben, d.h.,

Delphi-Quellcode:

    if Test then
      Edit.Font.Color := clBlack
    else
      Edit.Font.Color := clRed;

was funktioniert, wenn man ein Edit direkt auf das Form setzt, funktioniert in einem ListView nicht!

Irgendwelche Ideen, woran das liegt?

Viele Grüße,

Marcibaer

[marcibaer]

Hallo zusammen!

Hat denn keiner 'ne Idee, warum sich die Textfarbe eines Edits innerhalb eines ListViews nicht ändert?!

Bei einem Button, den ich direkt daneben gesetzt habe - also auch in einem Feld eines Listviews - klappt's nämlich ohne Probleme!

Typ des Listview's: vsReport
OwnerDraw: false

[Bummi]

Wenn Du das Maskedit auf ein Panel legst und dem Panel statt dem Maskedit das Listview als parent zuweist funktioniert es.

[marcibaer]

Und wieso ist das so!?

Klappt anscheinend noch nicht richtig - jetzt sehe ich das Panel an der richtigen Stelle, aber kein Edit drauf!

Ich hab's folgendermassen gemacht:

Delphi-Quellcode:

Panel := TPanel.Create(nil);
Panel.Parent := StreckenListe; // mein ListView
Edit := TMaskEdit.Create(nil);
Edit.Parent := Panel;

Damit hab ich doch 'nen MaskEdit in einem Panel in einem Listview, oder!?
Jetzt schalte ich sowohl Panel als auch Edit auf visible, aber es erscheint nur das Panel - das Edit hat aber die gleichen Koordinaten wie das Panel!

Was muss ich denn noch setzen!?

[ChrisE]

Zitat von marcibaer:

das Edit hat aber die gleichen Koordinaten wie das Panel!

Das ist der Fehler. Alle Komponenten auf einem Panel haben die Koordinaten bezüglich des Panel. D.h. Edit mit Left 0 / Top 0 liegt dann an der richtigen Stelle.

Gruß, Chris

[marcibaer]

Stimmt, dann geht's!!!

Kann mir denn trotzdem mal einer erklären, WARUM ich bei 'nem Edit den "Umweg" über 'nen Panel gehen muss, damit ich den Text färben kann, bei einem Button z.B. aber nicht!?