Jump to content

UniURLFrame x TWebBrowser (Delphi)


j.neto233
 Share

Recommended Posts

Hello.
 
I need automatically fill in web forms, fill in the fields, perform the functions of the buttons, 
 
logging in automatically on a page.
 
must also read the result of a form.
 
In Delphi i use the TWebBrowser that does the job perfectly.
 
I'm having trouble using the TUniURLFrame. someone help me, or know if it is possible to do this with TUniURLFrame?

 

 

Link to comment
Share on other sites

In Delphi with TWebBrowser works well:

 

sample:

PROCEDURE TForm1.Button1Click(Sender: TObject);

VAR
  Doc3: IHTMLDocument3;
BEGIN
 
  WebBrowser1.Navigate('https://pt-br.facebook.com/');

 

hold up ...

 

  Doc3 := Webbrowser1.Document AS IHTMLDocument3;
  Doc3.getElementById('email').setAttribute('value', 'neto@hotmail.com', 0);
  Doc3.getElementById('pass').setAttribute('value', 'pAsswOrd', 0);
  WebBrowser1.OleObject.Document.all.Item('loginbutton', 0).click;
  WebBrowser1.Silent;

 

END;

 

 

Anyone have any idea how to do this UniGUI?

 

Link to comment
Share on other sites

TWebBrowser is actually OLE browser window, it can't be used on server. UniGUI is server side library.

 

And you did it wrong even with TWebBrowser. It works, but it's horrible. Instead you check GET/POST url address of a form and parameters names, then use Indy library to perform this operation, get back html page in a string and parse it for needed data. And that method can be done on the server inside unigui app too.

  • Upvote 1
Link to comment
Share on other sites

  • 4 months later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

×
×
  • Create New...