GRY-Online.pl --> Archiwum Forum

Pascal - operacje na pliku

17.04.2004
17:03
[1]

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.

17.04.2004
17:30
[2]

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?

17.04.2004
17:36
[3]

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

17.04.2004
20:56
[4]

diabelek1 [ szczęśliwy ]

fanlegii79-> cos mi ie chce dzialac... jade na Turbo Pascalu...
Qbaa -> to jest chyba to.. jeszcze musze runtime wyrzucic :)

17.04.2004
21:01
[5]

_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

17.04.2004
21:39
[6]

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:)

17.04.2004
22:25
[7]

diabelek1 [ szczęśliwy ]

Juz dziala - sposob Qbaa jest spox :). A te bibloiteki sa w Turbo Pascal for Windows :)

17.04.2004
22:30
[8]

Ayertienna [ Konsul ]

no jest jeszcze FSearch (uses dos;)
:)

18.04.2004
00:04
[9]

Qbaa [ Generaďż˝ ]

FSearch nie znalazłem (szukałem tylko z początkiem File :))
ale dzięki, zapamiętam sobie :)

© 2000-2025 GRY-OnLine S.A.