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

DelphiÈçºÎÖ±½ÓÈ¡¸¡µãÊýµÄÃÝ

Ò»¸ö¸¡µãÊý±äÁ¿Val£¬ÈçºÎͨ¹ýDelphiµÄº¯Êý£¨×¢ÒâÊÇDelphiµÄº¯Êý¶ø²»ÊÇ×Ô¶¨ÒåµÄº¯Êý£©Ö±½ÓÈ¡ËüµÄÃÝÖµ£¿

±ÈÈçµ±Val:=101.3ʱ£¬ËüµÄ¿ÆÑ§±í´ïʽÐÎʽΪ¡°1.013E+2¡±£¬ÎÒÏëµÃµ½ËüµÄÃÝÖµ¡°2¡±
µ±Val:=0.0103ʱ£¬ËüµÄ¿ÆÑ§±í´ïʽÐÎʽΪ¡°1.013E-2¡±,ÎÒÏëµÃµ½µÄÖµÊÇ¡°-2¡±
²éÁËһϹØÓÚMathµÄµ¥Ôªº¯Êý£¬Ã²ËÆÃ»ÓÐÖ±½ÓÖ§³ÖµÄº¯Êý
²»ÖªµÀÆäËüµ¥ÔªÓÐûÓС£

Èç¹ûʵÔÚûÓУ¬ÎÒ»á°Ñ·Ö¸øË㷨ЧÂÊ×î¸ßµÄһλ¡£


1¡¢ÓÃmod£¬ÒÔ1Ϊ·Ö½çÖµ
2¡¢ÀûÓÃFormatFloat£¬ÔÙÌáÈ¡ÃÝÖµ


ÒýÓÃ
edit1.Text:=inttostr(round(log10(strtofloat(edit1.Text))));

Ô­À´Óк¯Êý

Delphi(Pascal) code:

function Log10(const X: Extended): Extended;
{ Log.10(X) := Log.2(X) * Log.10(2) }
asm
FLDLG2 { Log base ten of 2 }
FLD X
FYL2X
FWAIT
end;



ÒýÓÃ
edit1.Text:=inttostr(round(log10(strtofloat(edit1.Text))));

2 Â¥Õý½â
round(log10(101.3)) ---> 2
round(log10(0.0103)) ---> -2

ÔÆÄÏÌìÓοƼ¼£¬Ö÷Òª¿ª·¢´óÐÍ3DÍøÂçÓÎÏ·

¸ßн³ÏÕÐ

ÓÎÏ·¿Í»§¶Ë£¬·þÎñÆ÷¶Ëdelphi ³ÌÐòÔ±

°ü³Ôס

µç»° 0871-6089588

²»ÖªµÀDelphiµÄ¸¡µãÊýÔÚ²»Í¬ÐͺŵÄCPU£¨µ«½öÏÞÓÚX86»òX64ϵÁлú)ÉÏÊÇ·ñ²ÉÓõÄͬһÖÖ¸ñʽ£¬Èç¹ûÊǵϰ£¬ÎÒµ¹ÊÇÏëÖ±½Ó·ÖÎ


Ïà¹ØÎÊ´ð£º

delphi動態調ÓÃdllµÄÀ§»ó

procedure RunFunction;  
  type  
  TFunc = function(A: Integer): Integer;stdcall;¡¡//ÕâÀï¸ù¾ÝDLLÀïÃæº¯ÊýµÄÉùÃ÷ÐÞ¸Ä  
  var  
  ......

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

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


ÎÞÈ˻شð£¿

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

DelphiÔõôȡ·µ»ØÄÚÈÝÖеÄÖ¸¶¨²¿·Ö.

·µ»ØµÄÄÚÈÝÊÇÈçÏ´úÂë,ÔõôÄÜÇþµÀ2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......

Çë½Ì¹ØÓÚDelphiµÄÊ÷Ðοؼþ

ÇëÎÊDelphiÓÐÊ÷ÐοؼþÂð£¿
ÔõÑùʹÓã¿
Ttreeview 
 treeview.items.addchild(nil(Éϼ¶½Úµã),'°¸·¢Ê±·¢'(text));

raize ¿Ø¼þ°üÀïÃæÓУ¬csdnÓÐÏÂÔØµÄ

²é°ïÖúTTreeViewºÍTNodeÁ½¸öÀà

TTreeView ......

delphi activx µÄÎÊÌâ 110·Ö

ÎÒÔÚÍøÉÏÕÒÁ˸ö¹ØÓÚIEBHOµÄ´úÂ룬Ȼºó°´ÕÕÄĸöÉèÖÃÁË£¬ºóÀ´ÔËÐеÄʱºò³öÏÖ
¹¹½¨
  [¾¯¸æ] Project2.dpr(14): File not found: 'MYbho.TLB'
  [¾¯¸æ] Project2.dpr(16): File not found: 'MYbho.RES' ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ