delphi - Firefox 从 Delphi 获取和更改 url

Question

有没有办法让当前的 url 在 Firefox 中输入，然后基于重播来更改该文本。我可以找到用 DDEClient 打开的 url，但我不知道如何更改它？

Answer 1

许多年前，我是这样使用它的（只是一个片段）：

    ...
    DdeClientConv:=TDdeClientConv.Create(nil);
    try with DdeClientConv do
      begin
        if SetLink(Browser, 'WWW_OpenURL') then
          begin
            PCH := RequestData(Format('"%s",,%d',[AURL,0]));
            if Assigned(PCH) then
              begin
                PD := PDWORDS(PCH);
                if PD^[0]=dword(-3) then
                  ShellExecute(GetDesktopWindow(),'Open',PChar(AURL),nil,nil,SW_SHOWNORMAL);
                StrDispose(PCH);
              end;
          end
        else
          ShellExecute(GetDesktopWindow(),'Open',PChar(AURL),nil,nil,SW_SHOWNORMAL)
      end;
    finally
      DdeClientConv.Free;
    end;
    ...