Открытие файла в Pascal

[Asblue]

Вот, процедура, которая открывет программу Turbo Pascal:

procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Handle,nil,'E:\Turbo Pascal 7\BIN\TURBO.exe',nil,nil,SW_SHOWNORMAL);
end;

А как сделать, чтобы программа не только открывалась, но и в неё автоматически загружался паскалевский файл (например, путь которого 'E:\pascal.pas')?

[Serge_Bliznykov]

попробуйте так:

   ShellExecute(Handle,nil,'E:\Turbo Pascal 7\BIN\TURBO.exe E:\pascal.pas',nil,nil,SW_SHOWNORMAL);

не, скорее так:

   ShellExecute(Handle,nil,'E:\Turbo Pascal 7\BIN\TURBO.exe','E:\pascal.pas','E:\',SW_SHOWNORMAL);

не проверял...

[Asblue]

СПАСИБО!!! ))))

На весы нажала, но там: "Вы добавили слишком много отзывов за последние 24 часа. Попробуйте попозже." Позже нажму ))