Ich will ein Rechteck in einer GroupBox ausgeben, aber irgendwie haut das nicht hin.
Das müsste doch so ähnlich funktionieren:
Delphi-Quellcode:
procedure TForm1.RaumSkizze;
var InfoBoxDC: HDC;
begin
if FRaum.Flaeche > 0 then begin
InfoBoxDC:= GetDC(Maschine.Handle);
Canvas.Pen.Color := clBlack;
Canvas.Rectangle(InfoBoxDC,112,328,393,457);
end;
end;
Allerdings sagt er mir bei Rectangle() immer: zu viele Parameter.
Aber wie mach ich ihm dann begreiflich das ich in diese GroupBox zeichnen will?
mfg cook