Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

is not a valid integer value delphiÎÊÌâ

ÎÒ³¢ÊÔÒ»¸ö idhttp ·ÃÎÊÍøÕ¾Á´½ÓµÄ³ÌÐò
ÔÚÉèÖôúÀí¶Ë¿ÚµÄʱºò³ö´í
±àÒëûÓдíÎó
¾ÍÊÇÔÚÔËÐеÄʱºò ³öÏÖÁË
80 is not a valid integer value µÄÎÊÌâ
ÎÒÒѾ­°Ñ º¯Êý·ÖÀà³öÀ´µÄ port ת»»Îª integer ÁË ÎªÊ²Ã´»¹³ö´íÄØ
ÏÂÃæÊÇ Ö÷ÒªµÄ´úÂë


procedure TForm1.Button1Click(Sender: TObject);//idgttp get Á´½ÓµØÖ·
var
HTTP: TidHTTP;
html, s: string;
i: integer;
begin
timer3.Enabled:=false;
HTTP := TidHTTP.Create(nil);
try
http.ReadTimeout:=3000;
http.Request.Accept := 'image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, */*';
http.Request.AcceptLanguage := 'zh-cn';
http.Request.ContentType := 'application/x-www-form-urlencoded';
http.Request.UserAgent:='Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; Maxthon; .NET CLR 1.1.4322)';
HTTP.HandleRedirects := True;
HTTP.AllowCookies := True;
http.Request.Referer:=edit3.Text; //À´Â·ÉèÖÃ
http.ProxyParams.ProxyServer:= edit7.Text; //´úÀíIP
http.ProxyParams.ProxyPort:=strtoint(edit8.Text);  //´úÀí¶Ë¿Ú  ÕâÒ»¾ä¶Ô²»¶Ô£¿£¿£¿
HTTP.Request.CustomHeaders.Values['Cookie'] := 'abcd';//ÐÞ¸ÄCookie ×¥°ü¿É¼û
html := HTTP.Get(edit5.Text);
s := 'Cookies: ';
if HTTP.CookieManager.CookieCollection.Count > 0 then
for i := 0 to HTTP.CookieManager.Co


Ïà¹ØÎÊ´ð£º

DelphiÓëSQLµÄÎļþ´æÈ¡ÎÊÌâ

ÇëÎÊ£º
1¡¢ÈçºÎÔÚDelphiÖУ¬°ÑÖ¸¶¨Îļþ±£´æµ½SQLÖУ¬SQL¶ÔÓ¦×Ö¶ÎÓÖÓ¦¸ÃÓÃʲôÀàÐͲűȽϺÏÊÊ£¿
2¡¢¶ÔÓÚ1²Ù×÷£¬ÈçºÎ°Ñ±£´æµ½SQLÖеÄÎļþ´ò¿ª£¿
3¡¢ÒÔÉÏÎļþÖ÷ÒªÕë¶ÔOffice£¨DOC¡¢XLSµÈ£©ÎļþÀàÐÍ£¬Í¼Æ¬£¨BMP ......

ÐèÒª°Ñvb´úÂëת³Édelphi»òVC++µÄ´úÂë¡£

ÔõôʵÏÖdosÏÂrunas×Ô¶¯ÊäÈëÃÜÂë
http://bbs.pfan.cn/post-278076.html
´úÂëÈçÏÂ:
VB code:

Option Explicit
Private Const LOGON_WITH_PROFILE = &H1&
Private Const CREATE_DEFAULT_ERRO ......

Delphi´úÂë»»³ÉVB´úÂë ¼±¼±

type SFPRDA=packed record
¡¡¡¡¡¡¡¡¡¡¡¡czmm:Word;¡¡¡¡¡¡¡¡¡¡¡¡//²Ù×÷ÃÜÂë¡£
¡¡¡¡¡¡¡¡¡¡¡¡sqcz:array[1..8] of packed record dm:Byte; mm:Word end;¡¡
¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡¡//8¸öÊÚȨ²Ù×÷Ô ......

delphiµ¼Èëexcelµ½sqlserverµÄsqlÓï¾äÎÊÌâ

'Select * into '+TempTableName+' from OpenDataSource(''Microsoft.JET.OLEDB.4.0'',''Data Source='
  +ExcelFilePath+';Mode=Read;Extended Properties=Ex ......

¼±£¡DelphiÖÐÏÔʾc#µÄvs2008дµÄ¿Ø¼þ

ÎÒÏ뽫c#дµÄ¿Ø¼þǶµ½Delphi7µÄFormÖÐÏÔʾ£¬µ«ÊÇʼÖÕÊÇÃ»×ø³É£¬ÎÒͨ¹ýµ¼ÈëtlbÎļþ£¬¿ÉÒÔͨ¹ýc#дµÄ½Ó¿Ú£¬ÊµÏÖÔÚDelphiÖÐÏÔʾһ¸ö´°Ì壬µ«ÊÇÏÔʾµÄÖ»ÊÇÔÚ×ÀÃæÉϸ¡¶¯µÄ´°Ì壬ÎÞ·¨½«ËûµÄ¸¸ÈÝÆ÷Ö¸¶¨ÎªDelphiµÄForm£¬ÎÒÏë ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ