Unit T_BiancoDOS

Classes

TBiancoDOS -

Functions

Register -

Types

REC
WIN

Constants

COLORI
LINES
ROWS

Variables


Functions


procedure Register;


Types


REC = record
C : CHAR;
F : TCOLOR;
B : TCOLOR;
end;

WIN = record
AX : INTEGER;
AY : INTEGER;
BX : INTEGER;
BY : INTEGER;
end;

Constants

COLORI = (CLBLACK,CLBLUE,CLGREEN,CLMAROON,CLRED,CLOLIVE,CLNAVY, CLPURPLE,CLTEAL,CLGRAY,CLSILVER, CLLIME,CLFUCHSIA, CLAQUA,CLYELLOW,CLWHITE)

\\\\\///// / _ _ \ (| (.) (.) |) _______________________________.OOOo__( )__oOOO.______________________________ | | | This is my Tcomponent | | Ciao Marco | | Email bianco@arcanet.it | | | | DATA: INIZIO: FINE: LAVORO: | | | | 10-09-97, 19:19:55, 03:33:36 INIZIATO A CONVERTIRE IL VECCHIO FILE. | |_______________________________.oooO__________________________________________| ( ) Oooo. \ ( ( ) \_) ) / (_/

LINES = 24

ROWS = 79


Variables