Binaire

Commande de compilation...
Commande d'exйcution...
Fichier source...

upscmp Source=binaire.upl

Revenir en haut de la page...

binaire

Revenir en haut de la page...

Source Composant "Exemple d'emploi de type Binaire" Version 1.0.0;

Principal
Variable Debut
B=Binaire("Binaire : вко");
Ecran.Ecrire(Caractere(B));
B=Binaire("Binaire")+Binaire(" : вко");
Ecran.Ecrire(Caractere(B));
B=Binaire("Binaire");
B+=Binaire(" : вко");
Ecran.Ecrire(Caractere(B));
B=Binaire("Binaire : вко");
B=-B;
Ecran.Ecrire(Caractere(B));
L=B.Longueur();
Ecran.Ecrire(L);
B=Binaire("Binaire : вко").Gauche(3);
Ecran.Ecrire(Caractere(B));
B=Binaire("Binaire : вко").Droite(3);
Ecran.Ecrire(Caractere(B));
B=Binaire("Binaire : вко").Milieu(2,5);
Ecran.Ecrire(Caractere(B));
L=Binaire("A").Unicode(0);
Ecran.Ecrire(L);
B=Binaire("Binaire");
B+=Binaire(" : вко");
Si B==Binaire("Binaire : вко") Alors Fin Si
Si B!=Binaire("Binaire : вко") Alors Fin Si
Fin Principal

Revenir en haut de la page...