Pascal: procedure delay

[Albozzo]

Ragazzi, allora vorrei sapere come si usa la procedure delay con il linguaggio Pascal... nn riesco a capire!!!!!!!
fatemi sapere al + presto, grazie!

Alberto.

[Argosoft]

delay(millisecondi);

esempio:

writeln('ciao!');
delay(1000);
writeln('è passato un secondo dall'ultima volta che ti ho salutato! ');

devi mettere Crt su uses per poter usare il delay

ciauz!

[Albozzo]

Originariamente inviato da Argosoft
delay(millisecondi);

esempio:

writeln('ciao!');
delay(1000);
writeln('è passato un secondo dall'ultima volta che ti ho salutato! ');

devi mettere Crt su uses per poter usare il delay

ciauz!

Questo è il programma che ho fatto... io cmq uso BORLAND PASCAL e nn TURBO PASCAL, nn c'entra niente?
cmq... il prog mandato in esecuzione mi da tutti i messaggi ma nn aspetta di x secondi, capisci?

mi potresti fare un programma x intero come ho fatto io che aspetta dei secondi dati da tastiera oppure x secondi (costante)?
Grazie x l'aiuto.
Alberto.


program secondi;
uses wincrt;
var x:real;
procedure delay (x:real);
begin
end;
begin
writeln ('Ciao!');
writeln ('quanti secondi?');
readln (x);
delay (x);
writeln ('Sono passati 2 secondi da quando ti ho salutato');
end.

[Argosoft]

1) Borland Pascal e Turbo pascal..... si, c'è qualche differenza... per esempio proprio nel Crt comunque se non ti dà errori di compilazione vuol dire che dealy esiste anche lì

2) perché questo??

procedure delay (x:real); 
 begin 

 end;

certo che non aspetta! la procedura delay l'hai riscritta tu!
Delay è una procedura inclusa in Crt (almeno nel Turbo pascal), basta chiamarla. si fa: delay(tot), dove tot esprime quanti millisecondi si devono aspettare. mmmmh mi pare che... mi sta venendo in mente che nel tuo pascal questa procedura si chiama Sleep... mannaggia adesso non ce l'ho qui sottomano....

dovrebbe saltare fuori:

program prova;
uses WinCrt;      {purtroppo}

var sec: integer;

begin
   write('Quanti secondi vuoi aspettare? --> ');
   readln(sec);
   delay(sec*1000);
   writeln('Sono passati ',sec*1000,' secondi.');
   readln
end.

secondo il mio compilatore mentale dovrebbe funzionare....
altrimenti prova con sleep


ciauz!

[Albozzo]

Originariamente inviato da Argosoft
1) Borland Pascal e Turbo pascal..... si, c'è qualche differenza... per esempio proprio nel Crt comunque se non ti dà errori di compilazione vuol dire che dealy esiste anche lì

2) perché questo??

procedure delay (x:real); 
 begin 

 end;

certo che non aspetta! la procedura delay l'hai riscritta tu!
Delay è una procedura inclusa in Crt (almeno nel Turbo pascal), basta chiamarla. si fa: delay(tot), dove tot esprime quanti millisecondi si devono aspettare. mmmmh mi pare che... mi sta venendo in mente che nel tuo pascal questa procedura si chiama Sleep... mannaggia adesso non ce l'ho qui sottomano....

dovrebbe saltare fuori:

program prova;
uses WinCrt;      {purtroppo}

var sec: integer;

begin
   write('Quanti secondi vuoi aspettare? --> ');
   readln(sec);
   delay(sec*1000);
   writeln('Sono passati ',sec*1000,' secondi.');
   readln
end.

secondo il mio compilatore mentale dovrebbe funzionare....
altrimenti prova con sleep


ciauz!

nn lo so xkè ho scritto così sopra.... provavo visto che nn ho la + pallida idea di dove si trovi delay e come devo richiamarla!

cmq il programmino che hai fatto te... mi da: ERROR 3: Unknow Identfier e il cursore si ferma su delay!

mannaggia!

[Argosoft]

ma... hai provato con Sleep ?

[Albozzo]

Originariamente inviato da Argosoft
ma... hai provato con Sleep ?

yes..... mi da errore 3, cioè unknow identfier

[cionci]

Se vuoi usare Sleep devi includere le API di Windows... Sinceramente non so come si fa in Borland...