Klaus
Nombre de messages : 12295
Age : 74
Localisation : Ile de France
Date d'inscription : 29/12/2009
 | | Sujet: Chercher une page d'aide en ligne pour les fonctions KGF.dll Lun 8 Fév 2021 - 21:13 | |
| Voici un petit code 100 % Panoramic pour afficher une page d'aide pour une fonction de KGF.dll. Le code permet juste 3 fonctions, mais il suffit d'étoffer la liste pour la combo 1. Surtout, dans un programmePanoramic, il suffit d'utiliser la partie "choix" de la routine pour aller chercher la doc de n'importe quelle fonction. Et, pour ceux qui utilisent WebBrowser ou d'autres éléments de téléchargement de KGF.dll, ils peuvent aussi charger le HTML et en extraire les parties choisies... - Code:
-
' demo_chercher_aide_en_ligne_pour_KGF_dll.bas
label choix
dim template$, s$, ind%, cmd$
combo 1 : top 1,10 : left 1,10 : width 1,200 : on_click 1,choix
item_add 1,"CreateBitmapList"
item_add 1,"DeleteBitmapList"
item_add 1,"AddImageToBitmapList"
template$ = "https://klauspanoramic.000webhostapp.com/%.html"
ind% = instr(template$,"%")
end
choix:
s$ = item_index(1)
cmd$ = left$(template$,ind%-1) + item_index$(1) + Mid$(template$,ind%+1,len(template$))
execute cmd$
return
| |
|
JL35
Nombre de messages : 7095
Localisation : 77
Date d'inscription : 29/11/2007
| | Sujet: Re: Chercher une page d'aide en ligne pour les fonctions KGF.dll Lun 8 Fév 2021 - 22:08 | |
| Ça c'est pas mal du tout, ça va éviter bien des galères !
Merci Klaus !
PS Je ne crois pas qu'il existe une liste brute de toutes les fonctions de KGF.dll ...? | |
|
Klaus
Nombre de messages : 12295
Age : 74
Localisation : Ile de France
Date d'inscription : 29/12/2009
| | Sujet: Re: Chercher une page d'aide en ligne pour les fonctions KGF.dll Lun 8 Fév 2021 - 23:40 | |
| Tu as la fonction - Code:
-
res% = dll_call2("GetExportedNamesFromDLL",adr(dll$),handle(list%)) qui retourne la liste des noms de fonctions dans un objet LIST. Et on peut combiner cela avec ce que j'ai posté aujourd'hui dans un autre fil de discussion. Et ça donne: - Code:
-
' demo_chercher_aide_en_ligne_pour_KGF_dll.bas
label choix
dim template$, s$, ind%, cmd$, res%, dll$
list 1 : top 1,10 : left 1,10 : width 1,200 : height 1,height_client(0)-20 : on_click 1,choix
item_add 1,"CreateBitmapList"
item_add 1,"DeleteBitmapList"
item_add 1,"AddImageToBitmapList"
template$ = "https://klauspanoramic.000webhostapp.com/%.html"
ind% = instr(template$,"%")
dll$ = "KGF.dll"
dll_on dll$
res% = dll_call2("GetExportedNamesFromDLL",adr(dll$),handle(1))
end
choix:
s$ = item_index(1)
cmd$ = left$(template$,ind%-1) + item_index$(1) + Mid$(template$,ind%+1,len(template$))
message cmd$
execute cmd$
return
C'est fait rapidement, mais ça donne une idée... | |
|
JL35
Nombre de messages : 7095
Localisation : 77
Date d'inscription : 29/11/2007
| | Sujet: Re: Chercher une page d'aide en ligne pour les fonctions KGF.dll Mar 9 Fév 2021 - 12:17 | |
| Merci Klaus, c'est exactement ce à quoi je pensais ! Je confirme, c'est bien toi le meilleur !  | |
|
Contenu sponsorisé
| | Sujet: Re: Chercher une page d'aide en ligne pour les fonctions KGF.dll | |
| |
|
Calendrier