Thema: Delphi Speedbutton + Canvas

Einzelnen Beitrag anzeigen

LoL
(Gast)

n/a Beiträge
 
#1

Speedbutton + Canvas

  Alt 1. Sep 2005, 16:31
hi

Ich weis dieses Theme hatten wir schon
Ich hab den Code von hier.

Wenn ich nun folgendes mache,
Delphi-Quellcode:
var bmp: TBitmap;
begin
  try
    bmp := TBitmap.Create;
    bmp.Width := SpeedButton1.Width -4;
    bmp.Height := SpeedButton1.Height -4;
    bmp.Canvas.Pen.Color := clgreen;
    bmp.Canvas.FillRect(Rect(0, 0, bmp.Width, bmp.Height));
    SpeedButton1.Glyph.Assign(bmp);
  finally
    bmp.Free;
  end;
bleibt der Speedbutton trotzdem so grau wie vorher
Was mache ich falsch?
  Mit Zitat antworten Zitat