Ergebnis der Suchanfrage

• Forum: Multimedia

  Re: Zeichnen in TGroupBox

    Delphi
    by himitsu, 13. Nov 2003
  @samson
  
  Ja er hatte das Canvas vom Form genutzt.
  Aber es ja hatte nicht funktioniert.
  
  Deshalb wird hier auch über das Handle der GroupBox auf diese gezeichnet:
  Rectangle(InfoBoxDC, X1, Y1, X2, Y2);
• Forum: Multimedia

  Re: Zeichnen in TGroupBox

    Delphi
    by himitsu, 13. Nov 2003
  Solltest in diesem Fall die API-Function und nich die des Canvas deines Form's verwenden.
  {Form1.}Canvas.Rectangle(X1, Y1, X2, Y2);
  
  Rectangle(HDC, X1, Y1, X2, Y2);
  
  So geht es:var InfoBoxDC: HDC;
  
  InfoBoxDC := GetDC(GroupBox1.Handle);
  Rectangle(InfoBoxDC, 112, 328, 393, 457);