I would like to make a more modern appearance of my windows and I was thinking about using border less windows, with no minimize/maximize controls and no title in order to have just a square window. I would create my own buttons on the window to do the same actions as the control buttons.
What I am also interested in, is to be able to click the form, hold down left button and move the window around the screen.
Does anybody have some code or a routine to accomplish this? In ‘normal’ window programs I guess this is normally done using a combination of the mouse event and the x/y coordinates. Probably the same in Clarion, I would imagine.
I’m triyng this code to move my window, but I guess I’m doing something wrong becasuse it doesn’t work properly.
The problem is that when I move the window, the buttons in the window stop working.
I put the region in the top of the window because I’d ike to use only this area to move the window.
In the window there are lots of controls and buttons
This don’t look like normal buttons? Are they some kind of active image or OCX?
Take out those NoWidth=1 NoHeight=1. They are making it FULL so it is over the buttons and then they can’t be clicked.
Edit: The Prop:Full=1 would cause your problem. If the Region gets over the Buttons they will not click. That example was an About Window with NO buttons where I wanted the user to grab it anywhere. That makes it hard to deal with in the Window Designer so I do it at runtime. I’ll add some comments.
They are just buttons with a png image
I tried taking out those two lines. Full=1 and Nowidth Noheight, but there’s something weird…
The buttons in the window start working but when I move the window for the first time then the buttons stop working.
Try adding a ,CURSOR(CURSOR:Hand) to the Region so any time you are hovering over it should should that Hand (Finger Pointer). If that Hand shows over your buttons that means the Region got put over them and they won’t work. Maybe by Resizer.
#2 after EVENT:MouseUP HIDE(?MoveRegion) so you get one Move. If hiding fixes the problem that also indicates its over the buttons.