Работа с внешними приложениями

[akosh12345]

не нужно написать программу, которая будет создавать новые вкладки в Opere и задавать тот адрес, который необходим мне. Как мне это сделать?

 

[Dock1100]

uses shellapi;

...

ShellExecute(0, 'open', 'путь к опере( к примеру C:\Program Files\Opera\opera.exe)', 'Адрес страницы', nil, SW_SHOWNORMAL);

 

[akosh12345]

uses shellapi;

...

ShellExecute(0, 'open', 'путь к опере( к примеру C:\Program Files\Opera\opera.exe)', 'Адрес страницы', nil, SW_SHOWNORMAL);

А если мне нужно открыть 10 вскладок в одной опере? как решить эту проблему?

 

[Dock1100]

for i:=1 to 10 do
ShellExecute(0, 'open', 'путь к опере( к примеру C:\Program Files\Opera\opera.exe)', 'Адрес страницы', nil, SW_SHOWNORMAL);

 

[Dock1100]

for i:=1 to 100 do
ShellExecute(0, 'open', 'C:\Program Files\Opera\opera.exe', '', nil, SW_SHOWNORMAL);

Правда зависнуть может

 

[vital]

application.processmessages =)