Thema: Delphi Zeichnen in TGroupBox

Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.211 Beiträge
 
Delphi 12 Athens
 
#2

Re: Zeichnen in TGroupBox

  Alt 13. Nov 2003, 13:35
Solltest in diesem Fall die API-Function und nich die des Canvas deines Form's verwenden.
Delphi-Quellcode:
{Form1.}Canvas.Rectangle(X1, Y1, X2, Y2);

Rectangle(HDC, X1, Y1, X2, Y2);
So geht es:
Delphi-Quellcode:
var InfoBoxDC: HDC;

InfoBoxDC := GetDC(GroupBox1.Handle);
Rectangle(InfoBoxDC, 112, 328, 393, 457);
Da ich normaler Weise nicht über ein Handle zeichne, hab' ich jetzt keine Ahnung wie der Farbe zugewiesen wird.
Das wird aber bestimmt ein Anderer hier wissen, wenn nicht schau ich heute abend mal nach.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat