Looking for diagonal component of the Panel?

Category: Delphi -> VCL/Component Author: shiyueteshi Date: 2003-06-05 09:50:08
 
shiyueteshi
2003-06-05 09:50:08
You master, may I ask where you can make a control panel placed diagonally. I tried the following methods:

procedure TForm4.btn1Click(Sender: TObject);
var
  Points:array[0..3] of TPoint
  Rgn:HRGN;
begin

  Points[0]:=Point(StrToInt(edtPiont1X.Text),StrToInt(edtPiont1Y.Text));
  Points[1]:=Point(StrToInt(edtPiont2X.Text),StrToInt(edtPiont2Y.Text));
  Points[2]:=Point(StrToInt(edtPiont3X.Text),StrToInt(edtPiont3Y.Text));
  Points[3]:=Point(StrToInt(edtPiont4X.Text),StrToInt(edtPiont4Y.Text));

  Rgn:=CreatePolygonRgn(Points,4,ALTERNATE);

  SetWindowRgn(pnlbg1.Handle,Rgn,True);


  DeleteObject(Rgn);
end;

this method, only on the basis of the original panel were cut, not really let panel tilt display. Please expert help, thank you!
cfy_jady
2003-06-05 09:54:13
All she painted it.
tofallen
2003-06-05 10:05:12
there is such a demand ah!
Bangding
bighug
2003-06-05 10:20:06
display diagonal over
zhaojing159
2003-06-05 10:34:01


no need to bother it, his head inclined what can not it
niuerlong
2003-06-05 10:38:25
need to do so, or to write their own controls it. . .

inherited from TCustomControl or from TCustomPanel inheritance. . .
yinichenxi
2003-06-05 10:50:27
panel diagonal, then put inside if the button, or edit edit box, will have to be placed at an angle, oh.

difficult this good oh.
jiaqi0012
2003-06-05 11:05:34
put on an inclined control panel which bar.
cfy_smallfei
2003-06-05 11:25:14
put a panel control, and then tell the user the right to use "Please head sideways to see"
aa31351315136
2003-06-05 11:42:49
Well this question, it seems too much trouble. I have not seen the software can ramp up the standard controls put.

way I can think of is your own maps. Want to rely on existing controls to achieve, I did not expect solutions.
raguo
2003-06-05 11:52:59
No way, we map the software to put some things, these things in the direction you want to go down to the map.
harrydavid
2003-06-05 11:55:17
I fainted. o (∩ _ ∩) o ... ha ha!