![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
непонятки в создании меню в проекте delphi7
Kalten © (2011-08-10 18:11:00)такая проблемма. пытаюсь сделать пункт меню, который бы запускал определённый файл, а как это сделать не знаю. не получается. не охото всегда нажимать меню открыть.
Anatoly Podgoretsky (2011-08-10 18:48:00) [1]> oldman (10.08.2011 18:23:02) [2]
Лучше совсем не нажимать
Antoxa (2011-08-10 18:27:00) [2]Пиши обработчик верхнего уровня меню,например так можно запустить калькулятор:
procedure TForm1.N1Click(Sender: TObject);
var
p1: array[0..100] of Char;
begin
StrPcopy(p1,'Calc.exe');
WinExec(p1,SW_Restore);
end;
для запуска программ также можно использовать ShellExecute,
например так открываем страничку Гугла:
ShellExecute(0, 'open', ' http://www.google.ru', nil, nil, SW_SHOW);
oldman (2011-08-10 18:23:00) [3]
> пытаюсь сделать пункт меню, который бы запускал определённый
> файл
куда запускал?
> не охото всегда нажимать меню открыть
нажимой хоткей
Игорь Шевченко (2011-08-10 18:19:00) [4]пункты меню не запускают файлы