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

delphiÈçºÎʵÏÖ¶à¸ö±íÖÐÊý¾ÝÏà¼Ó

³É±¾·ÑÓôæÔÚ4¸ö±íÖУ¬±ÈÈçcb1£¬cb2£¬cb3£¬cb4£¬×ֶηֱðΪfy1£¬fy2£¬fy3£¬fy4£¬ÎÒÈçºÎÔÚdelphiÖÐÀûÓÃsqlÓï¾äͳ¼Æ³É±¾·ÑÓÃ×ܺͣ¬±¾ÈËÐÂÊÖ£¬Ï£ÍûÄÜÏêϸ˵ÏÂ.

ÕâËĸö³É±¾±íûÓÐÈκιØÁª£¬ÔÙ˵¾ßÌåÒ»µã£¬±ÈÈç˵ÔÚform1ÖÐÓÐÒ»¸öedit¿ò£¬ÏÖÔÚÒª×öµÄ¾ÍÊÇ£¬¸ù¾Ýedit¿òÖÐÊäÈëµÄµ¥ºÅ£¬Ôڳɱ¾±íÀï½øÐмìË÷£¬¼ìË÷³öÀ´ºó½«ËûÃǵÄ×ÜºÍ¼ÓÆðÀ´¾ÍÊÇ×ܵijɱ¾ÁË¡£²»ÖªÎÒ±í´ïÇå³þÁËû¡£
ÎÒÕâÑùд²»ÖªµÀ¶Ô²»¶Ô

Delphi(Pascal) code:
sql.clear;
sql.add('select sum(a+b+c+d) as aNum from');
sql.add('(select dl_tit as a from dl_fyxx where dl_id='+QuotedStr(edit12.text));
sql.add('union all');
sql.add('select other_tit as b from other_fyxx where other_id='+QuotedStr(edit12.text));
sql.add('union all') ;
sql.Add('select cd_tit as c from cd_fyxx where cd_id='+QuotedStr(edit12.Text));
sql.Add('union all');
sql.add('select hy_tit as d from hy_fyxx where hy_id='+QuotedStr(edit1.text)+') as p ') ;
dm.QCBFY.Open;
cb:=dm.QCBFY.FieldByName('aNum').AsInteger;


ÕâÑù»áÂýËÀ

select sum(a.a)+sum(b.b)+sum(c.c)+sum(d.d) as aNum from dl_fyxx a,other_fyxx b,cd_fyxx c,hy_fyxx d where a.dl_id = b.other_id and a.dl_id = c.cd_id and a.dl_id = d.hy_id
and a.dl_id='+QuotedStr(edit12.text);

ÒÔÉÏ´úÂëû²âÊÔ£¬²»ÖªµÀ¶Ô²»¶Ô£¬µ«ÊÇÄã²»Òª¸ã¼¸¸öSELECT £¬²»È»ºÜ


Ïà¹ØÎÊ´ð£º

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

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


ÎÞÈ˻شð£¿

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

delphi ±¾µØ×°ÔØÇý¶¯ - Delphi / Windows SDK/API

delphi ÊÖ¶¯×°ÔØÇý¶¯ÎļþÌáʾ£º
RROR (1058): The driver is marked as disabled (Start=4) in its service database entry.
ÊDz»ÊÇÕâ¸öÇý¶¯±ØÐèÒªÓÃINFÀ´°²×°¡£¡£ÓÃ×Ô´øµÄINFÀ´×°ÊÇÕý³£µÄ¡£ÓÃÊÖ¶¯×°ÔؾÍÌáʾÈçÉÏ¡ ......

100·Ö£¡¹ØÓÚvbµ÷ÓÃdelphi±àдµÄdllµÄÎÊÌ⣬¼±£¡£¡£¡

¸÷λ¸ßÊָϿì°ï°ïæ¡£
ÏÖÔÚÓÐÒ»¸ödelphiдµÄdll£¬º¯ÊýÖÐÓÐPIntegerµÄ·µ»Ø²ÎÊý£¬ÔÚdelphiÖпÉÒÔÕý³£µ÷Ó㬵«ÊÇÎÒÔÚvbÀïдµÄʱºò¾Í²»ÖªµÀ¸ÃÔõôÀ´µ÷ÓÃÁË¡£
Çë¿´´úÂë
ÒÔÏÂÊÇdelphiÖеĺ¯Êý¶¨ÒåºÍµ÷ÓôúÂ룬ÄÜÕý³£ÔËÐ ......

°²×°ÁËjre6.17ºó£¬Delphi²»Äܹرգ¿

ÈçÌ⣬ µã»÷DelphiµÄFile²Ëµ¥µÄExitÍ˳öDelphi£¬ Delphi²¿·Ö¹Ø±Õ--¼´²»ÄÜÔÙ²Ù×÷Delphi£¬µ«ÈÎÎñÀ¸ºÍ½ø³ÌÀDelphi»¹ÔÚÔËÐУ¬Ã»ÓÐÕæÕýµÄÍ˳ö¡£ÊDz»Êǰ²×°ÁËjre¸Ä±äÁËijЩ»·¾³±äÁ¿µ¼Ö£¬ÇëÎʸßÊÖÈçºÎ½â¾ö£¿ ×¢£ºÃ»°²×° ......

Delphi½øÏú´æÅ̵ãά»¤ ÅÌÓ¯¿÷¹¦ÄÜ

ÏëÇëÎʸ÷λ£ºÅ̵ãά»¤ÀïÃæ£ºÅÌÓ¯¿÷ÊýÁ¿=¿â´æÊýÁ¿+Èë¿âÊýÁ¿-³ö¿âÊýÁ¿£¬ÕâÑù×öÊǶԵÄÂð£¬

Â¥ÉÏÕý½â,ÕýÊýÅÌÓ¯ ¸ºÊýÅÌ¿÷

һ¥ÕýÈ·£¡

лл¸÷λÀ²

¾ÍÊÇ£ºÊDz»ÊÇ Êµ¼Ê¿â´æÀïµÄ¿â´æÁ¿ ÓëÄãÊÖ¶¯Êä½øÈ¥µÄÊýÁ¿Ö®¼äµ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ