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 1869 korisnika na forumu :: 84 registrovanih, 4 sakrivenih i 1781 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 5623 - dana 13 Dec 2025 19:56

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 357magnum, ArmFPGA, Bickoooo, blatruc82, Boban0312, bojanubijus, Botovac, BZ, cifra, Daba75, darkojovxp, debeli, deks, dragan_mig31, DrNeoCortex, Duce, dunavzed, Electron, ElvisP, fijufijukrozkapiju55, gale48, goxin, GveX, igorkozar83, ikan, ILGromovnik, Imperator_Aleksandr_lll, istina, Jakonjveliki, Jan, jnikola23, jodzula, K a s p e r, kaisarevic1, Kajzer Soze, Kenanjoz, KimiMR, kripo, Kubovac, lima, loon123, luka35, m94j, MarijaC84, mercedesamg, miki kv, milutin134, MiroslavD, mkukoleca, mm1811, mnn2, Naj-Turs, nebkv, neutrino, nick79, opt1, Otto Grunf, Panter, Petar J, Pobednik06, proka89, Prometeus, raptorsi, rednap, redstar011, robertino, rodoljub, royst33, skvara, Smajser, srpskasparta, stegonosa, TripleMMM, Troja, Uros Cuore Sportivo, vathra, vensla, Vojkan Petrovic, vojnik švejk, Volkhov-M, x011, XBMC, yip314, Zeljo980