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 2427 korisnika na forumu :: 101 registrovanih, 10 sakrivenih i 2316 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

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

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: -[CoA]-, 33 bren, aramis s, bavar357, BB, Betty25, Bickoooo, Bojan198527, Boroš, Bubimir, C-Gun, Cirkon, Coficab, cole77, Colt D, darcaud, Despot1, Djota1, dolinalima, Dorcolac, draganl, drimer, due, dusan.l, Electron, EVIDENTICAR, Flanker-G, Fliper, Gadafi1111, ghoost, Giskard, Goran_, GORDI, Holy Saber, Igritelj, Istman, ivan1973, ivan979, Ivoo, jarovitt, jeen yuhs, JimmyNapoli, jodzula, Joksss, JOntra, kibihrchak, komenski, Korle, leptirleptir, Malahit, mane123, markolopin, Maschinekalibar, Mastrum Ridkali, max power, mercedesamg, Mercury, Meteor1, mikki jons, MunzeKonze, mux, nebojsag, Nele79, nenad81, nenooo, Nepopravljivi, neutrino, Parker, pceklic, pein, Pilence, Polemarchoi, Polifon, procesor, Pururin, raster12, Rebel Frank, redstar011, Romuluss, royst33, Samo gledam, Sharpshooter, SIG SG550, Sky diver 29, smuk, Srki98, trpche, tubular, tuf, virked, VJ, Voice1, vrag81, Vzor50, Zdenko, ziggga, zlaya011, zoran77, zoranjev, Zukov, zzapNDjuric99