Jak załadować plik do zmiennej TextFile z filename open dialog? i save?
podczas dzialania prograu wystepuje mi blad!!!
Pochwalony!
Sorki, za bardzo nie pokumowywuje o co Ci chodzi ale może o to :P:
var
TF: TextFile;
begin
if OpenDialog1.Execute then
if OpenDialog1.FileName '' then
if FileExists(OpenDialog1.FileName) then
begin
AssignFile(TF, OpenDialog1.FileName);
Reset(TF);
{...coś tam...}
CloseFile(TF);
end;
end;
Mam nadzieję że pomogłem :P
Pochwalony!
Sorki, za bardzo nie pokumowywuje o co Ci chodzi ale może o to :P:var
TF: TextFile;
begin
if OpenDialog1.Execute then
if OpenDialog1.FileName '' then
if FileExists(OpenDialog1.FileName) then
begin
AssignFile(TF, OpenDialog1.FileName);
Reset(TF);
{...coś tam...}
CloseFile(TF);
end;
end;Mam nadzieję że pomogłem :P
a po tyle tego?
if OpenDialog1.FileName '' then
if FileExists(OpenDialog1.FileName) then
hm? jezeli wybierasz plik z OpenDialog to chyba zwracasz juz od razu wartosc ze plik istnieje, chyba ze zniknie w mgnieniu oka, czyli w tym samym czasie co klikasz w przycisk otworz...............i jeszcze raz if fileexists ghehehehehhehe