Unité pour tp7

Présentation
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

Téléchargement
Compatibilité
Windows
1  0 
Téléchargé 20 fois Voir les 3 commentaires
Détails
Avatar de Titouan Créac'h
Membre éprouvé
Voir tous les téléchargements de l'auteur
Licence : Autre
Date de mise en ligne : 10 décembre 2010




Avatar de darrylsite darrylsite - Rédacteur https://www.developpez.com
le 04/12/2010 à 12:07
Les fonctions sont elles pour le mode console ou le mode graphique?
Avatar de EpiTouille EpiTouille - Membre éprouvé https://www.developpez.com
le 05/12/2010 à 18:40
Pour le mode console, elles ont été programmer à la base sur mon NT4.00 puis porter sur Xp familiale sans aucun problèmre
Avatar de EpiTouille EpiTouille - Membre éprouvé https://www.developpez.com
le 06/12/2010 à 12:11

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.
Responsables bénévoles de la rubrique Pascal : Gilles Vasseur - Alcatîz -