FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» Problème de compilateur.
par Pedro Alvarez Hier à 20:01

» COMPILATEUR V 0.9 beta 8 du 18 aout 2017
par Pedro Alvarez Hier à 19:54

» Pb 17 (en analyse): ITEM_SELECT ne fonctionne pas
par Jack Jeu 17 Aoû 2017 - 19:26

» Compilateur FBPano
par Mike Jeu 17 Aoû 2017 - 13:52

» un nouveau editeur panobasic
par Jean Claude Jeu 17 Aoû 2017 - 10:18

» Le compilateur.
par Pedro Alvarez Jeu 17 Aoû 2017 - 8:36

» Pb 16 (en analyse): ON_CLOSE plante à l'exécution
par Jack Mer 16 Aoû 2017 - 20:00

» Pb 15 (en analyse): TIMER_ON plante à l'exécution
par Jack Mer 16 Aoû 2017 - 19:58

» KGF_dll - nouvelles versions
par Yannick Dim 13 Aoû 2017 - 17:35

» probleme d'outil
par Yannick Dim 13 Aoû 2017 - 17:32

» Carte de France des régions
par Yannick Sam 12 Aoû 2017 - 21:33

» Pb 14 (en analyse): PRINT_LOCATE plante à l'exécution
par Jack Ven 11 Aoû 2017 - 22:37

» Petit avertissement [Mots réservés]
par papydall Ven 11 Aoû 2017 - 13:45

» Distances sur plan
par JL35 Jeu 10 Aoû 2017 - 21:29

» Tracé : Triangle, Carrée, Dents de scie, Sinusoïde redressée
par papydall Jeu 10 Aoû 2017 - 14:52

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Août 2017
LunMarMerJeuVenSamDim
 123456
78910111213
14151617181920
21222324252627
28293031   
CalendrierCalendrier

Partagez | 
 

 Programme portable

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
JL35



Nombre de messages : 5920
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Programme portable   Sam 28 Fév 2015 - 18:24

Je ne veux pas parler ici d'un programme qui ne pèse pas lourd (il y en a Very Happy ), mais d'un exécutable autonome qui ne nécessite pas d'adjoindre des fichiers annexes.
L'idée est d'intégrer au programme principal les fichiers binaires annexes: petite dll, imagettes, icônes etc. sous forme de lignes de datas en hexadécimal, et de reconstituer ces fichiers sur place au moment de l'exécution. Ça évite donc le transport de plusieurs fichiers, au risque d'en oublier un.
Il est bien évident qu'il ne s'agit ici que de fichiers binaires peu volumineux (sous forme hexa leur volume est multiplié par deux). Je ne conseillerais pas d'essayer d'intégrer kgf.dll, à moins d'avoir des idées suicidaires...

L'essentiel est constitué de deux petites subs:
- Bin2Data, utilisé en dehors du programme principal, qui convertir le fichier binaire en lignes de datas en hexadécimal et écrit le tout dans un fichier texte.
Ce fichier texte est ensuite lu dans un éditeur et incorporé par copier/coller dans le programme principal, en y ajoutant des repères de début et de fin.
(le fichier texte peut ensuite être détruit).
- Data2Bin, dans le programme, qui lit les lignes de datas et reconstitue le fichier binaire à un emplacement choisi, pour utilisation par le reste du programme.

Je pensais en particulier au programme de dessin ci-contre, qui utilise Mouse.dll de Nardo.
Cette dll fait environ 40k octets, et génère 1024 lignes de datas, c'est beaucoup, mais bon, il faut ce qu'il faut.

Les subs avec exemple d'utilisation (pour l'anecdote, j'avais fait précédemment un long baratin et joint la totalité des datas, et j'ai eu droit à 'Message trop long...' et paf, j'ai perdu la totalité du texte Sad . Donc là, échaudé, je ne mets qu'une petite partie des datas)
Code:
DIM f$,fr$,fb$
f$ = "C:\PANORAMIC\Mouse.dll": ' fichier dll d'origine
fr$ = "Z:\Mouse.txt": ' fichier texte provisoire des datas, à supprimer ensuite
fb$ = "Z:\Mouse.dll": ' fichier dll résultat (utilisé par le programme cible)

' Conversion d'un fichier binaire en suite de DATAs
Bin2Data(f$,fr$)
PRINT "Terminé phase 1 !"

' Conversion de la suite de DATAs en fichier binaire (restore)
Data2Bin("Mouse.dll","F",fb$)
PRINT "Terminé phase 2 !"
END
' ==============================================================================
SUB Bin2Data(f$,fr$)
' Conversion d'un fichier binaire en suite de DATAs (dans fichier texte fr$)
DIM_LOCAL a$,sz%,i%,j%,ncl%,rs%
ncl% = 40: ' octets par ligne, arbitraire
FILEBIN_OPEN_READ 8,f$: sz%=FILEBIN_SIZE(8)
FILE_OPEN_WRITE 9,fr$
j% = INT(sz%/ncl%): rs% = sz%-j%*ncl%
FOR i% = 1 TO j%
    FILEBIN_HEXA_READ 8,ncl%,a$: FILE_WRITELN 9,"DATA "+CHR$(34)+a$+CHR$(34)
NEXT i%
IF rs%>0 THEN FILEBIN_HEXA_READ 8,rs%,a$: FILE_WRITELN 9,"DATA "+CHR$(34)+a$+CHR$(34)
FILEBIN_CLOSE 8: FILE_CLOSE 9
END_SUB
' ==============================================================================
SUB Data2Bin(Seqd$,Seqf$,fb$)
' Conversion de la suite de DATAs en fichier binaire (restore)
' Seqd$ = repère de début, Seqf$ = séquence de fin (= "F")
' fb$ = chemin du fichier binaire résultat
DIM_LOCAL a$
RESTORE: READ a$: WHILE a$<>Seqd$: END_WHILE
FILEBIN_OPEN_WRITE 9,fb$
    READ a$
    WHILE a$<>Seqf$: FILEBIN_HEXA_WRITE 9,LEN(a$)/2,a$: READ a$: END_WHILE
FILEBIN_CLOSE 9
END_SUB
' ==============================================================================
DATA "Mouse.dll"
DATA "4D5A50000200000004000F00FFFF0000B80000000000000040001A00000000000000000000000000"
DATA "000000000000000000000000000000000000000000010000BA10000E1FB409CD21B8014CCD219090"
DATA "546869732070726F6772616D206D7573742062652072756E20756E6465722057696E33320D0A2437"
...
...
DATA "00000000000000000000000000000000000000000000000000000000000000000000000000000000"
DATA "00000000000000000000000000000000000000000000000000000000000000000000000000000000"
DATA "00000000000000000000000000000000000000000000000000000000000000000000000000000000"
DATA "F"
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Klaus

avatar

Nombre de messages : 10062
Age : 68
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: Programme portable   Sam 28 Fév 2015 - 19:01

Est-ce que tu as essayé de simplement renommer un fichier binaire en TXT ou BMP ? En générant l'exécutable sous forme "application", ce fichier sera alors inclus. Et lors de l'exécution, tu devrais pouvoir l'utiliser, soit directement en donnant son nom modifié, soit en le copiant à partir de son nom modifié vers un dossier temporaire et de l'utiliser là. A ce régime, tu peux inclure des DLLs, même KGF.dll, et de reconstituer l'environnement d'exécution au démarrage.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
JL35



Nombre de messages : 5920
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Programme portable   Sam 28 Fév 2015 - 19:12

J'avoue à ma grande honte que je n'ai jamais compilé d'exécutable sous forme d'application mais toujours sous forme exe... Effectivement ce que tu dis doit être possible (si je comprends bien, d'après ce que tu dis ça n'accepte en fichiers associés que les txt ou bmp)... à voir...

Par contre je ne comprends pas du tout comment on désigne les fichiers associés.
Si je lance ma compilation en 'Application', le compilateur me liste un tas de fichiers txt, jpg ou bmp qui seront joints et qui n'ont rien à voir avec le source en question... je ne vois pas du tout où il va chercher tout ça scratch et ça finit d'ailleurs par une erreur sur un fichier jpg scratch et il me génère un exécutable inutilisable.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Klaus

avatar

Nombre de messages : 10062
Age : 68
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: Programme portable   Sam 28 Fév 2015 - 19:20

Il inclut automatiquement tous les fichiers TXT, BMP et JPG qu'il trouve dans le dossier. Il les propose dans une liste (mémo ?), et tu peux en rajouter ou en enlever. Puis tu valides cette liste.

Il est donc conseillé d'avoir un dossier dans lequel tout est réuni, mais seulement ce qui est nécessaire pour le programme en question.

Je viens de faire l'essai: ça ne marchera pas avec l'extension BMP, car il vérifie la validité du format BMP avant.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
JL35



Nombre de messages : 5920
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Programme portable   Sam 28 Fév 2015 - 19:24

Merci pour le tuyau, effectivement je faisais ça dans le répertoire des sources, alors là il y a du monde !

J'avoue que je n'arrive pas à grand chose (allez, disons-le, à rien) avec cette méthode, je ne dois pas savoir m'y prendre...

A priori ça ne marche pas.
Je mets dans un répertoire Test.bas:
Code:
DIM mm$
mm$ = "Mouse.dll"
EXECUTE_WAIT "CMD.exe /c REN Mouse.jpg "+mm$: ' rename
DLL_ON mm$
END
et Mouse.dll renommé en Mouse.txt ou en Mouse.jpg
Je compile en application Test.exe, avec Mouse.txt (ou Mouse.jpg)
et à l'exécution j'ai toujours une erreur de chargement dll (et pas de dll créée évidemment)

Et si je compile directement avec Mouse.dll, je n'ai pas d'erreur à la compilation, mais même résultat.

Après essais, je dirai que pour moi, a priori, ce système ne marche pas, et donc que je maintiens mes subs là-haut.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: Programme portable   

Revenir en haut Aller en bas
 
Programme portable
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Augmenter l'autonomie du 3790T "à pied" avec une alim externe portable
» cafe renverser sur clavier ordi portable
» Mon PC portable perd de la mémoire
» ordinateur portable qui se bloque
» HotKeys : des raccoucis claviers facilement (logiciel portable)

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC 32 bits :: Vos sources, vos utilitaires à partager-
Sauter vers: