Автоустановка.

[coolle]

Здраствуйте!
Такая вот ситуация, вот к примеру есть програмка с определённым функционалом, значит при запуске открывается форма на форме вкладки типа PageControl, на одной из вкладок(TabSheet) кнопка. Вот, мне нужно чтобы при запуске этой программы сработал OnClick на определённой TabSheet, как мне это реализовать? Работать нужно уже с откомпилированной программой.
За ранее спасибо за ответы!

[_SERGEYX_]

procedure TfrmMain.FormCreate(Sender: TObject);
begin
  Button1.Click;
//PageControl1.ActivePage:= TabSheet1;
end;

[coolle]

Сообщение от _SERGEYX_

procedure TfrmMain.FormCreate(Sender: TObject);
begin
  Button1.Click;
//PageControl1.ActivePage:= TabSheet1;
end;

это то понятно но как же я всавлю этот код в уже откомпилированную программу? исходников нет.

[RUSt88]

асм изучай тогда

[Roof]

2 - coolle если это в windows, думаю, что использование WinAPI решит вопрос.

[_SERGEYX_]

Есть такая софтинка "InqSoft Window Scanner".
Через нее можно вытянуть всю инфу об окне, именах классов контролов и т.п.
И можно из своей программы (которая заранее будет висеть в памяти) попытаться программно кликнуть по нужной кнопке. Но мне это далеко не всегда удавалось, особенно при наличии PageControl-в и т.п. Т.е. когда кнопка сразу не видна на экране.

[coolle]

Сообщение от Roof

2 - coolle если это в windows, думаю, что использование WinAPI решит вопрос.

Да, я тоже слыхал что в WinApi есть функция - ShellExecute, спомощью можно запускать файлы и управлять окнами, но... увы я далёк от этого.
Подскажите как это реализовать? Может к этому экзэшнику прикрутить библиотеки каким нибудь образом?

[Roof]

2 coolle - конкретного кода для PageControl не напишу. Для похожих целей мне очень помогли разобраться статьи: Мечты вуайериста - чужие окна. Есть как минимум три части этих статей. Думаю, что для PageControl можно написать программку, изучив данные статьи.
Тут смотри:
http://www.delphikingdom.com/asp/ite...e=1&itemid=463

[Sparkman]

В Restorator'е или подобных программках PageControll не отображается?

[coolle]

Вот пример то что мне нужно.