Form mit runden Ecken durch CreateRoundRectRgn erzeugen - C++ Builder Snippets
C++ Builder Snippets
Form mit runden Ecken durch CreateRoundRectRgn erzeugen.
Eine Form mit runden Ecken lässt sich durch die Funktion CreateRoundRectRgn erzeugen. Wobei
genau genommen dabei nur die Region definiert wird. Das setzen der Region erfolgt durch die Funktion SetWindowRgn.
|
1 2 3 4 5 6 7 8 9 |
HRGN CreateRoundRectRgn( int nLeftRect, // x-coordinate of the region's upper-left corner int nTopRect, // y-coordinate of the region's upper-left corner int nRightRect, // x-coordinate of the region's lower-right corner int nBottomRect, // y-coordinate of the region's lower-right corner int nWidthEllipse, // height of ellipse for rounded corners int nHeightEllipse // width of ellipse for rounded corners ); |
In den letzten 2 Parametern wird die Größe einer Ellipse definiert. Die Form unserer Rundung ist von der Größe der Ellipse abhängig.
|
1 |
HRGN RectRegion =CreateRoundRectRgn(0, 0, Form1->Width, Form1->Height, TrackBar1->Position , TrackBar2->Position ); |
Ein Beispiel ist vorhanden.
Beispiel:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 |
//--------------------------------------------------------------------------- //******** ******** //******** Dieses Beispiel stammt von www.ecodes.de ******** //******** ******** #include <vcl.h> #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { Form1->Close() ; } //--------------------------------------------------------------------------- void __fastcall TForm1::TrackBar1Change(TObject *Sender) { //Region erstellen HRGN RectRegion =CreateRoundRectRgn(0, 0, Form1->Width, Form1->Height, TrackBar1->Position , TrackBar2->Position ); if (RectRegion != 0 ) SetWindowRgn(Form1->Handle, RectRegion, True); //Shapegröße anpassen Label4->Caption = TrackBar2->Position; Label5->Caption = TrackBar1->Position; Shape1->Height = TrackBar2->Position; Shape1->Width = TrackBar1->Position; Shape1->Left = 0; Shape1->Top = 0 ; } //--------------------------------------------------------------------------- |