Borland pascal - zmena pozadia

PiDi · Príspevok od používateľa **PiDi** » 08 nov 2007, 17:48

Neviete prosim Vas ako sa zmeni farba pozadia?za odpoved dakujem

neppo

PiDi napísal:Neviete prosim Vas ako sa zmeni farba pozadia?za odpoved dakujem

program background_color;
uses crt,graph;
var GD,GM:integer;
begin
   GD:=detect;
   initgraph(GD,GM,'D:\BP\BGI'); {zmen si vlastnu cestu k suboru}
   cleardevice;
   setbkcolor(2); {farba pozadia bude zelena}
   readln;
end.

Mek · Príspevok od používateľa **Mek** » 09 nov 2007, 13:52

ano, to je pre graficky rezim,
pre textovy by stacilo

Kód: Vybrať všetko

textbackground(magenta);
clrscr;

mek, ale to ti zmeni iba farbu za textom, nie? ak ma v prvom riadku iba 40 znakov tak mu zafarbi len polovicu prveho riadku a zvysok bude klasicka farba (alebo sa myslim?)

Dawn · Príspevok od používateľa **Dawn** » 09 nov 2007, 14:41

v pripade, ze da clrscr pred textbackground, bude cele pozadie take, ake si zvoli.

Mek · Príspevok od používateľa **Mek** » 09 nov 2007, 23:17

audiotrack napísal:mek, ale to ti zmeni iba farbu za textom, nie? ak ma v prvom riadku iba 40 znakov tak mu zafarbi len polovicu prveho riadku a zvysok bude klasicka farba (alebo sa myslim?)

clrscr zmaze predsa vzdy celu obrazovku, nech uz ma nastaveny akykolvek textovy rezim. a ked dame textbackground pred clrscr, tak sa zmaze cela obrazovka aktualnou farbou (hmm, teraz mi napada, ci farbou pozadia alebo popredia...? ale asi pozadia, no ruku do ohna by som za to nedal).

Dawn · Príspevok od používateľa **Dawn** » 10 nov 2007, 19:17

Mek napísal:clrscr zmaze predsa vzdy celu obrazovku, nech uz ma nastaveny akykolvek textovy rezim. a ked dame textbackground pred clrscr, tak sa zmaze cela obrazovka aktualnou farbou (hmm, teraz mi napada, ci farbou pozadia alebo popredia...? ale asi pozadia, no ruku do ohna by som za to nedal).

omg ved to iste som napisal ja...

Borland pascal - zmena pozadia

Borland pascal - zmena pozadia

Re: Borland pascal - zmena pozadia