delphi double µÄÊýÖµ ±ä³É5.5518684497e+250 ÔÚÏß
·½·¨ÄÚ·µ»ØÒ»¸ödouble µÄÖµÕýÈ·.Èç678.9
µ«ÊÇÎÒÓÃÒ»¸ödouble µÄÖµ½ÓÊÕºó±ä³ÉÁË 5.5518684497e+250
ÕâÑùµÄÐÎʽ.
ÊÇÔÚͬһ¸öexeÀï½ÓÊÕµÄÂ𣿷½·¨µÄ·µ»ØÀàÐͺͽÓÊյıäÁ¿ÀàÐͶ¼ÊÇdoubleÂð£¿
¸Ð¾õÖ»ÓÐÀàÐͲ»Ò»Ö£¬²Å»áÈç´Ë°¡
Èç¹ûÊÇ×Ô¼ºµÄ³ÌÐò£¬ÔÚ·½·¨Àï·µ»ØÇ°£¬°Ñresult°´byteÊä³öÒ»´Î
½ÓÊպ󣬱äÁ¿Ò²°´byteÊä³öÒ»´Î£¬¿´Ò»¿´2ÕßµÄ16½øÖÆ×Ö·û´®ÊÇ·ñ²»Í¬
LZÊÇÈçºÎÓÃÒ»¸ödouble µÄÖµ½ÓÊÕµÄ? Ìù´úÂë³öÀ´¿´¿´¡£
function GetDanbaoFeefromMode(mode_code: string; loanquantity, loanyear: double): double;
const
SQL_MODE = 'SELECT %F/10000*FAST_COUNT AA from DIC_GHRGASS WHERE MODE_CODE=%s AND YEARMUCH=%f';
var
sfee: string;
begin
Result:=0;
if mode_code = '' then Exit;
sfee:=vartostr(Query_value(CDatabaseName,Format(SQL_MODE,[loanquantity, mode_code, loanyear])));
if sfee <> '' then
begin
Result:=StrToFloat(sfee);
end;
//Éá·Öµ½½Ç 2006.11.30
Result:=RoundSf(result);
end;
Fee:double;
Fee:=GetDanbaoFeefromMode(qyCharge.FieldByName('mode_code').AsString, nBSQuantity, nBSSpan);
GetDanbaoFeefromMode ·µ»ØÖµÕýÈ·,µ«Fee½ÓÊÕʱ¾Í±ä³ÉÁË 5.5518684497e+250
RoundSf´¦ÀíºóµÄ½á¹ûÒª¿´¿´ÊDz»ÊǶÔ
תÀ´×ªÈ¥µÄ£¬¸ã¸´ÔÓÁË
GetDanbaoFeefromMode ·µ»ØÖµÊ
Ïà¹ØÎÊ´ð£º
¾ÍÊÇÒ»¸ö·þÎñ¶ËºÍÒ»¸ö¿Í»§¶Ë£¬Àï±ßÓÐһЩ¹²Óõ¥Ôª £¬ÎÒÔÚ ¹¤³ÌµÄSEARCH PATHÀïÉèÖõÄ·¾¶£¬
Àï±ßÓиö½á¹¹Ì壬ÎÒÔÚ·þÎñ¶Ë´ò¿ª£¬¼ÓÁ˳ÉÔ±£¬µ«ÊÇÎÒÔÚ¿Í»§¶ËÆäËûµ¥Ôª·ÃÎʲ»µ½ÎÒмӵģ¬ÎÒÔÚ¿Í»§¶Ë´ò¿ªÄǸöµ¥Ôª£¬È·Êµ¼ÓÁ ......
Çë½Ì¸÷·¸ßÊÖ¡£ÎäÁÖǰ±²¡£ÎÒ½«B.EXE×ö³É×ÊÔ´Îļþ£¬È»ºó¼Óµ½123.dllÖС£ÓÃA.EXEÀ´µ÷ÓÃ123.dllÖеÄB.EXE
Çë¸÷λǰ±²°ïæָ½ÌÏ¡£A.exeÈçºÎÀ´µ÷ÓÃdllÖеÄexe£¿´úÂëÓÖ¸ÃÈçºÎд£¿
ÎÞÈ˻شð£¿
×ö³É×ÊÔ´Î ......
×î½ü»»Á˼ҹ«Ë¾£¬ÓôÃÆµÄÊǹØÓÚDelphiµÄÎÊÌ⣬¹«Ë¾Ö®Ç°ÓõÄÒ²ÊÇD°æDelphi7ÆóÒµ°æµÄ¡£ºóÀ´±»ËÍÁËÂÉʺ¯ÒԺ󣬾ÍÇ¿ÖÆ¸ÄÓÃDelphi7¸öÈ˰棬¾ç˵Õâ¸ö°æ±¾ÊÇÃâ·Ñ°æ£¬»òÕß˵ºÜ±ãÒË£¬Èç¹û²é³öÀ´£¬¾ÍÂò¸öºÃÁË¡£ÕâÏ¿ɺ᣿àÁËÎ ......
¸÷λ¸ßÊָϿì°ï°ïæ¡£
ÏÖÔÚÓÐÒ»¸ödelphiдµÄdll£¬º¯ÊýÖÐÓÐPIntegerµÄ·µ»Ø²ÎÊý£¬ÔÚdelphiÖпÉÒÔÕý³£µ÷Ó㬵«ÊÇÎÒÔÚvbÀïдµÄʱºò¾Í²»ÖªµÀ¸ÃÔõôÀ´µ÷ÓÃÁË¡£
Çë¿´´úÂë
ÒÔÏÂÊÇdelphiÖеĺ¯Êý¶¨ÒåºÍµ÷ÓôúÂ룬ÄÜÕý³£ÔËÐ ......
¼±Óá£ÁªÏµQQ£º8775262£¬Ð»Ð»¡£
ÐèÒª½øÐÐDllImportµÄµØ·½Ö±½ÓдDLLImport.·½·¨Ãû¡£
È磺DLLImport.GlobalAddAtom(¡¡);
Îļþ£ºUShare.pas
Delphi(Pascal) code:
unit UShare;
interface
uses Windows, Me ......