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

delphi ¶à¸öÎÞ¹ØÁª±í²éѯÎÊÌâ

ÎÒÏëʵÏÖÒÔϹ¦ÄÜ£¬ÔÚform1ÖеÄeditÎı¾¿òÖÐÊäÈëµ¥ºÅ£¬±£´æÊ±ÅжÏÕâ¸öµ¥ºÅÊÇ·ñ´æÔÚÓÚÁíÍâÈý¸ö±í£¬
±ítable1,table2,table3Öе¥ºÅÒÔ²»Í¬×ֶαíʾ£¬±ÈÈ磬dh1£¬dh2£¬dh3.
²»ÖªµÀ¸ÃÔõôдÁË¡£
select count(1) as aNum from (
select dh1 from table1 where dh1=QuotedStr(edit1.text)
union all
select dh2 from table2 where dh2=QuotedStr(edit1.text)
union all
select dh3 from table3 where dh3=QuotedStr(edit1.text) )  as p

Èç¹û²éѯ³öÀ´µÄֵΪ3˵Ã÷Èý¸ö±íÖж¼ÓУ¬·ñÔòûÓÐÔÚÈý¸ö±íÖдæÔÚ¡£

ÄÇÈç¹ûÈý¸ö±íÖÐÖ»ÒªÓÐÒ»¸ö±í´æÔھͿÉÒÔÄØ£¿

ÊÇÈý¸ö±íÖж¼²»´æÔÚ»¹ÊÇÖÁÉÙÓÐÒ»¸ö±í´æÔÚÄØ£¿


if not exists (select dh1 from table1 where dh1=QuotedStr(edit1.text))
  select -1
else if not exists (select dh1 from table2 where dh1=QuotedStr(edit1.text))
  select -2
else if not exists (select dh1 from table3 where dh1=QuotedStr(edit1.text))
  select -3
else select 0




ÒýÓÃ
ÄÇÈç¹ûÈý¸ö±íÖÐÖ»ÒªÓÐÒ»¸ö±í´æÔھͿÉÒÔÄØ£¿

ÄǾÍֻҪͳ¼Æ³öÀ´µÄaNum>=1¼´¿ÉÁË

ÒýÓÃ
ÊÇÈý¸ö±íÖж¼²»´æÔÚ»¹ÊÇÖÁÉÙÓÐÒ»¸ö±í´æÔÚÄØ£¿



µ¥ºÅ´æÔÚÓÚÁíÍâÈý¸ö±íÖеÄÈκÎÒ»¸ö¶¼ÐУ¡

ת»»³ÉdelphiÓïÑÔÄØ£¬ÓÃquery×é¼þ£¬Ì«±¿ÁË£¬³õѧÕß

with adoquery1 do begin
  close;sql.clear;
  sql.add('select count(1) as aNum from ');
&nbs


Ïà¹ØÎÊ´ð£º

PythonÖеÄUnicodeÔÚDelphiÈçºÎ»¹Ô­³ÉGb2312£¿

ÒÑÖªPython ÖУº
s = unicode("²âÊÔ", "gb2312")
s = u'\u6d4b\u8bd5'
print s
²âÊÔ

ÔÚDelphiÀïÃæÈçºÎ½«\u6d4b\u8bd5ÕâÑùµÄ»¹Ô­³ÉGb2312µÄºº×ÖÄØ£¿
ÕÒµ½¸ö·½·¨
......

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

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


ÎÞÈ˻شð£¿

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

delphi activx µÄÎÊÌâ 110·Ö

ÎÒÔÚÍøÉÏÕÒÁ˸ö¹ØÓÚIEBHOµÄ´úÂ룬Ȼºó°´ÕÕÄĸöÉèÖÃÁË£¬ºóÀ´ÔËÐеÄʱºò³öÏÖ
¹¹½¨
  [¾¯¸æ] Project2.dpr(14): File not found: 'MYbho.TLB'
  [¾¯¸æ] Project2.dpr(16): File not found: 'MYbho.RES' ......

delphi¼òµ¥ÎÊÌâ

IF THEN ELSEÖжà¸öÌõ¼þÔõôд£¬È磺×Ö·û´®S1£¬S2£¬S3£¬S4¾ùÒª²»Îª¿Õ¡£
ÔõôÑù°ÑËüдµ½IFÖÐÈ¥£¿
Çë¸÷λ°ï°ï棬лл£¡
if (S1<>'') and (S2<>'') and (S3<>'') and (S4<>'') then
begin ......

delphiÈçºÎ»ñÈ¡ÍøÒ³µÄhttp·µ»Ø×´Ì¬¼°·´Ó¦Ê±¼ä

delphiÈçºÎ»ñÈ¡ÍøÒ³µÄ·µ»Ø×´Ì¬£¬¾ÍÏñä¯ÀÀÆ÷Öзµ»ØµÄhttp 500´íÎó£¬404´íÎóµÈ 
ÁíÍâÄܲ»ÄÜ»ñÈ¡µ½´ò¿ªÒ»¸öÍøÒ³µÄ·´Ó¦Ê±¼ä£¬¿ÉÒÔ´óÖ²ο¼ÍøÒ³´ò¿ªµÄËÙ¶È
лл£¡
¶¼¿ÉÒÔʵÏֵ쬾ßÌåµÄÄ㻹ÊDzé×ÊÁϰɣ¡

×Ô¼º ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ