Partage avec DLLRésolu

Question

Je voudrais structurer mon projet VFP entre un EXE et plusieurs DLL.
L'EXE est en VFP et les DLL aussi. La DLL doit afficher un &#233;cran de saisie

Au niveau de la DLL j'ai le code suivant qui fonctionne tr&#232;s bien
DEFINE CLASS person2 AS CUSTOM OLEPUBLIC
   FirstName = "test" && SPACE(30)
   LastName = "1" &&SPACE(45)


   PROCEDURE GetName
      RETURN THIS.FirstName + " " + THIS.LastName
   ENDPROC
ENDDEFINE

Je l'appelle dans l'EXE avec
oTest = CREATEOBJECT("p1.person")
MESSAGEBOX(oTest.GetName())

Par contre je ne sais pas commet ouvrir un &#233;cran au niveau de la DLL

ThierryPerretier · Accepted Answer

- Mettre les codes sources des diff&#232;rents modules dans les dossiers s&#233;par&#233;s, &#231;a &#233;vite des surprises.

- Pour lancer un PRG contenu dans l'APP

set procedure to module.app
do ("proc.pg") && important : les ("
ou
external procedure proc
proc(...)

- Pour lancer un formulaire, cr&#233;er une proc&#233;dure dans le module APP.
Par exemple

PROCEDURE doform(cForm as string)


  DO FORM (m.cForm)


ENDPROC

- tu peux aussi faire des DO MODULE.APP WITH "ACTION"
Par exemple, "INIT" en argument effectuera des SET PROCEDURE / SET CLASSLIB.

FredArmoni · Answer

Une DLL ne peut pas avoir d'interface utilisateur. Tu dois compiler en exe ole

[mailto:frederic.steczycki@mvps.org Fred]
membre actif d'AtoutFox
MS MVP VFP

delphifox · Answer

OK mais je trouve cela ou ?

En option de g&#233;n&#233;ration j'ai app, exe, dll

FredArmoni · Answer

app, exe, dll  ;)

ou alors je ne comprend pas la question...

[mailto:frederic.steczycki@mvps.org Fred]
membre actif d'AtoutFox
MS MVP VFP

delphifox · Answer

Ma question est de pouvoir partager un gros projet entre plusieurs d&#233;veloppeurs, chacun ayant chacun en charge un domaine sp&#233;cifique.
J'avais donc pens&#233; avoir un EXE qui contiendrait le menu + quelques fonctions de base comme le login et autant de DLL que de domaines sp&#233;cifiques.


J'ai fait cela sous Delphi sans probl&#232;me et je ne vois pas pourquoi VFP8 serait moins puissant.
Y a t-il une solution avec des APP par domaine ?
J'ai essay&#233; mais les PRG et les ecrans des APP remontent dans le projet principal au moment de la compilation


Merci d'avance du conseil

ThierryPerretier · Answer

Bonjour,

Pas besoin de cr&#233;er des objets publics (via composant COM DLL ou EXE).

Cr&#233;er plusieurs APP.

ensuite, il y a les commandes/fonctions :

SET CLASSLIB TO  ....IN ...

SET PROCEDURE TO
NewObject()
DO .. IN ..
....

Qui peuvent r&#233;f&#233;rencer des fichiers APP

FredArmoni · Answer

Tout de suite, quand on connait le probl&#232;me, &#231;a va beaucoup mieux pour r&#233;pondre ;)

[mailto:frederic.steczycki@mvps.org Fred]
membre actif d'AtoutFox
MS MVP VFP

delphifox · Answer

Cr&#233;er plusieurs APP.
ensuite, il y a les commandes/fonctions :
SET PROCEDURE TO

C'est ce ce que j'ai fait mais au moment de la g&#233;n&#233;ration du projet principal FOX me rapatrie les modules et les &#233;crans que j'appelle.

delphifox · Answer

Ce devait &#234;tre les (" qui me manquaient

Ca marche. Je ne peux pas dire que cela m'emballe parce que je trouve que des DLL auraient &#233;t&#233; pr&#233;f&#233;rables mais je peux proposer cette solution qui va permettre de lotir le projet.

Merci encore une fois de m'avoir aid&#233;.

ThierryPerretier · Answer

On peut faire :

SET PROCEDURE TO Module.app
oModule = NewObject("person2","classes.prg")
? oModule.GetName()

Ce syst&#232;me est assez proche de l'appel d'une DLL. Le seul avantage d'une DLL, c'est quelle peut &#234;tre exploit&#233; par un autre langage que Foxpro.

Partage avec DLL

10 réponses

Votre réponse

Discussions similaires