|
Wpisał doctor
|
|
Piątek, 02. Marzec 2007 03:45 |
|
Rysowanie po pulpicie
Ogólnie mówiąc rysowanie po obiektach wizualnych jest możliwe bez względu na to czy posiadają one klasę
Canvas czy nie. Jeśli mają to sprawa jest prosta. Jeśli nie mają to trzeba się do nich dostać
za pomocą uchwytu. W tej lekcji nauczymy się rysować po pulpicie, a więc poza obszarem formy.
Osiągniemy to pobierając uchwyt pulpitu.
Można tu skorzystać z dwóch funkcji:
GetWindowDC(Form->Handle) lub GetDC(NULL).
Funkcja GetDC gdy podamy jej argument 0 pobierze uchwyt do pulpitu.
Przykład
Na formę kładziemy 1 Button
Zdarzenie OnClick uzupełniamy {viewonly=registered} TCanvas *C = new TCanvas;// stworzenie obiektu typu Canvas
C->Handle = GetDC(0);// pobranie uchwytu do pulpitu
C->Pen->Color = clRed;// kolor obramowania
C->Pen->Width = 3;// szerokosc linii obramowania
C->Brush->Color = clMoneyGreen;// kolor wypelnienia
C->Ellipse(50, 50, 600, 180);// kreslenie elipsy
ReleaseDC(0, C->Handle);// zwalnianie uchwytu
delete C;// usuniecie obiektu Canvas |
Jeśli chcemy malować na samej formie to wystarczy że skorzystamy z metody Canvas formy
Form1->Canvas {/viewonly}
|
|
Ostatnia aktualizacja: Piątek, 10. Lipiec 2009 13:59 |
