delphi ʹÓÃado ¶Áд vfp»òÕßdbase4µÄÊý¾Ý¿â
tableDB.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ ExtractFilePath(dir) +';Extended Properties=dBase 5.0;Persist Security Info=False;';
tableDB.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ExtractFilePath(dir)+';Extended Properties=dBASE IV;User ID=Admin;Password=;';
ʹÓÃado¶ÁÈ¡dbfµÄʱºò£¬³öÁËһЩÎÊÌ⣬ʹÓÃÉÏÃæµÄÁ¬½Ó´®£¬ÔÚдdbfÎļþµÄʱºò£¬ÖÐÎĵÄÊý¾ÝÔÚ±£´æµÄʱºò¾Í³ÉÁËÂÒÂ룬µ«ÊÇÔÚ±í¸ñÏÔʾµÄʱºòÈ´ÊÇÕý³£µÄ£¬Êý×Ö»òÕß×ÖĸûÓÐÎÊÌâ¡£
ÓÃÏÂÃæµÄÁ¬½Ó´®ÔÚдÖÐÎÄÊý¾ÝµÄʱºòûÓÐÎÊÌ⣬²»¹ýÐèҪעÒâÓÐЩ¿Í»§µçÄÔûÓÐ×°vfpodbcÇý¶¯£¬ÔÚ´ò°ü°²×°³ÌÐòµÄʱºò£¬×îºÃÒ»¿é´ò°ü°²×°¡£
tableDB.ConnectionString:='Provider=MSDASQL.1;Driver=Microsoft Visual Foxpro Driver;SourceDB='+ExtractFilePath(dir)+';SourceType=DBF;';
Ïà¹ØÎĵµ£º
ÒÔǰÓùýdelphi 2007µÄÕâ¸öº¯ÊýµÄ£¬²ÎÊý³¬¶à£¬ÏÖÔڵĹ«Ë¾ÓÃD7£¬½á¹ûÍøÉÏÒ»²éÕâ¸öº¯Êý£¬Óò»³ÉÁË£¬ÔÀ´ÎÒÓôíÁ˺¯Êý
unit QDialogs;
{$IFDEF LINUX}
function SelectDirectory(const Caption, Root: WideString;
var Directory: WideString; ShowHidden: Boolean = False): Boolean;
{$ENDIF}
{$IFDEF MSWINDOW ......
Chr ½«Ò»¸öÓÐÐòÊý¾Ýת»»ÎªÒ»¸öANSI×Ö·û
Ord ½«Ò»¸öÓÐÐòÀàÐÍֵת»»ÎªËüµÄÐòºÅ
Round ת»»Ò»¸öʵÐÍֵΪËÄÉáÎåÈëºóµÄÕûÐÍÖµ
Trunc ת»»Ò»¸öʵÐÍֵΪСÊý½Ø¶ÏºóµÄÕûÐÍÖµ
Int ·µ»Ø¸¡µãÊýµÄÕûÊý²¿·Ö
IntToStr ½«Êýֵת»»Îª×Ö·û´ ......
32λDelphi³ÌÐòÖпÉÀûÓÃTRegistry¶ÔÏóÀ´´æÈ¡×¢²á±íÎļþÖеÄÐÅÏ¢¡£
¡¡¡¡Ò»¡¢´´½¨ºÍÊÍ·ÅTRegistry¶ÔÏó
¡¡¡¡1.´´½¨TRegistry¶ÔÏó¡£ÎªÁ˲Ù×÷×¢²á±í£¬Òª´´½¨Ò»¸öTRegistry¶ÔÏó£ºARegistry := TRegistry.Create£»
&n ......
15±¾DelphiÊé¼®(PDF¸ñʽ)ÏÂÔØ (ת)
ÎļþÃû: Delphi×é¼þ²Î¿¼´óÈ«.rar
ÏÂÔØµØÖ·: http://www.rayfile.com/files/678ca1e3-f73f-11de-9d02-0014221b798a/
ÎļþÃû: DelphiÐÅϢϵͳ¿ª·¢ÊµÀý¾«Ñ¡.rar
ÏÂÔØµØÖ·: http://www.rayfile.com/files/fb328f02-f73e-11de-8a76-0014221b798a/
ÎļþÃû ......
¼¼Êõ½»Á÷,DH½²½â. ֮ǰÕÕ×ÅÌìÊéÒ¹¶Á,ÓÃDelphiÀ´ÅªÁËÏÂÑ»·Ìå,ÏÖÔÚ¾ÍÀ´ÅªÒ»ÏÂÌõ¼þÅжϰÉ.
Ê×Ïȿ϶¨ÊÇÎÒÃǾ³£¿´¼ûµÄIFÓï¾ä¿©. Var
I: Integer;
Begin
I:= 99;
If (I> 0)And (I< 0) Then
Writeln('I>0')
Else
If (I> 10)And (I< 100) Then
Writeln('I>10 and I100');
End.
·´»ã±à³öÀ´»áÊÇ ......