Un programme utilisant un module statique et un module dynamique

Commande de compilation...
Commande d'exécution...
Remarque...
Fichiers sources...

upscmp Source=exes

Revenir en haut de la page...

upsstr Module=exed

Revenir en haut de la page...

Cet exemple nécessite d'avoir compilé liba de l'exemple du module statique à deux composants et libbmodule dynamique à deux composants.

Revenir en haut de la page...

Source Composant "Exemple d'emploi de bibliothèques" Version 1.0.0;

ImporterModule
Variable Fonction FonPrincipal1() Retourner Entier
/***************************************/
Debut
Retourner 1;
Fin Fonction

Fonction FonPrincipal2() Retourner Reel
/*************************************/
Debut
Retourner 3.14;
Fin Fonction

Procedure ProPrincipal2(A : Entier, B : Reel Entree Sortie)
/*****************************************************/
Debut
Ecran.Ecrire(A);
B=200.1234;
Fin Procedure

Procedure ProPrincipal1(A : Entier Entree Sortie, B : Reel Entree Sortie)
/*******************************************************************/
Debut
ProPrincipal2(A, B);
A=100;
B=100.99;
Fin Procedure

Principal
/*******/
Debut
VarPrincipalA=1;
Ecran.Ecrire(VarPrincipalA);
VarPrincipalB=2.1;
Ecran.Ecrire(VarPrincipalB);
LibA.ProA1A(2, 3.2, LibA.EnuA1A_3);
LibB.ProB1A(3, 4.3, LibB.EnuB1A_3);
LibA.ProA2A(4, 5.4, LibA.EnuA2A_1);
LibB.ProB2A(5,6.5,LibB.EnuB2A_1);
Ecran.Ecrire(FonPrincipal1());
Ecran.Ecrire(FonPrincipal2());
Fin Principal

Revenir en haut de la page...