Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Создание авто- загрузочной проги. [D7, XP]

Gaist © (2007-06-12 23:44:00)
Есть проблемма с созданием. Все работает почти супер но с талкнулся с такой проблемой у меня 3 chekbox и если выделить их все то он устанавливает сразу 3 программы на которые стоят ссылки а нужно чтобы поочереди.
Что можете посоветовать?

Германн (2007-06-13 02:30:00) [1]

> Gaist © (13.06.07 02:17) [15]
>
> Герман спс все проблемы сразу ушли, огромное тебе спс
>

Да не надо мне спс :)
Добавь у себя в Избранное - http://www.delphimaster.ru/search.html
Вот тогда и будет "пжста" :)

Gaist (2007-06-13 02:17:00) [2]
Герман спс все проблемы сразу ушли, огромное тебе спс

Германн (2007-06-13 02:01:00) [3]

> Gaist © (13.06.07 01:53) [13]
>
> Можеш написать строчку работы с этим процесом как пример?
>
>

А поиск на форуме тебе лень использовать?
http://delphimaster.ru/cgi-bin/faq.pl?look=1&id=988621841&n=15

Gaist (2007-06-13 01:53:00) [4]
Можеш написать строчку работы с этим процесом как пример?

Gaist (2007-06-13 01:43:00) [5]
Первое имя фаила второе процес запуска run а вот в остальных что писать?

Gaist (2007-06-13 01:34:00) [6]
const 'RUN ' , Args: string; const RemoteHost: string = ''

Германн (2007-06-13 01:34:00) [7]

> sniknik © (13.06.07 01:30) [8]
>
> > А что означает
> палец с s соскользнул.
>

Имеется тенденция к "хождению налево"?
:)

Германн (2007-06-13 01:33:00) [8]

> Gaist © (13.06.07 01:29) [7]
>
> CreateProcess КАК ВООБЩЕ С НИМ РАБОТАТЬ Я ЗАПУТАЛСЯ(((
>

Справку прочитал? Что не понял?

sniknik (2007-06-13 01:30:00) [9]
> А что означает
палец с s соскользнул.

Gaist (2007-06-13 01:29:00) [10]
CreateProcess КАК ВООБЩЕ С НИМ РАБОТАТЬ Я ЗАПУТАЛСЯ(((

Gaist (2007-06-13 01:19:00) [11]
Я бы на нем писал но незнаю скрипты на него если знаеш где достать кинь ссылку. а за первое попробую.

Германн (2007-06-13 01:19:00) [12]

> sniknik © (13.06.07 01:16) [4]

А что означает
> p.a.
?
:)

sniknik (2007-06-13 01:16:00) [13]
вместо WinExec используй CreateProcess, после него есть возможность подождать (WaitForSingleObject) завершения процесса.

p.a. а лучше взять готовый создатель инсталляторов. например "Inno Setup".

Gaist (2007-06-13 01:05:00) [14]
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls, Buttons;

type
TForm1 = class(TForm)
Image1: TImage;
CheckBox1: TCheckBox;
CheckBox2: TCheckBox;
CheckBox3: TCheckBox;
Button1: TButton;
Button2: TButton;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Label2Click(Sender: TObject);
procedure Label1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

begin

if checkBox2.Checked = true then WinExec('Programms\dotnetfx.exe', 1);

if checkBox1.Checked = true then WinExec('Programms\setup_analizICTAD.exe', 1);
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
close;
end;

procedure TForm1.Label2Click(Sender: TObject);
begin
CheckBox2.Checked := not CheckBox2.Checked;
end;

procedure TForm1.Label1Click(Sender: TObject);
begin
CheckBox1.Checked := not CheckBox1.Checked;
end;

end.

Это исходник нужно чтобы фаил Setup_analizICTAD.exe запускался после того как пройдет установка запущенная с фаила dotnetfx.exe.

Strate (2007-06-13 01:01:00) [15]
Ещё бы понять что именно надо...

Gaist (2007-06-13 00:15:00) [16]
Как можно проверить что программа завершила установку.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »