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 - Problema libreria WinDos
Forum - Pascal - Problema libreria WinDos

Pagine: [ 1 2 ] Precedente | Prossimo
Avatar
Mak (Normal User)
Rookie


Messaggi: 23
Iscritto: 17/08/2008

Segnala al moderatore
Postato alle 18:39
Domenica, 17/08/2008
Ciao a tutti :)
Ho un problema con la libreria WinDos, quando vado a compilare un programma, dove serve questa libreria, viene fuori questo errore: "Error 15: File not found (WINDOS.TPU)". Come posso risolvere? (ho usato Turbo Pascal 6, 7 e Free Pascal). Grazie in anticipo

PM Quote
Avatar
totipianurese (Member)
Pro


Messaggi: 168
Iscritto: 24/06/2008

Segnala al moderatore
Postato alle 8:57
Lunedì, 18/08/2008
Pubblica il sorgente quì, e vedo cosa posso fare
;)

PM Quote
Avatar
Mak (Normal User)
Rookie


Messaggi: 23
Iscritto: 17/08/2008

Segnala al moderatore
Postato alle 9:41
Lunedì, 18/08/2008
Il sorgente lo trovi nella guida Pascal di questo sito, al capitolo 7 (La struttura iterativa Repeat...until). Ho provato a usare Turbo Pascal 7.0, come consigliato, ma viene sempre fuori l'errore 15...

PM Quote
Avatar
totipianurese (Member)
Pro


Messaggi: 168
Iscritto: 24/06/2008

Segnala al moderatore
Postato alle 21:04
Lunedì, 18/08/2008
Senti, io nn so quel programma cosa fà, ma mi sono limitato solo a coreggere gli errori. Questo è il sorgente corretto da me;
Codice sorgente - presumibilmente Delphi

  1. Program Esempio2;
  2. Uses Crt,windows;
  3. Var nome1,nome2,stringa:string;
  4.     file1,file2:text;
  5.  
  6. begin
  7.     clrscr;
  8.     write('Inserire il nome di un file: ');
  9.     readln(nome1);
  10.     write('Inserire il nome del file copia: ');
  11.     readln(nome2);
  12.     Assign(file1,nome1);
  13.     Assign(file2,nome2);
  14.     Reset(file1);
  15.     Rewrite(file2);
  16.     repeat
  17.     readln(file1,stringa);
  18.     writeln(file2,stringa);
  19.     until eof(file1);
  20.     Close(file1);
  21.     Close(file2);
  22.     writeln('Copia completata!');
  23.     readln
  24. end.



ciao, fammi sapere :)

PM Quote
Avatar
Mak (Normal User)
Rookie


Messaggi: 23
Iscritto: 17/08/2008

Segnala al moderatore
Postato alle 21:51
Lunedì, 18/08/2008
Grazie per l'aiuto, ma purtroppo l'errore rimane...
Ho visto che hai corretto il nome della libreria, ma mi sa che non è li l'errore.
Forse manca a me la libreria WinDos (?)

PM Quote
Avatar
totipianurese (Member)
Pro


Messaggi: 168
Iscritto: 24/06/2008

Segnala al moderatore
Postato alle 8:35
Martedì, 19/08/2008
No, fai copia ed incolla con il sorgente che ho inserito sopra. Se vedi bene, quando scrivi WRITE e poi apri la parentesi tonda, gli apici che c'erano prima erano errati, servono questi quì ('Ciao').
ok?

PM Quote
Avatar
Mak (Normal User)
Rookie


Messaggi: 23
Iscritto: 17/08/2008

Segnala al moderatore
Postato alle 12:50
Mercoledì, 20/08/2008
Ho fatto copia e incolla, ma l'errore è proprio nella libreria...
Comunque, non ho capito l'errore degli apici: a me sembrano giusti... boh!

PM Quote
Avatar
Fedingo (Ex-Member)
Newbie


Messaggi: 11
Iscritto: 05/11/2007

Segnala al moderatore
Postato alle 23:51
Mercoledì, 20/08/2008
Neanche io vedo errori agli apici... penso proprio manchi la libreria Windos... prova ad andare sulla cartella di turbopascal e cerca il file Windos.TPU se non lo trovi è li il problema... Cmq il Sorgente non ha problemi... penso siano problemi di turbopascal... Se non hai la libreria dimmelo, provvedo a mandartela via E-mail...

PM Quote
Avatar
Mak (Normal User)
Rookie


Messaggi: 23
Iscritto: 17/08/2008

Segnala al moderatore
Postato alle 9:17
Domenica, 24/08/2008
Ho trovato la librereia nella cartella "Units", ho provato anche a spostarla ma niente...

PM Quote
Pagine: [ 1 2 ] Precedente | Prossimo