我想用webbrowser 讀入一個可能擁有上百個聯結的網頁 一址一址的檢視 delphi 6 可否作到當我用滑鼠按其中一個超連結時能夠順便送出它的超連結網內容到form中的一個edit1.text 中來利用 感謝大家幫忙! 困擾近2個月了,救命阿!

var URL :string; procedure TForm1.WebBrowserStatusTextChange(Sender: TObject; const Text: WideString); begin URL := Text; end; procedure TForm1.WebBrowserNewWindow2(Sender: TObject; var ppDisp: IDispatch; var Cancel: WordBool); begin Edit1.Text := URL; end;