Gambas France BETA


Pas de compte ? Incription

[Résolu]Test si on est dans l'IDE

Ce sujet est résolu.

1
AuteurMessages
Philippe734#1 Posté le 5/7/2017 à 11:49:17
Bonjour,

Je cherche un test pour vérifier si le programme est exécuté dans l'interface IDE.

Sous vb6, j'utilisais la fonction debug.ASSERT selon ce snippet :
1
2
3
4
5
6
7
8
9
PRIVATE m_bInIDE AS BOOLEAN
PUBLIC Property Get InIDE() AS BOOLEAN
Debug.Assert (IsInIDE())
InIDE = m_bInIDE
END PROPERTY
PRIVATE FUNCTION IsInIDE() AS BOOLEAN
m_bInIDE = TRUE
IsInIDE = m_bInIDE
END FUNCTION

Pourriez-vous m'aider svp à tester si on est dans l'IDE.
Merci d'avance !
Flachy Joe#2 Posté le 5/7/2017 à 13:54:09
Iguane : Il Gambas Uniquement pour Activer ses NEuronesSalut,
tu peux vérifier la présence du composant gb.debug, qui est forcement chargé dans l'IDE mais qui sinon ne l'est que si tu le coches dans les propriétés du projet.

1
2
3
4
5
6
7
8
9
10
PUBLIC FUNCTION isIDE() AS BOOLEAN
DIM c AS Component

FOR EACH c IN Components
IF c.Name = "gb.debug" THEN RETURN TRUE
NEXT

RETURN FALSE

END
;) Flachy Joe ;)
Philippe734#3 Posté le 5/7/2017 à 14:52:01
1
2
FOR EACH c IN Components
IF c.Name = "gb.debug" THEN

Impeccable, ça fonctionne, merci.
vuott#4 Posté le 5/7/2017 à 16:56:28
Ne cedere ineluctabili possimus.
« Vita non suavis esse potest, nec Mors amara. »
vuott#5 Posté le 5/7/2017 à 17:08:16
Ne cedere ineluctabili possimus
la présence du composant gb.debug, qui est forcement chargé dans l'IDE

...mais la présence du Composant gb.debug n'est pas une garantie absolue, parce qu'il peut également être aussi utilisé extra IDE. :|
« Vita non suavis esse potest, nec Mors amara. »
Flachy Joe#6 Posté le 6/7/2017 à 10:04:17
Iguane : Il Gambas Uniquement pour Activer ses NEurones@vuott effectivement, c'est pour ça que j'ai précisé
mais qui sinon ne l'est que si tu le coches dans les propriétés du projet.


De fait ce composant n'est utilisé que dans l'IDE ou apparenté cad un projet qui servirai à debuger du code gambas.
;) Flachy Joe ;)
vuott#7 Posté le 6/7/2017 à 15:22:35
Ne cedere ineluctabili possimusJe compris.
« Vita non suavis esse potest, nec Mors amara. »
1