Uruchamianie innych aplikacji exe Pascal


(Pawel Pieczyrak) #1

Witam. Czy jest taka możliwość w Pascalu aby uruchamiał on inny program exe ? Np. pisze menu w pascalu i opcja 1 uruchamia notatnik. Jeżeli jest, to prosiłbym o podanie kodu, polecenia. Z góry dziękuje.


(Adammo) #2

Free Pascal, czy Turbo Pascal?

Turbo Pascal:

unit dos;

komenda: Exec('sciezka do programu+nazwa programu','');

np.

Exec('c:\winnt\notepad.exe','');

Przy czym z tego co pamiętam w TP, trzeba było kombinować z dyrektywą {$M} - np. {$M 65520,0,327680}

Przykładowy program:

program exec;

{$M 65520,0,327680}


begin

 Exec('c:\winnt\notepad.exe','');

end.

Free Pascal:

Najlepiej zobacz: http://wiki.lazarus.freepascal.org/Executing_External_Programs


(Pawel Pieczyrak) #3

Ok. Działa, tylko teraz jak zrobić, aby po zamknięciu notatnika nie został również zamykany program.

P.S Język to Turbo Pascal


([alex]) #4

Exec('c:\winnt\notepad.exe','');

ReadKey;