[PASCAL] Komenda otwierająca plik *.txt

Witam!

Czy w TURBO Pascalu istnieje komenda, która otworzy mi plik tekstowy z rozszerzeniem .txt ? Jeśli tak, to proszę o podanie :wink:

Z GÓRY DZIĘKI ZA POMOC :wink:

:arrow: http://turbopascal.skryptoteka.pl/13.html

edit: (;

http://turbopascal.skryptoteka.pl/13.html

chodzi mi o to, żeby windows otworzył w nowym oknie …

Exec(GetEnv('comspec'),'/c c:\x.txt'); [/code]

O to ci chodzi?

Niestety, wyskakuje błąd :confused:

To napisz jaki, nie ma tu jasnowidzów. Ale zakładam ze zapomniałeś w uses dopisać Dos.

Sorki, że nie napisałem - przesyłam 2 SCREENY: pierwszy to błąd, a drugi to fragment kodu…

  1. dedd087ee7f7d980m.jpg

  2. 1b5315a590e15580m.jpg

Masz niesparowane nawiasy w przedostatniej linii (od razu widać!)

Dobra skomilowałem i nie otwiera mi się! dodatkowo nie chce mi się w tym pliku nic napisać, bo chodzi mi o to, że ja chciałbym wpisać w ten plik txt., używając kodu:

assign (dowydruku, 'dowydruku.txt');

rewrite (dowydruku);

writeln (...);

writeln (...);

writeln (...);

writeln (...);

close (dowydruku);

Inaczej mówiąc chodzi mi o to, żeby do pliku tekstowego zostało wpisane, to co wpiszę do kodu, np. jeśli mam zmienną:

var

liczba1;

to chciałbym, żeby, jak wpiszę kod:

rewrite (dowydruku);

writeln ('czy chcesz dodać ', liczba1, '?');

Może muszę w zmiennej pliku zamiast wpisać

var

dowydruku : file of string

wpisać

var

dowydruku : text

I żebym później komendą włączył ten plik tekstowy…

?? Pomóżcie :smiley: :slight_smile: Z góry dziękuję za odpowiedź :slight_smile:

Czy istnieje ten plik który się nie otwiera?

użyj:

var liczba1:string;

writeln (‘czy chcesz dodać ‘+liczba1+’?’);

Co oznacza “komendą włączył ten plik tekstowy” - nie mam pojęcia, proszę o wyjaśnienie.

dobra po prostu chcę wiedzieć co mam wpisać, żeby otworzyć plik .txt, bo Twoje:

Zwyczajnie nie działa!

Chciałbym, żeby podczas pracy programu uruchomił się plik .txt - żądany przeze mnie - aby się normalnie uruchomił w nowym oknie…

Możesz uściślić “Zwyczajnie nie działa!” ?

To polecenie otwiera w notepadzie plik x.txt zapisany w folderze głównym dysku c:

Nie podałeś jak zmodyfikowałeś to polecenie, podejrzewam że zrobiłeś to niepoprawnie.

6a910a2883157393m.jpg

tak to wpisałem i się nie włącza, a na dysku C jest, w folderze ‘Disc1’ też :wink:

Exec(GetEnv('comspec'),'/c c:\disk1\dowydruku.txt'); [/code]

No chyba że folder disk1 nie znajduje się wprost na dysku c:

Trzeba podać pełną ścieżkę

Problem jest w tym, że ta ścieżka jest tak długa, że nie mogę jej zmieścić :smiley: a jak przenoszę to wyskakuję błąd:

String constant exeeds line

To od tego trzeba było zaczynać. Pokażcie jak się przenosi.

Exec(  GetEnv('comspec'),  '/c '+  'c:'+  '\disk1'+  '\dowydruku.txt'); [/code]