Как в делфи сделать переход по ссылке

[artbotva]

Подскажите плиз как зделать так чтобы при нажатии
кнопки (button1) Открывался браузер по умолчанию, и переходил
на определенный сайт?

[artemavd]

А что, поиск по форуму уже не в моде? Подскажу: ищи про ShellExecute.

[Зод]

ShellExecute(Handle, 'open', PChar('НУ типа линк'), nil, nil, SW_SHOW);
как-то так)

[artbotva]

Сообщение от Зод

ShellExecute(Handle, 'open', PChar('НУ типа линк'), nil, nil, SW_SHOW);
как-то так)

А куда это надо вставлять?
Между

begin
******
end
?????

[Кольша]

да.P.S после uses допишите shellapi

[artbotva]

Cпс большое за помощь
Но теперь еще одна проблемка
Браузер открывается не поверх проги (как хотелось-бы) а сзади
А из-за того что прога открывается во весь экран, браузера вообще не видно пока не свернешь прогу
Как сделать так чтобы браузер открывался поверх??

[artemavd]

С самим браузером ничего не сделаешь. Проверь, чтобы в свойстве FormState твоей главной формы было fsNormal.

[Stilet]

С самим браузером ничего не сделаешь.

Попробовать можно.
Через FindWindow найти его окно и переместить вперед через SetForegroundWindow к примеру

[artbotva]

А поэтапно можно?

[Stilet]

Насчет поэтапно - сначала почитай про те функции что я указал.
А потом подумай - стоит ли так заморачиваться. Однозначно лучше всего два варианта:
1) Встроить на свою форму браузер и в нем отображать что нужно
2) После открытия через ShellExecute браузер, просто сворачивать свое окно в иконку, или давать ему команду SetZOrder(false); Чтоб назад ушло.