Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Pascal - colore testo
Forum - Pascal - colore testo

Avatar
Matyu93 (Normal User)
Newbie


Messaggi: 3
Iscritto: 03/12/2009

Segnala al moderatore
Postato alle 15:35
Venerdì, 04/12/2009
ciao scusate ho appena iniziato con il linguaggio pascal qualcuno mi sa per favore spiegare come fare a colorare il testo che srivo per esempio di verde o di rosso... grazie

Ultima modifica effettuata da Matyu93 il 04/12/2009 alle 15:54
PM Quote
Avatar
Anonymous (Member)
Guru


Messaggi: 1059
Iscritto: 30/07/2006

Segnala al moderatore
Postato alle 17:52
Venerdì, 04/12/2009
prova cosi:
Codice sorgente - presumibilmente Plain Text

  1. textcolor(14)
  2. writeln('Ciao, guarda che bella scritta gialla ');



oppure ancora:

Codice sorgente - presumibilmente Delphi

  1. for i:=0 to 15 do
  2. begin
  3. textcolor(i);
  4. writeln('colore numero ',i);
  5. end;



ciuao

Ultima modifica effettuata da Anonymous il 04/12/2009 alle 17:54
PM Quote
Avatar
Matyu93 (Normal User)
Newbie


Messaggi: 3
Iscritto: 03/12/2009

Segnala al moderatore
Postato alle 15:24
Sabato, 05/12/2009
Testo quotato

Postato originariamente da Anonymous:

prova cosi:
Codice sorgente - presumibilmente Plain Text

  1. textcolor(14)
  2. writeln('Ciao, guarda che bella scritta gialla ');



oppure ancora:

Codice sorgente - presumibilmente Delphi

  1. for i:=0 to 15 do
  2. begin
  3. textcolor(i);
  4. writeln('colore numero ',i);
  5. end;



ciuao



non so se centra qualcosa io ho dev.pas però non me lo fa mi da io l'ho provato su un programma facile guarda questo è il programma cosa sbaglio?

program scambio;
        var a,b,c:integer;
        textcolor:char;
begin
textcolor(14);
     writeln('scrivi il valore del primo numero');
     readln(a);
     writeln('scrivi il valore del secondo numero');
     readln(b);
     c:=a;
     a:=b;
     b:=a;
     writeln('il valore del primo numero invertito e''',a);
     writeln('il valore del secondo numero invertito e''',c);
readln;
end.

PM Quote
Avatar
Anonymous (Member)
Guru


Messaggi: 1059
Iscritto: 30/07/2006

Segnala al moderatore
Postato alle 15:46
Sabato, 05/12/2009
deiv inserire la libreria crt

quindi dopo a
Codice sorgente - presumibilmente Pascal

  1. program scambio;


metti subito:
Codice sorgente - presumibilmente Pascal

  1. uses crt;



e togli la variabile di tipo char


cmq al posto dei numeri, all'interno di textcolor() puoi mettere direttamente il nome in inglese del colore che vuoi...

a questo link trovi una tabella dove ci sono i colori che puoi usare..

http://www.giobe2000.it/Pascal/LibrerieStandard/Crt/TextCo ...

Ultima modifica effettuata da Anonymous il 05/12/2009 alle 15:48
PM Quote