ネットワークに接続するには?

解決


アストロ  2006-07-13 00:31:34  No: 22500  IP: [192.*.*.*]

みなさんこんにちは
お世話になります。

Delphi の ヘルプで  バージョン情報をクリックすると
フォームが開きますが、このフォームでボーランドの
アドレスをクリックすると、エクスプローラーが起動して
ボーランドのホームページにジャンプするのですが
これと同じ処理をするにはどうすればよいのでしょうか?

編集    削除
めるめる  2006-07-13 02:08:15  No: 22501  IP: [192.*.*.*]

私はこのようにして実現しています。

uses
  UrlMon;


procedure TForm1.Label1Click(Sender: TObject);
begin
    HlinkNavigateString(nil,'http://www.hogehoge.com/');
end;

編集    削除
かみづ  2006-07-13 07:10:23  No: 22502  IP: [192.*.*.*]

ShellAPIをusesして
ShellExecute(0, 'open', 'http://www.hogehoge.com/', nil, nil, SW_SHOW);
でもOKです。

編集    削除
アストロ  2006-07-13 23:51:09  No: 22503  IP: [192.*.*.*]

どうもありがとうございます。
ShellExecuteで対応できましたぁ!

編集    削除