Re: import Excel file

[Martin Krischik <krischik@users.sourceforge.net>]

Tanker wrote:

> Hi,
> 
> I want to import data from an ms exel file in my program. Can someone give
> me a hint how I can realize that. I already tried to read the exel file as
> a text_io and sequential_Io file but it's not possible as Text_IO 'cause
> it must be a sequential_IO (or direct_IO) file. The problem with the
> sequential_IO is, that i can't figure out how the form and substance of
> the file looks like (is it a record, what kind of record(contents)?)

I take it that you have some documentation on the format of excel and that
you are willing to take the effort of reading a binary file.

Since the excel format containts loot of different data the answer are
streams. Ada streams are the File IO to read different types.

An integer is read by:

A : Integer := Integer'Input (My_Stream);

Integer'Read (My_Stream, A);

A X Character String by:

type X_String is new string (1 .. X)

X : X_String := X_String'Input (My_Stream);

X_String'Read (My_Stream, X);

Beware: There is a important difference between 'Read and 'Input: 'Read is
more low level and 'Input more high level. i.E. String'Input expect the
length of the string to be part of the input data - String'Read does not.

However, in the example I have given I used X_String of the defined length X
- since the length is known X_String'Read and X_String'Input should work
the same.

With Regads

Martin

-- 
mailto://krischik@users.sourceforge.net
http://www.ada.krischik.com