CreateRectangle ....



  • ALso mit dem folgenden Code kann man aus der Form ein Polygon und eine Elypse machen.

    Wie kann ich ein Rechteck machen oder ein rechteck mit rundungen??

    _______________ 
    |               |
    |               |
    |               |   
    |               |
    |               |
    |               |
    |               |
    |               |
    |_______________|
    

    Oder mit rundungen 🙂

    //---------------------------------------------------------------------------
    void __fastcall TForm1::Button1Click(TObject *Sender)
    {
    POINT pts [2];
    pts[0].x= 50;
    pts[0].y=50;
    pts[1].x=100;
    pts[1].y=100;
    pts[2].x=25;
    pts[2].y=100;
    // Elipse
    HRGN EHandle=CreateEllipticRgn(10,10,300,100);
    //poligon
    HRGN PHandle=CreatePolygonRgn(pts,3,WINDING);
    HDC hdc=GetDC(Form1->Handle);
    HBRUSH hbr1=CreateSolidBrush(RGB(255,0,0));
    HBRUSH hbr2=CreateSolidBrush(RGB(0,255,0));
    HBRUSH hbr3=CreateSolidBrush(RGB(0,0,255));
    
    FillRgn(hdc,EHandle,hbr1);
    FillRgn(hdc,PHandle,hbr2);
    
    FrameRgn(hdc,PHandle,hbr3,5,5); // ein Rand drumerhum zeichen
    ReleaseDC(Form1->Handle,hdc);
    }
    //---------------------------------------------------------------------------
    
    CreateEllipticRgn
    

    Gibts auch i-wie CreateRectangle oder sowas?



  • wenn du mal in der MSDN geschaut hättest:
    CreateRectRgn
    CreateRoundRectRgn

    warum verwendest du nicht die Methoden von TCanvas (Rectangle, RoundRect, Polygon, Ellipse)?


Anmelden zum Antworten