CodePudding user response:
Don't give you a excel? Dad didn't give you the teacher is a pit,CodePudding user response:
An excel casually, as long as there is data!CodePudding user response:
Resource ID: 4538264CodePudding user response:
If you just want to know how to read, you asked than that of baidu, Delphi excelCodePudding user response:
Students are now even Google, baidu all don't understand?CodePudding user response:
Are generally in baidu can not find to come to for helpCodePudding user response:
Query directly with ADO, ExcelCodePudding user response:
1, the use of ADO, the EXCEL file as an ADO input source;2, the use of third party components, such as XLSReadWriteII or NativeExcel;
Personally recommend using a third party controls, speed, strong function, compatibility, especially NativeExcel, flexible, need I can send you, NativeExcel 3.0.26,
CodePudding user response:
XLSReadWriteIICodePudding user response:
Resource ID: 4538264CodePudding user response:
NativeExcelCodePudding user response:
Should have other specific function is introduced, impossible is a word, where such as excel import, read a what kind of excel, even when no will you also go to ask the teacher, the teacher will do later when the actual project, the communication with customer is very important,CodePudding user response:
ADO to connect directly to EXCEL as a database file typeCodePudding user response:
Use OLE linksCodePudding user response:
Resource ID: 4538264CodePudding user response:
It is recommended to use XLSReadWriteII, powerful, statements and simple, and fast speed,Also can use D in the Servers controls,
CodePudding user response:
The building Lord how don't show up?CodePudding user response:
NativeExcel how to import the EXCEL data??????????? Open the file path of functionCodePudding user response:
Import can also such, should have a lot of examples, onlineVar
PExcel: Variant;
///////
PExcel:=CreateOleObject (' Excel. Application);
PExcel. WorkBooks. Open (' c: \ aa. XLS);
PExcel. Worksheets [1]. Activate;
RowCount:=pExcel ActiveSheet. UsedRange. Rows. Count;
The ColumnCount: pExcel.=ActiveSheet. UsedRange. Columns. The count;
For I:=1 to RowCount do
The begin
For J:=1 to ColumnCount do
The begin
TmpCellVal:=pExcel. ActiveSheet. Cells [I, J] Text;
End
End