<HTML>
<FONT style="FONT-SIZE: 10pt; FONT-FAMILY: tahoma">
<DIV> Hi.</DIV>
<DIV>No FillForm wont work, I already have similar code I already wrote,
because I dont know a value until its submitted, and hence why I need to add
it on the end.</DIV>
<DIV>I have found another way to handle it now tho.</DIV>
<DIV> </DIV>
<DIV>Jeremy</DIV>
<DIV> </DIV></FONT><BR>
<BLOCKQUOTE style="PADDING-RIGHT: 0px; PADDING-LEFT: 5px; MARGIN-LEFT: 5px;
BORDER-LEFT: #000000 2px solid; MARGIN-RIGHT: 0px">-----Original
Message-----<BR>From: "Paul A Norman" <paul.a.norman@gmail.com><BR>To:
"NZ Borland Developers Group - Delphi List" <delphi@ns3.123.co.nz><BR>
Date: Wed, 24 May 2006 16:08:57 +1200<BR>Subject: Re: [DUG] POSTDATA
WebBrowser<BR><BR>
<DIV>Dear Jeremy,</DIV>
<DIV> </DIV>
<DIV>The TembeddedWB component now housed on <A href="http://bsalsa.com/">
http://bsalsa.com/</A> handles things in this area very well.</DIV>
<DIV> </DIV>
<DIV>At worst you can first supress the SUBMIT and use a direct
Navigate procedure supplying the POSTDATA </DIV>
<DIV> </DIV>
<DIV>Check extensive information <A
href="http://bsalsa.com/ewb_methods2.html">
http://bsalsa.com/ewb_methods2.html</A></DIV>
<DIV> </DIV>
<DIV>Among other available methds is the following (<STRONG><FONT size=2>
FillForm)</FONT></STRONG> under :</DIV>
<DIV> </DIV>
<DIV> <A href="http://bsalsa.com/ewb_methods1.html">
http://bsalsa.com/ewb_methods1.html</A> (shown below)</DIV>
<DIV> </DIV>
<DIV>Paul</DIV>
<DIV>
<DIV><B><FONT size=2>FillForm</FONT></B><FONT size=2>(FieldName: string;
Value: string):This function allow you to auto insert details into a web
page<BR> </FONT><B><FONT color=#0000cc size=2>procedure</FONT></B><FONT
color=#0000cc size=2> TfrmMain.FillFormWithPersonalDetails1Click(Sender:
TObject);<BR><B>begin</B><BR> EmbeddedWB1.Navigate('<A
href="http://edit.yahoo.com/config/eval_register">
http://edit.yahoo.com/config/eval_register</A>?.<BR>done=<A
href="http://groups.yahoo.com%2fgroup%2fdelphi-webbrowser%2f&.src=ygrp&.intl=us'">
http://groups.yahoo.com%2fgroup%2fdelphi-webbrowser%2f&.src=ygrp&.intl=us'</A>
);<BR><B>while</B> EmbeddedWB1.ReadyState <> READYSTATE_COMPLETE <B>
do</B><BR> <B>begin</B><BR>
Forms.Application.ProcessMessages ;<BR> <B>
end;</B><BR> <B>with </B>EmbeddedWB1<B> do</B><BR>
<B>begin</B><BR>
FillForm('login', 'Mozart');<BR>
FillForm('passwd', 'Bethoven');<BR>
FillForm('.fn', 'lol1');<BR>
FillForm('.ln', 'lol2');<BR>
FillForm('.ln', 'lol2');<BR>
FillForm('.pw', 'lol3333');<BR>
FillForm('.pw2', 'lol444');<BR>
FillForm('.pw_a', 'lolypop');<BR>
FillForm('.pwqa_a', 'lolypop');<BR>
FillForm('.em', '<A href="mailto:loly@pop.com">
loly@pop.com</A>');<BR> FillForm('.pc',
'123456');<BR> FillForm('.secword', ':)');<BR>
</FONT><B><FONT color=#0000cc size=2> end;<BR>end;</FONT></B>
<FONT size=2></FONT></DIV><BR><BR> </DIV>
<DIV><SPAN class=gmail_quote>On 24/05/06, <B class=gmail_sendername>Jeremy
Coulter</B> <<A href="mailto:vss@vss.co.nz">vss@vss.co.nz</A>>
wrote:</SPAN>
<BLOCKQUOTE class=gmail_quote style="PADDING-LEFT: 1ex; MARGIN: 0px 0px 0px
0.8ex; BORDER-LEFT: #ccc 1px solid">
<DIV><FONT style="FONT-SIZE: 10pt; FONT-FAMILY: tahoma">
<DIV> </DIV>
<DIV> Hi All.</DIV>
<DIV>I am using an embedded TWebBrowser in an app, and I need to append some
data to the data about to be posted.</DIV>
<DIV>So, in the BeforeNavigate2 event, the POSTDATA is a VAR variable, and
so I decode the PostData, add my extra bit of data, then re-encode it (back
to a var array) but it seems to me that the PostData variable is NOT
being updated with my new data, as when the page posts the data to a
webpage, the new bit of data I add is not there. </DIV>
<DIV> </DIV>
<DIV>Anyone else tried to do this and found the same problem, and/or is
there a solution?</DIV>
<DIV> </DIV>
<DIV>Jeremy</DIV></FONT></DIV><BR>
_______________________________________________<BR>Delphi mailing list<BR><A
href="mailto:Delphi@ns3.123.co.nz">Delphi@ns3.123.co.nz </A><BR><A
href="http://ns3.123.co.nz/mailman/listinfo/delphi" target=_blank>
http://ns3.123.co.nz/mailman/listinfo/delphi</A><BR><BR><BR></BLOCKQUOTE>
</DIV><BR></BLOCKQUOTE>
</HTML>