Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Big in Small
Message
 
To
03/04/2002 12:50:14
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Title:
Miscellaneous
Thread ID:
00640435
Message ID:
00640531
Views:
18
Hi, Ken!

Some ideas - something may be helpful <s>:

To have a scrollable picture:
- Create a image control in the size of the whole big picture.
- Place this in the left upper corner of a form.
- Set Scrollbars property to 3
- Resize the form to the small size you want.
- Save this form with any name, i.e. "MyScrollablePictureForm.SCX".
Now you have a image control with scrollbars (which is not a control but a window <s>).

To use this control within another window "MyContainerWindow" put the following code in the Init of "MyContainerWindow":
* NOSHOW - start the form invisible
* NAME ThisForm.oRef - bound the form to this property (which must exist ;-))))
DO FORM MyScrollablePictureForm.SCX NAME ThisForm.oRef NOWSHOW
* This is the trick - using the old fashioned window commands with the VFP object syntax
ACTIVATE WINDOW ( ThisForm.oRef.Name ) IN WINDOW ( ThisForm.Name )
* Now moving the window to the right place
* BTW: Here you can use a proxy pattern to define size and location of your scrollable image control!
ThisForm.oRef.Left = ...
ThisForm.oRef.Top = ...
BTW: This code is not really tested yet, typing errors are possible!
SeBaFlu
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform