thank but i rather not rely on sites that today exists and tomorrow they dont
or even worse, they exists but change the layout
or address or are down... too many variables to rely on :)
but thank you all for your enlightenments
--
On 14/05/2009 00:15:02, Wily Dev - [email protected] wrote:
>Amos,
>Whoops. Better change that to:
>function WhatsMyIP(): string;
>var sl : TStringList;
>begin
> sl := TStringList.Create;
> try
> HttpGetText('http://www.whatismyip.com/automation/n09230945.asp',
>sl); result := trim(sl.Text);
> finally
> sl.free;
> end;
>end;
>(that trims the carriage return ...)
>and you need to use the httpsend unit...------------------------------------------------------------------------------
The NEW KODAK i700 Series Scanners deliver under ANY circumstances! Your
production scanning environment may not be a perfect world - but thanks to
Kodak, there's a perfect scanner to get the job done! With the NEW KODAK i700
Series Scanner you'll get full speed at 300 dpi even with all image
processing features enabled. http://p.sf.net/sfu/kodak-com
_______________________________________________
synalist-public mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/synalist-public
