ListView Columns und OwnerDraw

**Nils_13**

Hi,

kann man die Columns einer ListView mit ViewStyle vsReport anders färben ? Wenn ja, wie ?

Habe gegooglet und das gefunden:

zusammenfalten · markieren

Delphi-Quellcode:

			var HeaderHandle : HWND;

    hdi          : HD_ITEM;

    i            : Integer;

begin

  HeaderHandle := GetDlgItem(lv.Handle, 0);

  for i := 0 to lv.Columns.Count - 1 do

  begin

    hdi.mask := HDI_TEXT and HDI_FORMAT and HDI_WIDTH;

    hdi.fmt := HDF_LEFT and HDF_OWNERDRAW and HDF_STRING;

    hdi.cxy := Columns.Items[i].Width;

    hdi.cchTextMax := Columns.Items[i].Caption.Length();

    hdi.pszText := Columns.Items[i].Caption;

    Header_SetItem(HeaderHandle, index, hdi^);

  end;

Was ist HD_ITEM ? Das kennt mein Delphi nicht.

**ErazerZ**

uses CommCtrl;

**Nils_13**

Thx.

Ein Fehler ist noch übrig geblieben:

markieren

Delphi-Quellcode:

			Header_SetItem(HeaderHandle, i, hdi^); 

[Fehler] code.pas(215): Zeigertyp erwartet

**mkinzler**

Vielleicht
Header_SetItem(HeaderHandle, i, ^hdi); ?

**Nils_13**

markieren

Delphi-Quellcode:

			Header_SetItem(HeaderHandle, i, ^hdi);

[Fehler] Unit1.pas(216): Inkompatible Typen: '_HD_ITEMA' und 'Char'

**marabu**

Hallo Nils,

das Dach (^) ist einfach überflüssig.

Grüße vom marabu

**Nils_13**

Danke, jetzt wird der Code schonmal kompiliert. Was muss ich noch machen, dass ich die Farben verändern kann ?

zusammenfalten · markieren

Delphi-Quellcode:

			var HeaderHandle : HWND;

    hdi          : HD_ITEM;

    i            : Integer;

begin

  HeaderHandle := GetDlgItem(lv.Handle, 0);

  for i := 0 to lv.Columns.Count - 1 do

  begin

    hdi.mask := HDI_TEXT and HDI_FORMAT and HDI_WIDTH;

    hdi.fmt := HDF_LEFT and HDF_OWNERDRAW and HDF_STRING;

    hdi.cxy := lv.Columns.Items[i].Width;

    hdi.cchTextMax := Length(lv.Columns.Items[i].Caption);

    hdi.pszText := PChar(lv.Columns.Items[i].Caption);

    Header_SetItem(HeaderHandle, i, hdi);

  end;

**Nils_13**

*push*

**marabu**

Hallo Nils,

dein Code setzt das Format HDF_OWNERDRAW, das Einfärben geschieht woanders. Ich vermute, dass da noch eine window procedure ist. Dort musst du bei der message WM_PAINT nachschauen.

Grüße vom marabu

**Nils_13**

Zitat von marabu:

Hallo Nils,

dein Code setzt das Format HDF_OWNERDRAW, das Einfärben geschieht woanders. Ich vermute, dass da noch eine window procedure ist. Dort musst du bei der message WM_PAINT nachschauen.

Grüße vom marabu

Das heißt genauer ? Diese Sachen gehen so langsam über meinen Wissensbereich hinaus....

ListView Columns und OwnerDraw

ListView Columns und OwnerDraw

Re: ListView Columns und OwnerDraw

Re: ListView Columns und OwnerDraw

Re: ListView Columns und OwnerDraw

Re: ListView Columns und OwnerDraw

Re: ListView Columns und OwnerDraw

Re: ListView Columns und OwnerDraw

Re: ListView Columns und OwnerDraw

Re: ListView Columns und OwnerDraw

Re: ListView Columns und OwnerDraw

Forumregeln

ErazerZ Registriert seit: 27. Mai 2005 Ort: Baden 315 Beiträge Delphi 2007 Enterprise	#2 Re: ListView Columns und OwnerDraw 27. Jan 2007, 14:56 uses CommCtrl;
	Zitat

Nils_13 Registriert seit: 15. Nov 2004 2.647 Beiträge	#3 Re: ListView Columns und OwnerDraw 27. Jan 2007, 15:04 Thx. Ein Fehler ist noch übrig geblieben: markieren Delphi-Quellcode: Header_SetItem(HeaderHandle, i, hdi^); [Fehler] code.pas(215): Zeigertyp erwartet
	Zitat

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.851 Beiträge Delphi 11 Alexandria	#4 Re: ListView Columns und OwnerDraw 27. Jan 2007, 15:09 Vielleicht Header_SetItem(HeaderHandle, i, ^hdi); ? Markus Kinzler
	Zitat

Nils_13 Registriert seit: 15. Nov 2004 2.647 Beiträge	#5 Re: ListView Columns und OwnerDraw 27. Jan 2007, 15:13 markieren Delphi-Quellcode: Header_SetItem(HeaderHandle, i, ^hdi); [Fehler] Unit1.pas(216): Inkompatible Typen: '_HD_ITEMA' und 'Char'
	Zitat

marabu Registriert seit: 6. Apr 2005 10.109 Beiträge	#6 Re: ListView Columns und OwnerDraw 27. Jan 2007, 16:00 Hallo Nils, das Dach (^) ist einfach überflüssig. Grüße vom marabu
	Zitat

Nils_13 Registriert seit: 15. Nov 2004 2.647 Beiträge	#8 Re: ListView Columns und OwnerDraw 28. Jan 2007, 15:32 push
	Zitat

marabu Registriert seit: 6. Apr 2005 10.109 Beiträge	#9 Re: ListView Columns und OwnerDraw 28. Jan 2007, 16:30 Hallo Nils, dein Code setzt das Format HDF_OWNERDRAW, das Einfärben geschieht woanders. Ich vermute, dass da noch eine window procedure ist. Dort musst du bei der message WM_PAINT nachschauen. Grüße vom marabu
	Zitat

Nils_13 Registriert seit: 15. Nov 2004 2.647 Beiträge	#10 Re: ListView Columns und OwnerDraw 28. Jan 2007, 18:55 Zitat von marabu: Hallo Nils, dein Code setzt das Format HDF_OWNERDRAW, das Einfärben geschieht woanders. Ich vermute, dass da noch eine window procedure ist. Dort musst du bei der message WM_PAINT nachschauen. Grüße vom marabu Das heißt genauer ? Diese Sachen gehen so langsam über meinen Wissensbereich hinaus....
	Zitat