Ein Polygon in einer VCL-Formularanwendung zeichnen
Nach oben zu So erstellen Sie eine VCL-Formularanwendung mit Grafiken
Mit folgenden Schritten wird ein Polygon in einem VCL-Formular gezeichnet:
- Ein VCL-Formular erstellen.
- Eine Behandlungsroutine für das OnPaint-Ereignis des Formulars schreiben, die ein Polygon zeichnet.
- Die Anwendung compilieren und ausführen.
So erstellen Sie ein VCL-Formular:
- Wählen Sie Datei > Neu > Weitere > Delphi-Projekte oder C++Builder-Projekte, und doppelklicken Sie auf das Symbol VCL-Formularanwendung.Der VCL-Formular-Designer wird angezeigt.
- Klicken Sie gegebenenfalls in der Formularansicht auf das Formular, um Form1 im Objektinspektor anzuzeigen.
So schreiben Sie die Behandlungsroutine für das Ereignis OnPaint:
- Klicken Sie im Objektinspektor auf die Registerkarte Ereignisse.
- Doppelklicken Sie auf das Ereignis OnPaint.Der Quelltext-Editor wird angezeigt. Der Cursor befindet sich bereits im Block der Ereignisbehandlungsroutine TForm1.FormPaint (Delphi) bzw. TForm1::FormPaint (C++).
- Geben Sie folgenden Quelltext für die Ereignisbehandlungsroutine ein:
Canvas.Polygon ([Point(0,0), Point(0, ClientHeight), Point(ClientWidth, ClientHeight)]); TPoint points[] = { Point(0,0), Point(0, ClientHeight), Point(ClientWidth, ClientHeight) }; Canvas->Polygon( points, 3 );
So führen Sie das Programm aus:
- Wählen Sie Start > Start.
- Die Anwendung wird ausgeführt und zeigt ein gleichseitiges Dreieck in der unteren linken Hälfte des Formulars an.