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.

  1. Uses Crt;
  2.  
  3. Var a : integer;
  4.  
  5. Begin
  6.   For a:=1 To 6000 Do
  7.     begin
  8.       TextColor(Green);
  9.       Write(a);
  10.     end;
  11. End.


  1. Uses Crt;
  2.  
  3. Var a : integer;
  4.  
  5. Begin
  6.   TextColor(Green);
  7.   For a:=1 To 6000 Do Write(a);
  8. 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 1079 korisnika na forumu :: 83 registrovanih, 7 sakrivenih i 989 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: 39mm, acatomic, airsuba, alternator, amaterSRB, AndrejPetar, aramis s, Armadillo, Asparagus, Asteker, babaroga, Balvan, boj.an, Boris90, Bubimir, BZ, ccoogg123, Chainsaw, chichabg, cifra, Coabelgrade, Denaya, Dimitrise93, Dorcolac, dule10savic, Electron, g_g, gasa97, Gerilac, goran.vvv, hyla, Insan, Japidson, Jeremiah, jodzula, Jozo74, Kalem, kunktator, Leonov, lesa, Lester Freamon, Manjane, Markoni958, max power, MB120mm, mean_machine, Medojed, mercedesamg, Micko97, Milan Miscevic, milanmi87, Milometer, Nele79, Novakomp, opt1, precan, Qvazimodo, raptorsi, raster12, Rebel Frank, repac, S2M, sale755, sekretar, Sir Budimir, spalev, Sr.Stat., Stoorb, Str2022, Tribal, TRZH92, Tvrtko I, Velički, vladaa012, vladetije, Voice1, Vojkan Petrovic, vuk77, vukovi, YU-UKI, Zukov, šumar bk2, 79693