Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
FoxPro/DOS app in VFP
Message
From
23/08/2002 13:58:35
Dragan Nedeljkovich (Online)
Now officially retired
Zrenjanin, Serbia
 
 
To
23/08/2002 12:42:20
General information
Forum:
Visual FoxPro
Category:
FoxPro 2.x
Miscellaneous
Thread ID:
00692920
Message ID:
00693063
Views:
29
>I have only done this successfully using Foxfont, 9 and setting the screen resolution to 640x480. Maybe someone else has found a better solution.
>
>Tracy
>
>>I want to test running an application written in FoxPro/Dos in VFP. Is there a certain font I can use to get as close to 24x80 on the screen, so it looks more like the DOS app?

You don't have to set screen resolution, unless you really want your app to cover the whole screen; besides, it would still run in VFP window, which would then be limited with toolbars on the desktop, so you can't really rely on it having the desired size.

What I've made work is to create a blank form, set its measurement unit to foxels, set size to 25x80 (we need the 25th row for messages etc), and used any nonproportional font. After form.show, it became the active window, and any 2.x stuff ran inside that window. The major obstacle was the colors - Set Color of Scheme doesn't really work in VFP, because many of the schemes are welded to Windows default color sets, but that could be tweaked by intervening in @x,y ... color RGB(...). Note that there are six numbers here, because we set both the fore- and backcolor.

It even worked when we set this form to be desktop, top-level, with _screen.visible=.f.; the whole FP app lived inside this form, thinking it has the FP screen as its playground. It even accepted the background picture etc - I don't know what happened later with this, I did it as an interesting exercise on someone's laptop during the lunch break at the Essential Fox conference.

back to same old

the first online autobiography, unfinished by design
What, me reckless? I'm full of recks!
Balkans, eh? Count them.
Previous
Reply
Map
View

Click here to load this message in the networking platform