Witam!
Mam procedurkę:
assignfile(f,'id\id.txt');
reset(f);
readln(f,tmp);
id:=strtoint(tmp);
closefile(f);
if opendialog.FileName<>''then
if not(copyfile(nazwa,n,false)) then
showmessage('Kopiowanie nie powiodło się!');
Gdy nie wybiorę żadnego pliku poprzez OpenDialog to plik id.txt otwiera się bez problemu. Jeśli wybiore jakiś plik to wtedy wyskakuje błąd przy reset(text) Invalid name. Podejrzewam że chodzi o to, że w assignfile jest użyta ścieżka względna. Jak pobrać ścieżke z której uruchomiony jest program (oto bym prosił czy to jest powód błędu czy nie)?
A jeśli to nie to, to co??