borland cpp builder cw7


C++ Builder. Programowanie obiektowe. Ćwiczenie 7. 1
______________________________________________________________________
PROGRAMOWANIE OBIEKTOWE
ĆWICZENIE 7
C++ BUILDER 6.0 PE
" Grafika rozpinanej nici
" Obiekt TForm
" Obiekt TCanvas
" Właściwość Canvas->Pen->Color
" Metoda TCanvas->MoveTo
" Metoda TCanvas->LineTo
" Liczba pi (stała M_PI)
" Operator ?
©2004 Jerzy Kluczewski
2 C++ Builder. Programowanie obiektowe. Ćwiczenie 7.
______________________________________________________________________
I. Wstęp
Wykonamy teraz piękny, wielobarwny dywan, który będzie kreślony w oknie
aplikacji. Nasz projekt aplikacji zapiszemy w plikach rozpoczynajÄ…cych siÄ™ od nazwy
Nici7. Zmień tytuł formularza Form1 na Grafika rozpinanej nici.
II. Kreślenie grafiki
Określenie tła okna
Kreślenie grafiki wykonamy na czarnym formularzu.
Zmieniamy więc właściwość Color w Object Inspector na clBlack.
______________________________________________________________________
©2004 Jerzy Kluczewski
C++ Builder. Programowanie obiektowe. Ćwiczenie 7. 3
______________________________________________________________________
Zdarzenie OnPaint
Przechodzimy do projektowania zdarzenia OnPaint, a potem do okna kodu funkcji
TForm1::FormPaint :
Wpisujemy kod funkcji:
double t, x1, x2, y1, y2, R, A, B;
R = ClientWidth / 2;
A = ClientWidth / 2;
B = ClientHeight / 2;
for (t = - M_PI; t < M_PI; t += M_PI/200)
{
x1 = R * sin( t ) * cos ( t );
y1 = R * cos( t );
x2 = -R * sin( t ) * cos ( t );
y2 = -R * cos( t );
Canvas->Pen->Color = (t < M_PI/2 ? clBlue : clRed);
Canvas->MoveTo( x1 + A, y1 + B);
Canvas->LineTo( x2 + A, y2 + B);
x1 = R * sin( t );
y1 = R * cos( t ) * sin( t );
x2 = -R * sin( t );
y2 = -R * cos( t ) * sin ( t );
Canvas->Pen->Color = (t < M_PI/2 ? clWhite : clAqua);
Canvas->MoveTo( x1 + A, y1 + B);
Canvas->LineTo( x2 + A, y2 + B);
}
}
©2004 Jerzy Kluczewski
4 C++ Builder. Programowanie obiektowe. Ćwiczenie 7.
______________________________________________________________________
III. Uruchomienie naszej aplikacji
Uruchomienie aplikacji
Uruchom jÄ… za pomocÄ… polecenia Run Run (F9)
WyglÄ…d okna aplikacji
Po uruchomieniu nasze okno wygląda następująco:
______________________________________________________________________
©2004 Jerzy Kluczewski


Wyszukiwarka

Podobne podstrony:
borland cpp builder cw1
borland cpp builder cw5
borland cpp builder cw10
borland cpp builder cw8
borland cpp builder cw3
borland cpp builder cw9
borland cpp builder cw2
borland cpp builder
borland cpp builder cw12
borland cpp builder cw11 algorytm
borland cpp builder cw4
borland cpp builder cw6
borland cpp builder cw13
SQL access in Borland C Builder

więcej podobnych podstron