Ergebnis der Suchanfrage

• Forum: Win32/Win64 API (native code)

  Re: Checkbox selbst zeichnen

    Delphi
    by turboPASCAL, 6. Mai 2007
  Der Code ist nur ein "unvollendetes" Beispiel in dem die Vorgehensweiser erklärt wird.
  Das du nix siehst liegt wohl daran das du in der Procedure DrawMyButtonstyle() die Checkbox
  komplett neu Zeichnen darfst. :stupid:
  
  PS.: Ausserdem ist im Code oben eine falsche Zeile hineingerutscht. Es muss
  FillRect(lpdis.hDC, lpdis.rcItem, GetStockObject(LTGRAY_BRUSH));
  heissen.
• Forum: Win32/Win64 API (native code)

  Re: Checkbox selbst zeichnen

    Delphi
    by turboPASCAL, 6. Mai 2007
  Naja, entweder musst du die Checkbox Subclassen (siehe Luckies Tuts) oder du "übermalst" sie einfach.
  
  Wie geht das ? So:
  
  
  // Procedure zum zeichnen der Buttons im eigenem Style
  procedure DrawMyButtonstyle(lpdis: PDrawItemStruct; Checked: Boolean);
  var
  r: TRect;
  begin