VST als Listview - Spalte nur mit Bild

[deadcantdance]

Hi,

ich benutze einen VST als Listview. In die erste Spalte soll nur ein Icon rein, die Spalte hat eine feste Breite (kann auch nicht geändert werden).

Nun habe ich allerdings das Problem, dass das Bild nicht zentriert in der Spalte ist, sondern im rechten Drittel gezeichnet wird. Column.Alignment hat leider auch keinen Einfluss auf die Bildposition.

Hat jemand noch eine Idee?

Viele Grüße,
deadcantdance

[nuclearping]

Wie stellst du das Bild dar? Maße des Bildes passen auch mit der ImageList zusammen?

[generic]

Im Zweifelsfall mit den Paint Ereignissen selbst malen. Die ImageList hat dazu auch paar nette Funktionen.

[deadcantdance]

Die Bilder kommen aus der ImageList, ich weise dem Knoten einfach nur einem Image-Index zu.

[nuclearping]

In OnGetImageIndex? Wie schonmal gefragt: Maße der ImageList (Width und Height) passen mit den Bildern zusammen?

[deadcantdance]

Richtig, genau dort wird der Index zugewiesen. Maße stimmen überein (16x16).

[uligerhardt]

Ich hab sowas mal mit OnAfterCellPaint gemacht:

Delphi-Quellcode:

procedure TForm1.VTAfterCellPaint(
  Sender: TBaseVirtualTree; TargetCanvas: TCanvas; Node: PVirtualNode;
  Column: TColumnIndex; CellRect: TRect);
begin
  if Column = cImageColumn then
  begin
    if Node = VT.HotNode then
    begin
      TargetCanvas.Brush.Color := clBtnFace;
      TargetCanvas.Font.Color := clBtnText;
      DrawEdge(TargetCanvas.Handle, CellRect, BDR_RAISEDINNER, BF_RECT or BF_MIDDLE);
    end;
    ImageList.Draw(TargetCanvas, CellRect.Left + 2, CellRect.Top + 2, 0);
  end;
end;

HTH,
Uli

[deadcantdance]

Danke, das funktioniert hervorragend!