|
|||||||
|
|
|
![]() |
|
|
Strumenti |
|
|
#1 |
|
Senior Member
Iscritto dal: Sep 1999
Messaggi: 670
|
Pascal e l'istruzione seek...
Salve avrei bisogno di leggere un campo all'interno di un file e per fare ciò devo spostare il puntatore all'interno del file, mi hanno suggerito di usare l'istruzione seek, ma non sò in che modalità, infatti facendo:
Seek (Passfile, 42) Nella compilazione ho un errore di sintassi e di fatto il programma non funziona...sbaglio qualcosa, avete qualche consiglio?? |
|
|
|
|
|
#2 |
|
Member
Iscritto dal: Feb 2002
Messaggi: 51
|
il punto e virgola l'hai messo? che errore ti da precisamente?
|
|
|
|
|
|
#3 |
|
Senior Member
Iscritto dal: Sep 1999
Messaggi: 670
|
Si, ho messo il punto e virgola, l'errore è questo:
La parte di codice interessata è questa... Codice:
assign (passfile,'C:Progra~1/NetSup~1/Client32.ini');
reset (passfile);
SEEK (passfile, 42);
i:=0;
while not eof(passfile) do
begin
line:='';
while not EoLn(passfile) do
begin
Read(passfile, ch);
line:=line+ch;
if line='Password=' then begin
while not eoln(passfile) do
begin
inc(i);
read(passfile,ch);
password[i]:=ch;
end;
length:=i;
end;
end;
readln(passfile,line);
end;
|
|
|
|
|
|
#4 |
|
Member
Iscritto dal: Feb 2002
Messaggi: 51
|
non so aiutarti... faccio delle prove ok?
|
|
|
|
|
|
#5 |
|
Senior Member
Iscritto dal: Sep 1999
Messaggi: 670
|
Ok, grazie lo stesso
|
|
|
|
|
| Strumenti | |
|
|
Tutti gli orari sono GMT +1. Ora sono le: 13:10.



















