Не работает ShellExecute

[nibufep]

Уже как только не пробывал открыть ссылку, не в какую не хочет...

ShellExecute(handle,'open','http://',nil,nil,SW_SHOW);

ShellExecute(0, nil, 'http://', nil, nil, SW_SHOW);

ShellExecute(handle,'open','http://',nil,nil,SW_SHOWNORMAL);

ShellExecute(0,'open','http://','','', SW_SHOWNORMAL);

ShellExecute(Handle, nil, 'http://', nil, nil, SW_SHOW);

[Аватар]

Хочет, только ссылки нет, а в браузере Не удается отобразить эту страницу

[nibufep]

Сообщение от Аватар

Хочет, только ссылки нет, а в браузере Не удается отобразить эту страницу

всмысле ссылки нет?

[kropotkina-alice]

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

всмысле ссылки нет?

В смысле, что 'http://' - это не ссылка...

[nibufep]

я просто удалил пролную ссылку а так то она есть!

[kta87]

ShellExecute(handle,'open','место, куда вставить полный адрес',nil,nil,SW_SHOWNORMAL);

В uses прописывай не ShellApi, а Windows.
Тут почитай за эту WinAPI функцию.

[nibufep]

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

ShellExecute(handle,'open','место, куда вставить полный адрес',nil,nil,SW_SHOWNORMAL);

В uses прописывай не ShellApi, а Windows.
Тут почитай за эту WinAPI функцию.

я уже приводил выше этот пример, и сказал что он не работает....

ShellExecute(handle,'open','https://www.google.ru/',nil,nil,SW_SHOWNORMAL);

[xxbesoxx]

как только не пробывал открыть ссылку,

1)

uses
ShellApi

2)

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(Handle, 'open', PChar('http://programmersforum.ru'), nil, nil, SW_SHOW);
end;

[northener]

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

1)

uses
ShellApi

2)

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShellExecute(Handle, 'open', PChar('http://programmersforum.ru'), nil, nil, SW_SHOW);
end;

В данном конкретном случае приведение к PChar лишнее. Компилятор сделает это сам.

[kta87]

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

я уже приводил выше этот пример, и сказал что он не работает....

Если бы он не работал, я бы тебе его не предлагал. У тебя не работает? Ну так читай больше и заработает!