sprawdzenie,czy istnieje dany plik .....

Thread View: pl.comp.lang.pascal

2 messages

[T] Back to Threads [V] Tree View [G] Group Articles

2 total messages Started by skorpion Thu, 07 Jan 1999 16:13

#1226

Author: skorpion
Date: Thu, 07 Jan 1999 16:13

11 lines
1116 bytes

Mozecie mi napisac kod zrudlowy programu, ktory
sprawdza czy istnie np. plik :  C:\Windows\mm.bmp i jezeli takowy
jest to :
writeln('Dany plik istnieje');
a jezeli nie ma takiego, to :
writeln('Dany plik nie istnieje !');

Bede wdzieczny za odpowiedz ....
Pozdrawiam

(Turbo Pascal 7.0)

Re: sprawdzenie,czy istnieje dany plik .....

#1227

Author: Kowal
Date: Thu, 07 Jan 1999 16:44

14 lines
977 bytes

var f : file
begin
  assign(f, 'jakis_plik');
  {$I-} reset(f) {$I+}
  if IORelsult = 0 Then
    write('instenije')
  else
    write('nie istnieje');

end.

Nastepny m razem pomysl chwile zanim wyslesz tak banalne pytanie na grupe.

Kowal ( kowal2@friko6.onet.pl )

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads