Icon View Thread

The following is the text of the current message along with any replies.
Messages 1 to 4 of 4 total
Thread How to get a value from a Excel cell to a DBISAM field
Mon, Dec 7 2009 11:42 PMPermanent Link

"John Postnikoff"
Hello Everyone,

I am wondering how I can get a value of a specific Excel cell to a  field of
a record, string grid cell, or var.
am using Delphi 7 with DBISAM.  Note I am not after the entire row, just one
value from a cell as described below.

e.g.  DBISAM_TABLE.Field2 := ExcelFile.A2

Any leads or examples are appreciated

John

Tue, Dec 8 2009 3:22 AMPermanent Link

Roy Lambert

NLH Associates

Team Elevate Team Elevate

John


A bit overkill but look at the SMImport software from www.scalabium.com. Its excellent, reasonably priced and with good support. Another option is something like COM automation if you can guarantee there's a copy of Excel on the PC. Best place to start for this is http://www.djpate.freeserve.co.uk/

Roy Lambert [Team Elevate]
Tue, Dec 8 2009 2:02 PMPermanent Link

"John Postnikoff"
Thanks. I did contact Scalabium and this is what Mike said to use. I would
have to use their components which I aleady have loaded into Delphi. Seems
fairly simple  See below:

Hello,

you may use the next code for this task:
uses SMCells, SMXLS;
....
var
 xlsEngine: TMSExcel;
 sheet: TSpreadSheet;
begin
 with TMSExcel.Create(Self) do
   try
     LoadFromFile(yourFileName);

     sheet := Sheets.SpreadSheet(0);
     if Assigned(sheet) then
     begin
       DBISAM_TABLE.Field2.Value := sheet.Cells.ValueByCell('A2')
     end
   finally
     Free
   end;
end;









"Roy Lambert" <roy.lambert@skynet.co.uk> wrote in message
news:DC6D3604-2DD2-4BCE-BE89-45ADA215C2B1@news.elevatesoft.com...
> John
>
>
> A bit overkill but look at the SMImport software from www.scalabium.com.
Its excellent, reasonably priced and with good support. Another option is
something like COM automation if you can guarantee there's a copy of Excel
on the PC. Best place to start for this is
http://www.djpate.freeserve.co.uk/
>
> Roy Lambert [Team Elevate]
>

Wed, Dec 9 2009 3:00 AMPermanent Link

Roy Lambert

NLH Associates

Team Elevate Team Elevate

John


Good. I like Mike, good components, reasonable prices and good support.

Roy Lambert
Image