MyCity » Pascal » kako da promenim boju karaktera u paskalu ?

kako da promenim boju karaktera u paskalu ?

Napisano na dan: 23.1.2012

kako da promenim boju karaktera u paskalu ?
Sledeća strana Pagination

Idi na vrh

Poslao: 23 Jan 2012 14:59
Idi na vrh
offline
  • Pridružio: 07 Apr 2011
  • Poruke: 88

Ovako,napravio sam program koji ispisuje brojeve i slova (fazon kao u matriksu),samo neznam kako da obojim slova da mi budu zelena.Zna li neko kako da namestim to ?



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 23 Jan 2012 16:43
Idi na vrh
offline
  • dr_Bora  Male
  • Anti Malware Fighter
    Rank 2
  • Pridružio: 24 Jul 2007
  • Poruke: 12280
  • Gde živiš: Höganäs, SE

TextColor();

[Link mogu videti samo ulogovani korisnici]



Poslao: 23 Jan 2012 17:51
Idi na vrh
offline
  • Pridružio: 07 Apr 2011
  • Poruke: 88

Da,ali mi sada ne ispisuje brojeve brzo,nego samo ispise krajnji broj....ja stavim ovako :
for a:=1 to 6000 do
TextColor(Green);
write(a);
I on mi ispise samo 6000 zalenom bojom,a kad skinem text color onda radi normalno,samo beli brojevi

Poslao: 23 Jan 2012 18:05
Idi na vrh
offline
  • dr_Bora  Male
  • Anti Malware Fighter
    Rank 2
  • Pridružio: 24 Jul 2007
  • Poruke: 12280
  • Gde živiš: Höganäs, SE

Program radi to što si mu rekao: 6000 puta postavi boju teksta na zelenu i jednom ispiše a.

Uses Crt; Var a : integer; Begin   For a:=1 To 6000 Do     begin       TextColor(Green);       Write(a);     end; End.

Uses Crt; Var a : integer; Begin   TextColor(Green);   For a:=1 To 6000 Do Write(a); End.

Poslao: 23 Jan 2012 18:11
Idi na vrh
offline
  • Pridružio: 07 Apr 2011
  • Poruke: 88

Ah,da,zaboravio sam da stavim opet begin posto ima 2 naredbe,hvala Smile samo ne treba write('a') nego samo write(a),zato sto bi u slucaju sa navodnicima 6000 puta ispisalo slovo a,sve u svemu hvala Smile

MyCity » Pascal » kako da promenim boju karaktera u paskalu ?

Ko je trenutno na forumu
 

Ukupno su 1636 korisnika na forumu :: 33 registrovanih, 3 sakrivenih i 1600 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 20624 - dana 04 Apr 2026 04:18

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 33 bren, airliners, alberto, Banovo Brdo, BraneS, BUDDAR70, Chainsaw, Demi87, Dovla 1980, Gheljda, IQ116, Ir, ivan1973, Jablan, KAIS, kutija11, ladro, ljuba.b, Marko Marković, mikhailo, Milan A. Nikolic, Milos82, pavle_pzs, radza1, saki80, Semprini, Tafocus, tomigun, Troki, vathra, Veless, vidra1, yrraf