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();

http://www.programmerprogramming.com/programming_pascal_learn02.html



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 1046 korisnika na forumu :: 40 registrovanih, 3 sakrivenih i 1003 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 357magnum, _Rade, aramis s, Avalon015, Ben Roj, bigfoot, bojan_t, bojank, colji, darkangel, gasha, Gerila015, HogarStrashni, ILGromovnik, Kubovac, kubura91, kybonacci, mercedesamg, Metanoja, mikrimaus, mile23, milenko crazy north, mkukoleca, Panter, Povratak1912, raketaš, rodoljub, sasa87, Sir Budimir, Sirius, Snorks, Srle993, TalicniTom, Toper, UAV operator, vathra, VJ, voja64, x9, ZetaMan