delphi ͨ¹ýµ¼ÈëexcelÎļþÅúÁ¿ÐÞ¸ÄÊý¾Ý¿â±í
delphi ͨ¹ýµ¼ÈëexcelÎļþÅúÁ¿ÐÞ¸ÄÊý¾Ý¿â±í£¬Ê×ÏÈÒªÏȵ¼ÈëexcelÎļþµ½dbgrid»òstringgrid»òlistview»òÆäËü´°ÌåÔ¤ÀÀ£¬È·¶¨ÎÞÎóÔÙµã»÷Ð޸ģ¬Í¨¹ýµ¼ÈëµÄexcelÎļþ¹Ø¼ü×Ö¶ÎÐÞ¸ÄÊý¾Ý¿â±í£¬µã»÷ÐÞ¸Äʱ£¬¿ÉÒÔÔÚ´°ÌåÖÐÏÔʾһÌõÌõÐ޸ijɹ¦µÄÌáʾ£¬ÈçºÎʵÏÖ£¿£¿£¿
˼·£¿
»ò²Î¿¼Ô´Â룿£¿{{----
Ïà¹ØÎÊ´ð£º
·µ»ØµÄÄÚÈÝÊÇÈçÏ´úÂë,ÔõôÄÜÇþµÀ2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......
ÎÒÔÚ³ö¿â´°¿ÚдÁ˸ö·½·¨£ºADOQueryBill µÄbNum ×ֶεÄOnValidate·½·¨ ʵÏÖµÄÊdzö¿âÊýÁ¿²»ÄÜ´óÓÚÈë¿âµÄÊýÁ¿£¬·ñÔò¾ÍÖØÐÂÊäÈëÊýÁ¿£¬ÒÔÏÂÊÇÎҵĴúÂ룺
procedure TFrmStockOut.ADOQueryBillbNum_Validate(Sender: TFie ......
IF THEN ELSEÖжà¸öÌõ¼þÔõôд£¬È磺×Ö·û´®S1£¬S2£¬S3£¬S4¾ùÒª²»Îª¿Õ¡£
ÔõôÑù°ÑËüдµ½IFÖÐÈ¥£¿
Çë¸÷λ°ï°ï棬лл£¡
if (S1<>'') and (S2<>'') and (S3<>'') and (S4<>'') then
begin ......
Ò»Ö±ÏëʹÓÃdll£¬µ«delphiµÄdll×Ó´°Ìå¾³£Óи÷ÖÖÎÊÌ⣬±ÈÈçÖ÷´°¿ÚÓëdll×Ó´°¿ÚµÄ½¹µãÎÊÌ⣬×Ó´°¿ÚÖпؼþµÄtab¼ü¡¢Èȼü¡¢enter¼üµÈµÄÎÊÌ⣬×Ó´°¿ÚÍ˳öµÄÎÊÌâ¡¢Æ½Ãæ°´Å¥ÎÊÌâµÈµÈ£¬ÍøÕ¾ÉϽøÐÐÁËËÑË÷£¬Ã»ÓбȽÏÍêÃÀµÄ½â¾ö· ......