#1 Wed 21 October 2009 21:53
- snaileater
- Participant actif
- Date d'inscription: 5 Nov 2008
- Messages: 121
Quel est le nom du MBX en cours d'exécution ?
Bonjour,
existe-t-il une fonction Mapbasic permettant de faire référence au nom du MBX (nom du fichier *.mbx) en cours d'exécution ?
Merci d'avance.
Hors ligne
#2 Wed 21 October 2009 23:19
- Richard Lohier
- Participant occasionnel
- Lieu: Le perray en yvelines
- Date d'inscription: 13 Nov 2006
- Messages: 28
Re: Quel est le nom du MBX en cours d'exécution ?
Bonsoir,
La fonction ci-dessous retourne le nom de l'application en cours (de démarrage).
Code:
Declare Function NomAppli$() as string ... Function NomAppli$() as string Onerror Goto Erreur Dim Valeur$, Stringapplication$ As String Dim Position# As Integer Dim i_chan# As Integer i_chan# = DDEInitiate( "MapInfo" , "System" ) Stringapplication$ = Right$(DDERequest$(i_chan#, "Topics"), 200) While instr(1, Stringapplication$, "\") and Position# < 200 Stringapplication$ = mid$(Stringapplication$, instr(1, Stringapplication$, "\")+1, 200) Position# = Position#+1 Wend Stringapplication$ = Left$(Stringapplication$, len(Stringapplication$)-4) NomAppli$ = Stringapplication$ Exit Function Erreur: End Function
Hors ligne
#3 Tue 27 October 2009 12:56
- snaileater
- Participant actif
- Date d'inscription: 5 Nov 2008
- Messages: 121
Re: Quel est le nom du MBX en cours d'exécution ?
Merci beaucoup, cela semble marcher comme attendu ...
La solution m'a l'air un peu "sioux", mais ça marche ... Est-ce que ce type de solution (je pense au DDEInitiate) est un peu documentée dans le manuel Mapinfo ?
Merci en tout cas.
Hors ligne