Запуск readme

← →
Insert (2004-04-21 19:52) [0]

Как нажатием кнопки запустить файл Readme(*.doc)?

← →
Palladin © (2004-04-21 19:55) [1]

смотря какой кнопкой... если Enter то нужно выделить этот файл... а если LMB то одного нажатия не достаточно... дважды надо... а если RMB то нужно в появившемся всплывающем меню выбрать "Открыть" или "Open" в зависимости от версии ОС... существуют и другие комбинации и последовательности нажатий кнопок приводящие к необходимому результату... но вышеприведенные самые распространенные....

← →
Anatoly Podgoretsky © (2004-04-21 19:59) [2]

Такого фала не может быть в операционной системе.

← →
Алхимик © (2004-04-21 20:01) [3]

> а если LMB то одного нажатия не достаточно... дважды надо

ой не факт :)

← →
Palladin © (2004-04-21 20:02) [4]

да... признаю ошибку... зависит от настроек...

← →
Yanis © (2004-04-21 20:03) [5]

To [1]
:)
To Insert (21.04.04 19:52)
Самое простое:
WinExec("notepad.exe"+" "+"c:\sysinfo.log",SW_SHOW);
Но если хочешь запустить программу ассоциированную с файлом(у меня например txt файлы не блокнотом открываются), то надо использовать ShellExecute.

← →
Yanis © (2004-04-21 20:03) [6]

Так что юзай ShellExecute

← →
Андрей Сенченко © (2004-04-21 20:04) [7]

Yanis © (21.04.04 20:03) [5]

WinExec("notepad.exe"+" "+"c:\sysinfo.log",SW_SHOW);

Как нажатием кнопки запустить файл Readme(*.doc)?

Вы уверены ?

← →
Jack128 © (2004-04-21 20:06) [8]

Ну все, заклевали человека :-)

if ShellExecute(0, "open", "Readme.doc", nil, nil, SW_SHOW) < 32 then
ShowMessage("Облом, то ли файла, то ли Word"a нету")

To [7]
Дык исправился же после(см. [6]). Просто невнимательно прочитал, неувидал Readme(*.doc)

Про кнопку ;-)

procedure TForm1.Button1Click(Sender: TObject); begin if ShellExecute(0,"open","Readme.doc",nil,nil,SW_SHOW)<32 then ShowMessage("Облом, то ли файла, то ли Word"a нету, то ли памяти не хватает etc") end;

Что бы ОН без тебя делал :)

Запуск readme Найти похожие ветки