Xinclude conditionnel

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
Avatar de l’utilisateur
microdevweb
Messages : 1802
Inscription : mer. 29/juin/2011 14:11
Localisation : Belgique

Xinclude conditionnel

Message par microdevweb »

Bien que je ne penses pas que cela soit possible, peut faire un include conditionnel

Voila ce que j'aimerais faire

Code : Tout sélectionner

If FileSize("Tree.pbi")=-1
      InitNetwork()
      If ReceiveHTTPFile("http://www.microdevweb.com/source/Tree/Tree.pbi","Tree.pbi")=0
            MessageRequester("Http Error","I can not load the Tree.pbi")
            End
      EndIf
      XIncludeFile "Tree.pbi'
Else
       XIncludeFile "Tree.pbi'
EndIf
Windows 10 64 bits PB: 5.70 ; 5.72 LST
Work at Centre Spatial de Liège
Avatar de l’utilisateur
falsam
Messages : 7324
Inscription : dim. 22/août/2010 15:24
Localisation : IDF (Yvelines)
Contact :

Re: Xinclude conditionnel

Message par falsam »

ça ne me semble pas possible. IncludeFile ou XIncludeFile sont des directives qui indique au compilateur quels sont le ou les fichiers à inclure dans la compilation.

Ce ou ces fichiers doivent exister au moment de la compilation.
Configuration : Windows 11 Famille 64-bit - PB 6.20 x64 - AMD Ryzen 7 - 16 GO RAM
Vidéo NVIDIA GeForce GTX 1650 Ti - Résolution 1920x1080 - Mise à l'échelle 125%
Anonyme2
Messages : 3518
Inscription : jeu. 22/janv./2004 14:31
Localisation : Sourans

Re: Xinclude conditionnel

Message par Anonyme2 »

Je ne sais pas dans quel cas de figure tu voudrais faire cela mais si c'est pour compiler en testant si le fichier est sur le web, tu peux peut-être écrire quelques lignes et faire un outils de précompilation menu outils/outils personnalisés.
Avatar de l’utilisateur
microdevweb
Messages : 1802
Inscription : mer. 29/juin/2011 14:11
Localisation : Belgique

Re: Xinclude conditionnel

Message par microdevweb »

Merci Falsam et Denis,

Je me doutais bien que cela ne soit pas possible, l'intérêt était de pouvoir poster des exemples sur le forum avec dowload automatique.
Windows 10 64 bits PB: 5.70 ; 5.72 LST
Work at Centre Spatial de Liège
Répondre