Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Fussball-Robby,
3. Mai 2009
Huch, mir war nicht bewusst, dass man das machen muss :| Habe selber nicht oft damit gearbeitet :wink:
Also, dahinter noch einReleaseDC(Panel1.Handle, H);
Ich hoffe das stimmt jetzt so..
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Fussball-Robby,
3. Mai 2009
Oder ohne Ableiten mittels GetWindowDC, ein kleines Beispiel:procedure TForm1.Button1Click(Sender: TObject);
var
X: TBitmap;
H: HDC;
begin
X := TBitmap.Create;
try
X.Width := 20;
X.Height := 20;
X.Canvas.Ellipse(0, 0, 20, 20);