Buon giorno
Ho la necessita di fare una applicazione che legga file in formato 2010.
La soluzione che ho intenzione di usare è quella di OLE.
Ho fatto questa piccola applicazione:
rocedure TForm1.Button1Click(Sender: TObject);
Var XLApp,XLSHEET: OLEVariant;
lastrow : integer;
begin
XLApp := CreateOleObject('Excel.Application'); // requires comobj in uses
try
XLApp.Visible := False; // Hide Excel
XLApp.DisplayAlerts := False;
if not OpenDialog1.Execute then exit;
XLApp.Workbooks.Open(OpenDialog1.FileName);
XLSHEET := XLApp.Workbooks.Sheets(0).Select;
lastrow:= XLSHEET.Range('A65536').End(xlUp).Row;
finally
end;
Il compilatore va in errore su XLSHEET.Range('A65536').End(xlUp).Row;
dicendomi
unit1.pas(48,38) Fatal: Syntax error, "identifier" expected but "END" found
Non essendoci altri modi gratuiti per interagire con file excel 2010 su fpc , qualche anima buona mi può dire come posso eludere l'errore oppure aggirarlo
Grazie