delphi ÐÂÔösheetÎÊÌâ - Delphi / VCL×é¼þ¿ª·¢¼°Ó¦ÓÃ
ÈçºÎʹÐÂÔöµÄsheetÔÚǰһ¸ösheetºó£¬excelĬÈÏÓÐ3¸ösheet,ÈçÎÒÐÂÔöÒ»¸ösheet4,ÔõÑùʹËüÊDzåÔÚsheet3ºóÄØ£¬¶ø²»ÊDzåÔÚsheet1ǰ£¿
ÓÒ¼ü²»ÐÐÂð£¿
Worksheets.Add ·½·¨
¸Ã·½·¨ÓÃÓÚн¨¹¤×÷±í¡£
Function Add([Before As VARIANT], [After As VARIANT], [Count As VARIANT], [Type As VARIANT]) As LPDISPATCH
²ÎÊý˵Ã÷
Before
Variant ÀàÐÍ£¬¿ÉÑ¡¡£Ö¸¶¨¹¤×÷±í¶ÔÏó£¬Ð½¨µÄ¹¤×÷±í½«ÖÃÓڴ˹¤×÷±í֮ǰ¡£
After
Variant ÀàÐÍ£¬¿ÉÑ¡¡£Ö¸¶¨¹¤×÷±í¶ÔÏó£¬Ð½¨µÄ¹¤×÷±í½«ÖÃÓڴ˹¤×÷±íÖ®ºó¡£
Count
Variant ÀàÐÍ£¬¿ÉÑ¡¡£ÒªÐ½¨µÄ¹¤×÷±íµÄÊýÄ¿¡£Ä¬ÈÏֵΪ 1¡£
·µ»ØÖµ
Object ÀàÐÍ
˵Ã÷
Èç¹û Before ºÍ After Á½Õß¾ùÊ¡ÂÔ£¬Ôòн¨µÄ¹¤×÷±í½«²åÈëµ½»î¶¯¹¤×÷±í֮ǰ¡£
ÑùÀý
' ±¾Ê¾ÀýÏò¹¤×÷²¾ÖÐÌí¼ÓÁ½¸ö¹¤×÷±í¡£
Sub Worksheets_Add()
ThisWorkbook.Worksheets.Add Count:=2
End Sub
´óÌå´úÂëÈçÏ£º
Delphi(Pascal) code:
try
Self.ExcelApplication1:=TExcelApplication.Create(Self);
Self.ExcelApplication1.Connect;
except
messagebox(application.Handle,'ÎÞ·¨Éú³ÉExcel±¨±í£¬ÇëÈ·¶¨°²×°ÁËExcelºóÖØÊÔ','ÐÅÏ¢',mb_ok or mb_iconinformation);
exit;
end;
Self.ExcelApplication1.Visible[0]:=False;
Self.ExcelApplication1.DisplayAlerts[0]:=False;
self.ExcelApplic
Ïà¹ØÎÊ´ð£º
Ò»°ã¶¼ÊÇÔõô½Ó»îµÄ£¿
ÊÕÈëÔõôÑù
sohu£¿soho£¿
sohu ¿ÉÄÜÊÇsmall office house unit
С°ì¹«ÊÒ£¬°Ñ¼Ò±ä³Éµ¥Î»¡£
È¥Íþ¿ÍÍø°¡,ºÜ¶à¸öÄØ,»¹ÓÐÍâ°üµÄÍøÕ¾
ѧϰѧϰ¡£
ÏÖÔÚDelphi×ö¶«Î÷²»ÐÐÁË,´¦ÓÚÌÔÌ×´ ......
ÔÚÍøÉÏ¿´µ½ºÜ¶àÈËд³ÌÐò´úÂë,´úÂëµÄÿһÐÐҪô¾Í¿ÕÒ»¸ö¿Õ¸ñ,Ҫô¾Í¿ÕºÃ¼¸¸ö,ÓеĻ¹ÒªÁíÆðÒ»ÐÐ,Õâ¸öÓй涨Âð?ÒªÔõôд?
ÄѵÀ²»ÄÜÔõÑùдÂð?ÎÒ´ò¸ö±È·½,(.´ú±í³ÌÐò´úÂë)
..............................
......... ......
ÏÖÓÐparadoxÊý¾Ý¿âʹÓÃBDEÇý¶¯£¬Äâ¸ÄΪC/S°æ£¬Ôö¼ÓÍøÂç¶ÁÈ¡Êý¾Ý¹¦ÄÜ¡£ÇëÄÄλ´óÏÀ£¬ÌṩԴÂë¡£
˵¾ä²»¿ÍÆøµÄ»°£¬ÓÃparadox×öC/SÊÇ×ÔѰËÀ·¡£
»»Ò»¸öÍøÂçÊý¾Ý¿â
ÒòΪ²»Ï붯´óÊÖÊõ£¬½öÄܹ²Ïí¼¸¸öÎļþ¼´¿É¡£
Da ......
»¹ÓÐÅóÓÑʹÓà Delphi for PHP µÄ£¿ ÔÚ´ËÂÛ̳ÉÏÕâ·½ÃæÐÅÏ¢Ï൱ÉÙ£¬Óеϰ¿ÉÒÔ½»ÏÂÅóÓÑ£¬È˶à×ßµÃÎÈ£¬×ßµÃÔ¶¡£
QQ909992998
DELPHI »¹ÊDz»´íµÄ£¬DELPHI FOR PHP Èç¹û֮ǰÊÇÓÃDELPHI ¿ª·¢¹¤¾ßµÄ»° ˼·¶¼ÊÇ˳³ ......
ÎÒÓÐdelphiÏîÄ¿¹²Ïí¸öwordÎĵµÓеĻúÆ÷¾ÍÄÜ´ò¿ªÓеľʹò²»¿ª
Õâ¸öÓ¦¸Ã²»ÊÇ´úÂëÎÊÌâÂðÇë¸ßÊÖÃÇÖ¸½Ì
Èç¹û ÄãÊÇÖ±½Ó´ò¿ªwordÎĵµ£¬ÄǾͺÍÄãµÄ´úÂëÎ޹أ¬ºÍ»úÆ÷»·¾³ÓйØ
Ö»ÒªÄÜ·ÃÎÊ£¬¾ÍºÍÄãµÄ³ÌÐòÎ޹ء£
¾ÍÊÇxpÏ ......