![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Запуск програмы на выполнение [D7, XP]
LoRd1 © (2007-05-18 23:24:00)Что надо прописать в событии onclick компонента button1 чтобы файл chees.exe (находяшийся в d:\game\chees.exe) запустился??
Робинзон (2007-05-22 13:19:00) [1]Только не забудь в uses прописать
ShellAPI;
procedure TForm7.Button1Click(Sender: TObject);
begin
ShellExecute(0, nil, 'D:\Проверка\instal.exe', nil,nil, SW_SHOWNORMAL);
end;
Правильный Вася (2007-05-22 12:52:00) [2]Var St:Array[0..255] of char;
StrPCopy(St,Edit1.Text)
уродлство
pathfinder (2007-05-22 09:48:00) [3]
> Германн © (20.05.07 02:09) [13]
> Да этой шпаргалке уже лет эдак 10, как нужно её забыть
> и не вспоминать!
Вы имеете в виду, что не надо использовать shellexecute?
Германн (2007-05-20 02:09:00) [4]
> LoRd1 © (19.05.07 01:21) [6]
> kingsoft © (20.05.07 01:53) [12]
Ну вот ты наконец получил шпаргалку от твоего ровесника. Ты думаешь, что эта шпаргалка позволит тебе освоить "азы"? Да этой шпаргалке уже лет эдак 10, как нужно её забыть и не вспоминать!
kingsoft (2007-05-20 01:53:00) [5]
unit Unit1;
interface
uses
ShellAPI;
type
TForm1 = class(TForm)
Edit1: TEdit;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
// Запуск програмы на выполнение
procedure TForm1.Button1Click(Sender: TObject);
Var St:Array[0..255] of char;
begin
ShellExecute(Handle,'open',StrPCopy(St,Edit1.Text),nil,nil,SW_SHOW);
end;
end.
В Edit1 введёшь к примеру d:\game\chees.exeпотом нажнёшь на кнопку и воаля! Файл chees.exe запустится!
P.S. Чтобы не набирать путь в Edit, можно использовать компонент FilenameEdit1, который есть в RXLib библиотеке, ну или сам смотри что тебе лучьше подойдёт, в зависимости от ситуации, потребностей, возможностей.
si (2007-05-19 15:50:00) [6]
> Ламерам здесь делать нечего.
Абсолютно недопустимый выкрик. Мы все Ламеры - кто то больше, кто меньше.
Плохиш (2007-05-19 13:38:00) [7]
> LoRd1 © (19.05.07 01:21) [6]
> Народ ну я ж не прашу многого помогите лаймеру освоить азы
Ламерам здесь делать нечего.
si (2007-05-19 12:52:00) [8]
> Народ ну я ж не прашу многого помогите лаймеру освоить азы!
> !
>
> напишите пример кода для запуска какой нибуть екзехи, которая
> есть на компе (ну например winamp.exe - c:\program files\winamp\winamp.
> exe)
Ну в конце концов открой Архангельского. У него этот кусок описан и причем очень подробно.
Anatoly Podgoretsky (2007-05-19 11:38:00) [9]
> LoRd1 © (19.05.07 01:21) [6]
Ты уже посмотрел справку?
Поиском по форуму уже восспользовался?
Если нет, то тебе в форум Работа с озвученной ценой.
Германн (2007-05-19 01:29:00) [10]
> LoRd1 © (19.05.07 01:21) [6]
>
> Народ ну я ж не прашу многого помогите лаймеру освоить азы!
> !
>
> напишите пример кода для запуска какой нибуть екзехи, которая
> есть на компе (ну например winamp.exe - c:\program files\winamp\winamp.
> exe)
>
Освоитьазы или что-тлибо ещё никак не получится по шпаргалке. А именно этим "пример кода", который ты просишь и является. По шпаргалке можно наудачу что-нибудь сдать (контрольную, зачёт, экзамен etc.) Сдать и сразу забыть, как страшеый сон.
LoRd1 (2007-05-19 01:21:00) [11]Народ ну я ж не прашу многого помогите лаймеру освоить азы!!
напишите пример кода для запуска какой нибуть екзехи, которая есть на компе (ну например winamp.exe - c:\program files\winamp\winamp.exe)
зараннее спасибо :)
Германн (2007-05-19 01:13:00) [12]
> LoRd1 © (19.05.07 00:49) [4]
Читай справку прежде чем задавать вопросы.
Иначе снимем штаны и ремнём, ремнём!
P.S. Отмазки типа "справка не установлена" или "не знаю английский" не принимаем.
P.P.S. И не говори, что темы в "Начинающие". Даже здесь нужно и свою голову задействовать.
LoRd1 (2007-05-19 00:49:00) [13]хотя про USES SHELLAPI я разбрался (в uses добавил shellapi, на на событии onclick ввел ShellExecute('1.exe')), но всеравно выдало такое:
[Error] Unit1.pas(29): Incompatible types: 'HWND' and 'String'
turbouser (2007-05-19 00:47:00) [14]
> LoRd1 © (19.05.07 00:42) [2]
Могу. Я все могу. Сколько готов отдать за пример кода?
ps
В конце-то концов, ну сколько можно...
LoRd1 (2007-05-19 00:42:00) [15]А пример кода можеш привести?? а то я не совсем въехал на счет uses ShellAPI
turbouser (2007-05-18 23:36:00) [16]uses ShellAPI
...
ShellExecute()
...
Пример даже в местном FAQ есть. Должен быть :)