Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Version 6.0
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
The Mere Mortals Framework
Titre:
Divers
Thread ID:
00264136
Message ID:
00264185
Vues:
20
>>Chomp, Chomp, Chomp-- So much food for thought it's no wonder it's so quiet around here.
>>
>>BTW, has anyone been able to get the sample application to run? I've tried everything with no success.
>>
>>Try not to eat too much--VFP can cause serious indegestion.
>>
>>Enjoy
>
> I haven't even gotten that far yet. I've been reading the new manual (well, scanning it mostly). I was just about it install it for real and update my current project. I'll see if I can get the sample app. to run and let you know.

For the lazy people out there (I'm including myself), here's a bit of cut-n-paste code to automatically add in the extra classes. Nothing fancy, but if you have to modify more than one project it'll save you some time.

If you're really motivated, I'm sure it'd be easy enough to add this stuff into the UPDATE6 form. For now, just fill in the path of the project and your MMortals path.
LOCAL lcProjName, lcProjPath, lcMMortalsPath

lcProjName = "E:\APPS\CE\CE.PJX"
lcProjPath = JUSTPATH(lcProjName)

lcMMortalsPath = "E:\mmortals\"

MODIFY PROJECT (lcProjName)

Application.ActiveProject.Files.Add(lcMMortalsPath+'Common30\libs\CSecurity.vcx')
Application.ActiveProject.Files.Add(lcMMortalsPath+'Common30\Progs\DBF2RS.prg')
Application.ActiveProject.Files.Add(lcMMortalsPath+'Common30\Progs\DBF2XML.prg')
Application.ActiveProject.Files.Add(lcMMortalsPath+'Common30\Progs\RS2DBF.prg')
Application.ActiveProject.Files.Add(lcMMortalsPath+'Common30\Include\ADOVFP.h')
Application.ActiveProject.Files.Add(lcMMortalsPath+'Common30\Include\DBF2RS.h')
Application.ActiveProject.Files.Add(lcMMortalsPath+'Common30\Include\Outlook.h')

COPY FILE lcMMortalsPath+"generic\setx.prg" TO (lcProjPath)+"setx.prg"
-Paul

RCS Solutions, Inc.
Blog
Twitter
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform