diabelek1 [ szczęśliwy ]
Pascal - operacje na pliku
Czy isteniej w Pascalu funkcja ktora szuka czy dany plik istnieje??. Nie chodzi mi o ReWrite - poniewaz uzywajac tego niszcze zawartoasc szukanego pliku.
fanlegii79 [ Konsul ]
Po 10 s googlowania, celem sprawdzenia pomyslu "open associates a permanent file with a file variable for reading or writing. open can also determine if a file actually exists.". Z ciekawosci jakiego kompilatora uzywasz?
Qbaa [ Generaďż˝ ]
a w helpie TP 7.1 znalazłem takie coś:
FileSch.PAS
_______________
Sample code for the FileSearch function.
uses WinCrt, WinDos;
var
S: array[0..fsPathName] of Char;
begin
FileSearch(S, 'TPW.EXE', GetEnvVar('PATH'));
if S[0] = #0 then
Writeln('TPW.EXE not found')
else
Writeln('Found as ', FileExpand(S, S));
end.
jestem początkujący, więc nie pytaj mnie o nic :D
diabelek1 [ szczęśliwy ]
fanlegii79-> cos mi ie chce dzialac... jade na Turbo Pascalu...
Qbaa -> to jest chyba to.. jeszcze musze runtime wyrzucic :)
_Robo_ [ Generaďż˝ ]
Czy tu chodzi o sprawdzenie czy plik o zadanje nazwie istnieje w danym katalogu? czy gdziekowliek na dysku? jak to pierwsze to zwykly open + sprawdzenie zwroconej wartosci
Chupacabra [ Senator ]
Qbaa --> to na pewno tp7?? No coz, az taki super znawca jego nigdy nie bylem ,ale nie pamietam takich bibliotek jak Wincrt czy windos, wyglada to na jakas windowsowa wersje:)
diabelek1 [ szczęśliwy ]
Juz dziala - sposob Qbaa jest spox :). A te bibloiteki sa w Turbo Pascal for Windows :)
Ayertienna [ Konsul ]
no jest jeszcze FSearch (uses dos;)
:)
Qbaa [ Generaďż˝ ]
FSearch nie znalazłem (szukałem tylko z początkiem File :))
ale dzięki, zapamiętam sobie :)