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

¹ØÓÚDelphiʹÓÃADOÁ¬½ÓSQL server 2000Êý¾Ý¿âµÄÎÊÌâ

СµÜÎÒÓÃADOÁ¬½ÓSQL server 2000Êý¾Ý¿â£¬È»ºóÔÚDBGridÖÐÏÔʾ£¬ÏÖÔÚÏë°ÑÔÚDBGridÖвéѯµ½µÄÊý¾ÝiPlot×÷ͼ£¬ÇëÎÊÈçºÎʵÏÖÔÚDBGridÖеÄÊý¾Ý¶ÁÈ¡£¬¶Á³öµÄÊý¾ÝÊÇSTRINGÀàÐ͵ģ¬ÈçºÎÓÐЧµÄת±ä³ÉÊý¾Ý¿âÖÐËù´æ´¢µÄDOUBLEÀàÐÍ»æÍ¼£¬Íû¸æÖªÒ»¶þ£¬²»Ê¤¸Ð¼¤£¡
ÔÚDBGridÖеÄÊý¾Ý¶ÁÈ¡£¿
DBGrid.datasource.dataset.fieldbyname('xxx').asfloat

ÒýÓÃ
ÔÚDBGridÖеÄÊý¾Ý¶ÁÈ¡£¿
DBGrid.datasource.dataset.fieldbyname('xxx').asfloat

¶Á³öµÄÊý¾ÝʱԭÀ´Êý¾Ý¿âÖж¨ÒåµÄDOUBLEÀàÐÍÂð£¿
ÎÒÏë¶Á³öÌØ¶¨µÄÊý¾Ý£¬È»ºó»æÖÆÊý¾ÝµÄÀúÊ·ÇúÏßͼ

DBGrid.datasource.dataset.fieldbyname('xxx').value

ÒýÓÃ
¶Á³öµÄÊý¾ÝʱԭÀ´Êý¾Ý¿âÖж¨ÒåµÄDOUBLEÀàÐÍÂð£¿
ÎÒÏë¶Á³öÌØ¶¨µÄÊý¾Ý£¬È»ºó»æÖÆÊý¾ÝµÄÀúÊ·ÇúÏßͼ

¶Á³öµÄÊý¾ÝʱԭÀ´Êý¾Ý¿âÖж¨Òå¿ÉÒÔ²»ÊÇDOUBLEÀàÐÍ£¬µ«Äãת»»³ÉdoubleÐ͵ϰ£¬ÐèÒªÊý¾Ý¿âÖеÄÄÚÈÝÒª·ûºÏdoubleÀàÐ͵ĹæÔò£¬·ñÔò¾Í»á³ö´í

DataSet.First;
while Not DataSet.Eof do
begin
With DataSet
  value:=DBGrid.datasource.dataset.fieldbyname('xxx').value;
end
DataSet.Next;
end;


Ïà¹ØÎÊ´ð£º

delphi Ctrl+×ó¼ü ÎÞ·¨²é¿´ windows.pas Ôõô°ì

ÎÒ°²×°µÄÊÇÆóÒµ°æ¡£¡£¡£ 
ÎÒÎÊÏ£¬ CTRL+×ó¼ü Äܲ鿴 windows.pas Âð£¿
¾ÍÊÇ ½Ó¿ÚÀïµÄwindows¡£

µ±È»¿ÉÒÔ,CTRL+×ó¼üµã»÷Interface²¿·ÖµÄWindows¾Í¿ÉÒÔÁË

ɶɶÆóÒµ°æ£¿È¥°²×°Ä¿Â¼¿´¿´libÎļþ¼ÐÏÂÓÐÃ»Ó ......

delphi¶¯Ì¬Êý×éÈçºÎÈ¥µôÒ»¸öÔªËØ

procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer);
var
len,MaxDelete:Integer;
P:PLongint; //4 ¸ö×ֽڵij¤ÕûÐÎÖ¸Õë
begin
P:=PLongint(A);// È¡µÄ A µÄ ......

´ÓORACLEµ½DB2µÄSQLÓï¾äÎÊÌâ

ÏÖÔÚÓÐÒ»ORACLEÖеÄSQLÓï¾ä£¬ÐèÒªÒÆÖ²µ½DB2ÖУ¬ÇëÎʸÃSQL¸ÄÈçºÎд
ORACLEÖУº
select floor(months_between(date1,date2)) from A  
date1,date2·Ö±ðΪ±íÖеÄÁ½¸ö×Ö¶Î £¬¶¼ÎªÈÕÆÚÐÍ 
DB2ÖÐÈçºÎʹÓÃÐ ......

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

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

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

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

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