 | Poiché Cornice5 non
provvede a salvare i caratteri presenti sul monitor, prima di coprirli
con l’area colorata,
l’immagine originale è persa
irrimediabilmente.
|
Esempio di
Applicazione |
|
 |
 |
 |
|
PROGRAM Prova_Cornice5;
USES Crt,
giobe;
VAR tasto:char;
BEGIN
Viacur;
{************************************}
Riempi1(7,1,' ');
{*
Clearscreen con il carattere ''*}
{* con colore Blu(1) su Bianco (7) *}
{************************************}
{Cornice5 (rig,lar,alt,txt,sfo,tipo,modo);}
Cornice5 ( 5
, 40, 15, 15, 1 , 1 ,
1 );
tasto:=readkey; {**************************************}
GotoXY (1,25); {* Aspetta un tasto e poi torna a DOS *}
RipCur; {**************************************}
END.
|
|
“), in
“modo”=1, cioè con l’aggiunta di uno spazio a sinistra e a destra dei lati verticali del bordo.
