Otwieranie plików i błąd

Odpowiedz Nowy wątek
2006-11-28 18:17

Rejestracja: 14 lat temu

Ostatnio: 8 lat temu

0

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??

Pozostało 580 znaków

2006-11-28 18:39

Rejestracja: 16 lat temu

Ostatnio: 7 lat temu

0

zamiast względnej ścieżki do pliku podawaj bezwzględną

ExtractFilePath(Application.ExeName);


- Ciemna druga strona jest.
- Nie marudź Yoda, tylko jedz tego tosta.
Google NIE GRYZIE!
Pomogłem - kliknij

Pozostało 580 znaków

Odpowiedz

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0