Téléchargé 6 fois
Vote des utilisateurs
1
0
Détails
Licence : Non renseignée
Mise en ligne le 10 décembre 2010
Plate-forme :
Windows
Langue : Français
Référencé dans
Navigation
Unité pour tp7
Unité pour tp7
Une unité bien pratique qui contient les fonctions
function StringToInt(s : string) : integer;
function IntToString(i : integer) : string;
procedure fenetre(X1 : integer; Y1 : integer; X2 : integer; Y2 : integer); (fenetre a double bordure)
procedure dec(i : integer; a : integer); decrementer
procedure centrer(s : string; y : integer); centre une chaine pour un y donné
procedure instcolorln(i :string;e : byte;b : byte); couleur sur une ligne e=nouvelle couleur et b = ancienne couleur
procedure instcolor(i :string;e : byte;b:byte); la même chose sans aller à la ligne
procedure pleinecran;
function on_click_button(x1,y1,x2,y2:integer):boolean; a faire marcher ^^
procedure initmouse;
j'ai crée ces quelques fonctions afin de facilité ma vie et celle de certains programmeurs.
Si vous avez des suggestion n'hésitez pas.
compilable sous tp7 dos reel et windows
Titeeee
function StringToInt(s : string) : integer;
function IntToString(i : integer) : string;
procedure fenetre(X1 : integer; Y1 : integer; X2 : integer; Y2 : integer); (fenetre a double bordure)
procedure dec(i : integer; a : integer); decrementer
procedure centrer(s : string; y : integer); centre une chaine pour un y donné
procedure instcolorln(i :string;e : byte;b : byte); couleur sur une ligne e=nouvelle couleur et b = ancienne couleur
procedure instcolor(i :string;e : byte;b:byte); la même chose sans aller à la ligne
procedure pleinecran;
function on_click_button(x1,y1,x2,y2:integer):boolean; a faire marcher ^^
procedure initmouse;
j'ai crée ces quelques fonctions afin de facilité ma vie et celle de certains programmeurs.
Si vous avez des suggestion n'hésitez pas.
compilable sous tp7 dos reel et windows
Titeeee
Les fonctions sont elles pour le mode console ou le mode graphique?
Pour le mode console, elles ont été programmer à la base sur mon NT4.00 puis porter sur Xp familiale sans aucun problèmre
Si vous avez un problème de compilation veuillez a mettre le même nom entre le nom du fichier .pas et le nom de l'unité; à la ligne unit.
Developpez.com décline toute responsabilité quant à l'utilisation des différents éléments téléchargés.