Source Composant "Up ! Debugger" Version 4.0.0;
ImporterModule
/************/
UpsDbg(<UpsDbg.upi>, ImporterDefinitions);
Parametre <UpsDbg> Section "UpsDbg"
/*********************************/
Prive :
/*******/
URIMiseAuPoint : Nul Ou Caractere;
NomFichierCommandes : Nul Ou Caractere;
Principal
/*******/
Debut
Si URIMiseAuPoint==Nul Alors
Ecran.Ecrire(Message(UpsDbg, "UsageUpsDbg"));
Fin Si
ArreterProgramme(0);
Retourner 1;
InterpreterCommandes(URIMiseAuPoint, NomFichierCommandes);
Retourner 0;
Fin Principal