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 2340 korisnika na forumu :: 86 registrovanih, 9 sakrivenih i 2245 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: AC-DC, Apok, Arhiv, ArmFPGA, Asparagus, Asteker, bbogdan, Belac91, Bo96, bobomicek, bojanstros9, bojcistv, BraneS, bunker, CrveniSolaris, darionis, dejan1972, Demi87, Denaya, Dixtrix, DonRumataEstorski, Draganeli, Duh16, dushan, Electron, esko_hz, EVIDENTICAR, FOX, Georgius, HogarStrashni, istokzapad, jarovitt, jeen yuhs, Jester, JOntra, Jozo74, ladro, Laluvr, MB120mm, mercedesamg, MIG-3, milbos, Mile14, Miler88, milos97, mnn2, mocnijogurt, nekdo, nemkea71, nikoli_ca, Paklenica, Pancevac, Panter, pein, Piani Jazzer, ping15, PlayerOne, Podljub, proka89, proljece, pzoca, radza1, Semberija, ShtagodShtagod, Sirius, slono, stegonosa, SympathyForTheDevil, tomo2, Tumansky, ujke, Uros Cuore Sportivo, Username1000, Vanderx, VBoss, Veless, VJ, vjekosuki, Vlada1389, vlado_pg, Volkhov-M, Vrač, yagosh, yufighter, ZetaMan, Žrnov