unit dragDrop;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, OleCtrls, SHDocVw,ActiveX;

type
  TForm1 = class(TForm)
    WebBrowser1: TWebBrowser;
    procedure WebBrowser1BeforeNavigate2(Sender: TObject;
      const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
      Headers: OleVariant; var Cancel: WordBool);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
  const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
  Headers: OleVariant; var Cancel: WordBool);
begin
  form1.Caption:=URL;
  Cancel:=True;
end;

initialization
  OleInitialize(nil);

finalization
  OleUninitialize;

end.

인터넷 익스플로러에서 링크를 끌어다 WebBrowser 컨트롤 위에 놓으면
URL을 알 수 있습니다.(파일도 가능)

답변 감사드립니다. 덕분에 필요한 부분을 상당부분 해결하게 되었습니다. 이 질문은 추가적인 것으로 답변해 주지 않으셔도 괜찮습니다만, 혹시 시간이 닿으시면 답변해 주시면 감사하겠습니다.

웹브라우저에서 드래그해 온 주소를 얻어낼 때 종종 하드에 저장되어 있는 캐시의 주소를 가져오는 경우가 있었습니다. 이 부분은 캐시를 사용하지 말도록 권장하면 어느정도는 해결할 수 있습니다만, 이랗게 캐시에 저장된 주소를 가지고 오는 경우를 막을 방법이 있을지요.

캐시파일을 읽지 않으려면 Drop된 URL과 연결된 캐쉬파일을 지워주면 됩니다.

procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
  const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
  Headers: OleVariant; var Cancel: WordBool);
begin

  DeleteUrlcacheEntry(pchar(string(URL)));{Uses WinINet}
  form1.Caption:=URL;
  //Cancel:=True;

end;

캐쉬 파일을 모두 지우는 방법은 Delphi Tips에서
'캐쉬'로 검색하여 BlackHole님의 팁을 보시면 됩니다.