Vistaでダイヤルアップエントリーウイザードを表示するには!

アル 2007-04-03 18:33:01 No: 25577

Delphi5にて、RasCreatePhonebookEntryを使用して、2000、ＸＰでRASエントリーウイザードを動作させていたました。
しかし、そのプログラムをそのままVistaに持っていくと、エラーとなってしまいます。
実際のプログラムでは、

if RasCreatePhonebookEntry(Handle, nil) <> 0 then
begin
MessageDlg('電話帳が壊れているか、必要なコンポーネントがありません。', mtInformation, [mbOk] , 0);
end;

となり、電話帳が壊れているか、必要なコンポーネントがありません。というメッセージが表示されてしまいます。

RAS.DCUを使用しています。

かみづ 2007-04-04 05:58:58 No: 25578

RasCreatePhonebookEntryの戻り値を見ると分かりますが、
RasCreatePhonebookEntryはVistaでは実装されてないようですね。
まぁ随分前からRasCreatePhonebookEntryの使用は非推奨なようなので
しょうがないんじゃないでしょうか。

RasEntryDlgは使えるのでこちらを使えばいいと思います。