delphiÁ¬½ÓftpµÄÎÊÌâ
ÎÒÓÃftpÉÏ´«Ò»¸öÎļþµ½ftp·þÎñÆ÷ÉÏ£¬Ç°¼¸Ìì¶¼Óõĺúõģ¬ºóÃæÒ»Ö±µ½ÏÖÔÚÁ¬²»ÉÏftpÁË
-------------------------------------
IdHTTP1:=TIdHTTP.Create(GetIP); //Ϊ·ÀÖ¹¶ÏÍøºóidhttpÎÞ·¨Æô¶¯ÆðÀ´,ËùÒÔÿ´Î¶¼´´½¨Ò»¸öеÄ
IdHTTP1.AllowCookies:=True;
IdHTTP1.ReadTimeout:=3000;
flag4:=0;
//ÒÔftp¸ñʽÉÏ´«ÉÏÈ¥
if idFTP1.Connected then
try
IdFTP1.Quit;
finally
end
else
with IdFTP1 do try
Username:='hztfdt';
Password:='20080512';
Host:='www.hztianfu.com.cn';
Connect(True,5);
finally
end;
flag4:=1;//flag4=1˵Ã÷ÉÏ´«µ½·þÎñÆ÷³É¹¦
-------------------------
²âÊÔÏÔʾflag4Ò»Ö±ÊÇ0ûÓбä³É¹ý1£»µØÖ·ÃÜÂ붼ûÓиĹý£¬²»ÖªµÀÊÇÄÄÀï³öÀ´ÎÊÌâÊÇÔÚÕÒ²»µ½£¬Çë´óÏÀ°ï棡£¡£¡
°Ñ Connect(True,5); µ÷³É Connect(True,3000);¾ÍºÃÁË¡£
Ïà¹ØÎÊ´ð£º
ÎÒÔÚÄ£¿éÀï×Ô¶¨ÒåÁËÒ»¸öº¯Êý:stradd()
¿ÉÊÇÔÚadoquery1.sql.add('select stradd(author) from book');
ʱÌáʾstradd䶨Òå...
Õâ¸öÎÊÌâÓÐʲô°ì·¨¿ÉÒÔ½â¾öµÄÂð? ·Ç³£¸Ð¼¤!
(ÔÚA ......
'Select * into '+TempTableName+' from OpenDataSource(''Microsoft.JET.OLEDB.4.0'',''Data Source='
+ExcelFilePath+';Mode=Read;Extended Properties=Ex ......
ÇëÎÊdbook V1.10°æ±¾µÄÔ´´úÂ루delphi£©ÊDz»ÊÇÔËÐв»Á˰¡£¬ÔÚÍøÉÏÏÂÁ˺ö࣬´ò¿ªÖ÷´°ÌåµÄʱºò×ÜÊDZ¨´í,֮ǰ×Ôѧc#£¬²Å¸Õ¿ªÊ¼£¬ÏÖÔÚÀÏʦ²¼ÖÃÈÎÎñÈÃÎÒ¸Ädbook V1.10°æ±¾µÄÔ´´úÂ룬ץ¿ñÁË£¬Ò»µãÍ·Ð÷ҲûÓУ¿¸÷λ´óÏÀ¸øµ ......
ÎÒµ÷ÓÃvcµÄdll£¬´«ËͽṹÌå²ÎÊý¡£vc½ÓÊܺó´ÓÄÚ´æÖп½±´³öÎÒ´«Ë͵ÄÖµ¡£×ª»»Ö®ºóÊÇÂÒÂë
½á¹¹ÌåÔõô¶¨ÒåµÄ?
//ÏòÖÕ¶Ë·¢ËÍÃŽû±¨¾¯ÐÅÏ¢
function alarmSentDoor(var pDoorPara :Alley_ALARM_PARA) ......
ÇëÎʸ÷λÄܲ»ÄÜ¿´µ½delphiÖÐ×Ô´ø×é¼þµÄÄÚ²¿´úÂë,±ÈÈçÔõôȥ¿´speedbuttonµÄflat·½·¨ÖеĴúÂëµÈ.
SpeedButton1.Flat
Êó±êÒÆµ½FlatÉÏ£¬°´×¡Ctrl¼ü£¬×ó»÷
¶ÔÁË£¬SpeedButton1 ±ØÐëÊÇ´´½¨ºÃµÄ
Êǰ¡£¬¾ÍÕâà ......