AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein GUI-Design mit VCL / FireMonkey / Common Controls Delphi 16x16 Icon vor dem SubItem eines ListViews anzeigen

16x16 Icon vor dem SubItem eines ListViews anzeigen

Ein Thema von Zacherl · begonnen am 31. Aug 2006 · letzter Beitrag vom 31. Aug 2006
Antwort Antwort
Benutzerbild von Zacherl
Zacherl

Registriert seit: 3. Sep 2004
4.629 Beiträge
 
Delphi 10.2 Tokyo Starter
 
#1

16x16 Icon vor dem SubItem eines ListViews anzeigen

  Alt 31. Aug 2006, 15:44
Hi,

wie kann ich ein 16x16px Icon vor einem SubItem eines ListViews anzeigen lassen?

Florian
Projekte:
- GitHub (Profil, zyantific)
- zYan Disassembler Engine ( Zydis Online, Zydis GitHub)
  Mit Zitat antworten Zitat
Leonard

Registriert seit: 12. Okt 2005
Ort: Lutherstadt Eisleben
64 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: 16x16 Icon vor dem SubItem eines ListViews anzeigen

  Alt 31. Aug 2006, 16:53
Hallo,

ein Ansatz wäre das hier:

Delphi-Quellcode:
procedure TForm1.ListView1CustomDrawSubItem(Sender: TCustomListView;
  Item: TListItem; SubItem: Integer; State: TCustomDrawState;
  var DefaultDraw: Boolean);
var
  rTmp: TRect;
  bTmp: TBitmap;
  lv: TListView;
  i: Integer;
  w: Integer;
begin
  DefaultDraw := False;
  lv := TListView(Sender);
  bTmp := TBitmap.Create;
  try
    ImageList1.GetBitmap(Item.SubItemImages[SubItem-1], bTmp);
    rTmp := Item.DisplayRect(drSelectBounds);
    w := lv.Columns[0].Width;
    for i := 1 to SubItem - 1 do
      w := w + lv.Columns[i].Width;
    lv.Canvas.Draw(w + 2, rTmp.Top, bTmp);
    lv.Canvas.TextOut(w + 2 + bTmp.Width + 2, rTmp.Top, Item.SubItems[SubItem-1]);
  finally
    FreeAndNil(bTmp);
  end;
end;
Zu beachten ist eigentlich nur, dass es die ImageList1 gibt. Alles andere musst du mal ein bissel probieren. Ich glaube es gibt auch noch ein Problem, wenn man die Spaltenbreite ändert. Aber das Icon wird ersteinmal an die von dir gewünschte Stelle gemalt.

mfg Leonard
Tobias
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 11:29 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz