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
» Jeu de dames
Aujourd'hui à 22:52 par papydall

» Une boîte à rythmes DRUMBOX
Aujourd'hui à 22:38 par papydall

» Version instantanée du 16 mai 2012: PANORAMIC V 0.9.23i6
Aujourd'hui à 21:52 par Klaus

» MÉTHODE du plus petit carré (régression linéaire)
Aujourd'hui à 21:01 par Severin

» libérer toutes les variables d'un programme sans le fermer
Aujourd'hui à 20:02 par Jean Claude

» boîtes de messages multi-langue
Aujourd'hui à 19:54 par Severin

» BAR und FORM keine Möglichkeit
Aujourd'hui à 19:38 par Severin

» Plugicielle pour Panoramic
Aujourd'hui à 18:39 par Klaus

» Exécution d'un script en Panoramic SANS compiler !
Hier à 13:00 par Klaus

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Mai 2012
LunMarMerJeuVenSamDim
 123456
78910111213
14151617181920
21222324252627
28293031   
CalendrierCalendrier

Partager | 
 

 Appeler des fonctions Delphi SANS utiliser des DLL !

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



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

MessageSujet: Appeler des fonctions Delphi SANS utiliser des DLL !   Jeu 16 Déc 2010 - 1:40

Oui, j'ai trouvé un moyen de faire cela - par une technologie client/serveur !

Regardez ce lien:
http://panoramic.free-boards.net/le-site-de-klaus-f11/serveripc-technologie-client-serveur-remplacant-les-dll-t1320.htm#11369
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klaus.panoramic.voila.net/index.html
cosmos70



Nombre de messages: 2226
Localisation: France-Comté Haute-Saône
Date d'inscription: 07/08/2009

MessageSujet: Re: Appeler des fonctions Delphi SANS utiliser des DLL !   Jeu 16 Déc 2010 - 10:18

Cela ressemble à la technique que j'ai utilisé cet été, en me servant du presse papier pour transmettre des ordres d'un programme Panoramic vers un autre programme Panoramic.
le tout premier programme pour faire les essais était le suivant:
Code:

dim a$,sorti%
label prise ,fin ,suite

memo 1:width 1,180:height 1,100:on_change 1,suite
memo 2:left 2,200:height 2,100
on_click 0,prise

end

prise:
set_focus 1
repeat
  clipboard_paste 1
  wait 100
  repeat : sorti%=scancode : until sorti%=27  or count(1)>0
  if sorti%=27 then goto fin
until count(1)>0
a$=item_read$(1,1)
if a$="rouge" then color 2,255,0,0
if a$="vert" then color 2,0,255,0
if a$="bleu" then color 2,0,0,255
if a$="jaune" then color 2,255,255,0
if a$="ordre donné: stop" then goto fin
return

suite:
' item_add 2,item_read$(1,1)
clear 1
wait 100
clear 1
set_focus 1
goto prise
return


fin:
terminate

On lance le programme, et à l'aide d'un note-pad ou autre on copie des mots comme rouge vert jaune.
Chaque mot doit être copier dans le presse papier, et il est automatiquement exécuté. Dans cet exemple, il y a une boucle et pour arrêter le programme, il faut copier le mot stop pour qu'il se ferme.

Le programme que j'ai fais ensuite est partie de cet exemple. Mais j'avoue que le presse papier pose parfois des problèmes, et si vous pouvez vous référer aux problèmes que j'ai exposé cet été sur le forum.

J'ai préféré ensuite utiliser la dll IPC.dll de Klaus, qui va mieux. Les programmes qui communiquaient entre eux, je les ais abandonnés. J'ai changé mes objectifs depuis, et je revois tout.

Apparemment c'est le même principe, mais Klaus, n'hésite pas à développer. Je pense que les autres n'ont vraiment pas bien compris l'intérêt de cette méthode.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
dragonno



Nombre de messages: 341
Localisation: Près de Toulouse
Date d'inscription: 22/01/2009

MessageSujet: Re: Appeler des fonctions Delphi SANS utiliser des DLL !   Jeu 16 Déc 2010 - 23:42

Moi par exemple ce n'est pas que j'ai compris l'interet ou pas de la méthode, c'est juste que je n'en ai pas l'utilité pour le moment donc je n'ai pas réagi à son sujet.

Mais bien sûr la communication entre programme est quelque chose d'interessant Wink
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
cosmos70



Nombre de messages: 2226
Localisation: France-Comté Haute-Saône
Date d'inscription: 07/08/2009

MessageSujet: Re: Appeler des fonctions Delphi SANS utiliser des DLL !   Ven 17 Déc 2010 - 0:55

Que l'on ne réagisse pas à mes méthodes, cela ne me dérange pas.
Mais, quant-à l’utilité, alors là pas d'accord. Klaus l'a très bien compris, et Jack aussi (je me met en dehors, ma présence n'a pas d'importance).
Cela permet en communiquant d'un programme à l'autre, d'avoir des routines qu'on ne peut pas faire en panoramic, ou en dll. Cela permet aussi de communiquer entre programme Panoramic, et on va se demander pourquoi? Et bien à la différence d'un include, le programme distant a ses propres variables, et ses propres labels. Il n'y a pas d'interférence. Le plus difficile est de provoquer un arrêt de programme, pour aller chercher l'information dans l'autre programme (attention entre programmes Panoramic, il faut qu'un d'entre eux soit un exe), et reprendre ensuite.
Je ne vais pas rentrer dans les détails, c'est la méthode de Klaus, ici, et non la mienne.

Mais dire qu'il n'y a pas d'utilité. Si tu as des programmes fait avec un autre langage, en C en Qbasic ou autre, cela permet d'élargir le champ de programmation.
Maintenant c'est à Maitre Klaus de continuer. J'ai donné mon point de vue, mais maintenant c'est son domaine.

Edit:
Ça permet aussi de faire de nouvelles fonctions. Pour ma part je passe en ce moment par un loader, mais j'aurai pu aussi choisir cette méthode!
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
dragonno



Nombre de messages: 341
Localisation: Près de Toulouse
Date d'inscription: 22/01/2009

MessageSujet: Re: Appeler des fonctions Delphi SANS utiliser des DLL !   Ven 17 Déc 2010 - 23:07

Heu.... ?
J'ai dis quelque part que ce programme était inutile ?
Lol

Non, j'ai simplement dit que je n'en ai pas l'utilité pour le moment.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
 

Appeler des fonctions Delphi SANS utiliser des DLL !

Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1

 Sujets similaires

-
» Appeler en Algérie en illimité sans se ruiner
» Les fonctions d?une entreprise
» Rooter Wildfire, incredible S, etc. SANS XTC CLIP
» Nourrir les personnes sans abri est illégal...
» discussion Bidon sur Freebay - NON sans Humour

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