Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: HeaderControl.parent := Listbox

    Delphi
    by SirThornberry, 31. Jul 2005
  die Markierung musst du dann auch selbst mit malen. Ob ein Item Selectiert ist findest du mit dem State parameter heraus.
  
  procedure TForm1.ListView1AdvancedCustomDrawSubItem(
  Sender: TCustomListView; Item: TListItem; SubItem: Integer;
  State: TCustomDrawState; Stage: TCustomDrawStage;
  var DefaultDraw: Boolean);
  var LRect: TRect;
  begin
  if (SubItem = 1) then
  begin
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: HeaderControl.parent := Listbox

    Delphi
    by SirThornberry, 31. Jul 2005
  das geht. Dafür kannst du das Event "OnAdvancedCustomDrawSubItem" nutzen. In der Hilfe steht auch noch etwas dazu.
  Mit folgendem Source kann man zum beispiel den Hintergrund der zweiten Spalte einfärben
  
  procedure TForm1.ListView1AdvancedCustomDrawSubItem(
  Sender: TCustomListView; Item: TListItem; SubItem: Integer;
  State: TCustomDrawState; Stage: TCustomDrawStage;
  var DefaultDraw:...