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

DelphiÖеÄʱ¼ä²éѯ£¡ÄܸæËßÎÒÄÄÀï´íÁËÂ𣿣¡

t5:=' 1=1 ';
  if CheckBox5.Checked then
  t5:=' ÉúÈÕ>=#'+DateToStr(DateTimePicker1.Date)+'# and ÉúÈÕ<=#'+DateToStr(DateTimePicker2.Date)+'#';

¹ØÓÚʼþµÄ¸ñʽºÍ½ç¶¨·û£¬access,sqlserver,oracle¶¼Óе㲻ͬ£¬ÄãÕâÑùÓ²±àÂ뽨Òé¿´¿´ÄãµÄÊý¾Ý¿âµÄ¸ñʽҪÇó¡£
½¨ÒéÄãÓòÎÊý¾Í¿ÉÒÔ½â¾öÕâ¸öÎÊÌ⣬ʱ¼äÓòÎÊý±êʶ£¬ÔÚ´ò¿ªÊý¾Ý¼¯µÄ֮ǰÓÃParaByName('ʱ¼ä²ÎÊý1').Value:=TDateTime±äÁ¿¼´¿É£¬ÕâÑù¿ÉÒÔ±ÜÃⲻͬµÄÊý¾Ý¿âµÄʱ¼ä±íʾ·¨ºÍ½ç¶¨·û²»Í¬µÄÎÊÌâ

Èç¹ûÊÇoracleµÄ»°£¬¿ÉÒÔÓÃto_dateº¯Êý·½±ãÃ÷È·µÄת»»,´ïµ½ÔÚsqlÓï¾äÖÐÓ²±àÂë
ÀýÈç:select * from ±í1 where ʱ¼ä×Ö¶Î1 >= to_date('19900101','yyyyMMdd')


Ó¦¸ÃÊÇÒýºÅÎÊÌâ

strµÄ»°Ó¦¸ÃÓÃ''' °É


ͬÒâ˼һ¥µÄ˵·¨¡£
Êý¾Ý¿â²»Í¬SQLÓï¾äÂÔÓв»Í¬¡£

Â¥Ö÷µ½µ×³öʲô´í

if CheckBox5.Checked then
  t5:=' ÉúÈÕ>=#'+formatdatetime('yyyy-mm-dd',DateTimePicker1.Date)+'# and ÉúÈÕ<=#'+formatdatetime('yyyy-mm-dd',DateTimePicker2.Date)+'#';



Â¥Ö÷Èç¹ûÓõÄÊÇaccessÊý¾Ý¿âÄÇô
t5:=' ÉúÈÕ>=#'+formatdatetime('yyyy-mm-dd',DateTimePicker1.Date)+'# and ÉúÈÕ<=#'+formatdatetime('yyyy-mm-dd',DateTimePicker2.Date)+'#';
Èç¹ûÊÇmssqlÄÇô

t5:=' ÉúÈÕ>='''+formatdatetime('yyyy-mm-dd',DateTimePicker1.Date)+''' and ÉúÈÕ<='''+formatdatetime('yyyy-mm-dd',DateTimePicker2.Date)+'''';



½¨ÒéÓòÎÊý´«µÝÈÕÆÚ

ÎÒÓõÄÊÇsql server2000Êý¾Ý¿â¡£

²¹³äһϣ¬ÎÒÓõÄÊÇsql server2000µÄÊý¾Ý¿â£¬ÉúÈÕÀàÐÍÓõÄÊÇdatetim


Ïà¹ØÎÊ´ð£º

delphiÈçºÎµ÷ÓÃdllÎļþÖеÄexe

Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿


ÎÞÈ˻شð£¿

×ö³É×ÊÔ´Î ......

delphiµÄdll×Ó´°ÌåÎÊÌâµÄ½â¾ö - Delphi / ·Ç¼¼ÊõÇø

Ò»Ö±ÏëʹÓÃdll£¬µ«delphiµÄdll×Ó´°Ìå¾­³£Óи÷ÖÖÎÊÌ⣬±ÈÈçÖ÷´°¿ÚÓëdll×Ó´°¿ÚµÄ½¹µãÎÊÌ⣬×Ó´°¿ÚÖпؼþµÄtab¼ü¡¢Èȼü¡¢enter¼üµÈµÄÎÊÌ⣬×Ó´°¿ÚÍ˳öµÄÎÊÌâ¡¢Æ½Ãæ°´Å¥ÎÊÌâµÈµÈ£¬ÍøÕ¾ÉϽøÐÐÁËËÑË÷£¬Ã»ÓбȽÏÍêÃÀµÄ½â¾ö· ......

Õâ¸öSQLÓï¾äÓÐʲôÎÊÌâ? - Delphi / ·Ç¼¼ÊõÇø

select * from shuju.DB where ¿ªÅ̼Û-ÊÕÅ̼Û<=0.02
¿ªÅÌ¼Û ÓëÊÕÅÌ¼Û ÊÇÊý¾Ý¿âÀïµÄ×Ö¶Î
select * from aTableName where ((¿ªÅ̼Û-ÊÕÅ̼Û) <=0.02 )

¿ªÅ̼۱ÈÊÕÅ̼۵ÍÁ½·ÖÒÔϵÄÇé¿ö

Mark!!!!!!

se ......

VB/delphi ÐÞ¸ÄtextÎļþ - VB / »ù´¡Àà

¸÷λºÃ£¡£¡
¼ÙÉèÎÒÓÐÁ½¸ötextÎļþ
Ò»¸öÃû½Ð 1.text
ÄÚÈÝ£º
I like PC.... 
ÁíÍâÒ»ÊÇ2.text
ÄÚÈÝ:
function yk as string
endfunction
globals
endglobals
***********************·Ö½çÏß********** ......

DelphiµÄÓï·¨ÎÊÌâ - Delphi / ÓïÑÔ»ù´¡/Ëã·¨/ϵͳÉè¼Æ

Àý×Ó³ÌÐò¼û¸½¼þ£¬ÓÃDelphi 7½øÐбàÒë
ÎÊÌâ´úÂëΪ 
Delphi(Pascal) code:
if Node.ChildNodes <> nil then
begin
for i := 0 to Node.ChildNodes.Count - 1 do
begin
cNode := N ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ