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

Delphiµ¼ÈëexcelÎļþ´úÂë

Áìµ¼¸øµÄÐÂÈÎÎñ ¿ÉÊǶ¼Ã»ÓÐ×ö¹ý Íû¸ßÊÖÖ¸½Ì
¸øÒ»Ð©È«µÄDelphiÖе¼ÈëexcelÎļþµ½sqlÊý¾Ý¿âµÄ´úÂë
лл£¡£¡

ÁíÍ⣺
ÕâÁ½¸öÀý×Ó£¬Òì¹¹Êý¾Ý¿âÖ®¼äµ¼Êý¾Ý

µÚÒ»ÖÖ·½·¨ 
  ÔÚFormÉÏ·ÅÒ»¸öADOConnection,Á¬½áÖ¸ÏòÄ¿±êAccess¿â 
  ÏÈ˵£¬µ¼Èëtxt£¬±ÈÈçtxtÎļþÔÚc:\temp\aaaa.txt 
  ¾ÍÖ´ÐР
  ADOConnection.Connected  :=  True; 
  ADOConnection.Execute(Select  *  Into  abcd  from  [Text;Database=c:\temp].aaaa.txt);   
 
  °ÑExcelµ¼Èëµ½AccessÖÐ,ͬtxtÀàËÆ 
  select  *  into  from  [excel  8.0;database=].[$] 
   
  µÚ¶þÖÖ·½·¨  ´ÓExcelдÊý¾Ýµ½Access¿â
  Delphi(Pascal) code:
//excelµ½access
uses comobj,excel97,excel2000;
//´ÓExcelдÊý¾Ýµ½Access¿â
prodedure ExcelToMdb(EXLfile:string;);
var
sheet,XLApp,workbook : variant;
iRow,MaxRow:integer;
begin
screen.Cursor:=crHourGlass;
try
//´´½¨¶ÔÏó
XLApp:=createOleObject(Excel.Application);
XLApp.displayAlerts:=false;
XLApp.ScreenUpdating:=false;
XLApp.WorkBooks.Add(EXLfile);
workbook := XLApp.workbooks[1];
sheet:=workbook.worksheets


Ïà¹ØÎÊ´ð£º

СµÜ²»»áDELPHI£¬Çë´óÏÀÃǰï¸öæ

Õâ¸öÊÇÀ¹½Ø°´¼üÏûÏ¢²¢²âÊÔÊÇ·ñΪENTER¼ü¡£
  begin
    case wParam of
      WM_KEYDOWN:
      fEatKeystroke := (p.vkCode = VK_RETURN);
  & ......

delphi ÔõÑù½«ucs2±àÂëת»»³ÉÖÐÎÄ

½ÓÊÕµ½µÄÎı¾ÄÚÈÝÊÇucs2±àÂë¸ñʽ£¬ÇëÎÊÔõÑùת»»³ÉÖÐÎÄ
°´ÎÒµÄÀí½â£¬UCS-2ÊÇ×Ö·û¼¯£¬¾ßÌåµÄ±àÂëÓÐUTF-8£¬UTF-16 (LE/BE)µÈ¡£
Èç¹ûÄãÓÃDelphi 2009¼°ÒÔÉϰ汾£¬¿ÉÒÔ¿´¿´TEncodingÀà¡£
btw. Äã˵µÄת»»³ÉÖÐÎÄÊÇɶÒâË ......

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

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


ÎÞÈ˻شð£¿

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

delphi ÓйØdbgridehµÄdropdownlist

Õâ¸öÊôÐÔÔõôÓ𡣿
ÎÒÏëʵÏÖÈçϹ¦ÄÜ£ºÔÚdbgridehÖа´Ï¼ýÍ·£¬Èç¹ûµ±Ç°Ö¸ÕëÍ£ÁôÔÚÏàÓ¦ÁÐÉÏ£¬¾ÍÁгöÔ¤ÉèµÄ¼¸¸öÑ¡Ï¹©Óû§Ñ¡Ôñ£¨Óëcombobox£©ÀàËÆ
ÇëÎÊ£¬ÓÃdropdownlist¿É·ñʵÏÖ£¿
ÐÂÊÖ£¬°ïÄãUPÏ ÈËÆø¡£
......

VC Delphi ÄÚ´æËÙ¶È±È½Ï - VC/MFC / ·Ç¼¼ÊõÀà

VC ¿ØÖÆÌ¨³ÌÐò:
#include <iostream>
using namespace std;
int main()
{
const int def_buffer = 1024 * 4;
DWORD t;
BYTE b[def_buffer];
memset(b, 0, sizeof(b));
PBYTE p;
t = GetTickC ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ