첨부파일과 비슷한 기능을 할 유틸을 만들고 있습니다.
웹페이지에서 로그인할때의 정보를 읽어와서 자동로그인을 할수있는 주소를 알려주는 유틸이죠.
일단 WebBrowser를 이용해서 웹화면을 표현하는데까지는 성공했습니다.
그런데 로그인을 할때 아이디나 비번같은 정보를 출력하지는 않네요 ㅡㅡ;
(예 : http://id.naver.com/nidlogin.login?id=제가 입력한 아이디&pw=비밀번호&ssllogin=0&x=0&y=0)
이런거 뜨게 하려면 어떻게 해야하나요?
지금은
<!--CodeS-->
procedure TForm1.WebBrowser1PropertyChange(Sender: TObject;
const szProperty: WideString);
begin
RichEdit1.Lines.Add(WebBrowser1.LocationURL);
end;
<!--CodeE-->
로 사용하고 있는데, 그냥 URL정도만 나오네요.
<!--CodeS-->
TWebBrowser의 OnBeforeNavigate2에서 URL얻어올수 있습니다.
procedure TForm1.WebBrowser1BeforeNavigate2(Sender: TObject;
const pDisp: IDispatch; var URL, Flags, TargetFrameName, PostData,
Headers: OleVariant; var Cancel: WordBool);
begin
RichEdit1.Lines.Add(URL);
end;
<!--CodeE-->
^^ 항상 즐코하세요...