Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2010.08.27;
Скачать: CL | DM;

Вниз

Экспорт данных в StringGrid   Найти похожие ветки 

 
sanya ©   (2010-03-30 17:41) [0]

У меня есть вопрос как будет выглядеть функция для загрузки данных в StringGrid из OpenOffice.Calc??

У меня есть функция для загрузки данных из Excel в StringGrid!

function xls_to_stringgrid(agrid: tstringgrid; axlsfile: string): boolean;
const
xlcelltypelastcell = $0000000b;
var
xlapp, sheet: olevariant;
rangematrix: variant;
x, y, k, r: integer;
begin
result := false;
xlapp := createoleobject("excel.application");
try
xlapp.visible := false;

xlapp.workbooks.open(axlsfile);

sheet := xlapp.workbooks[extractfilename(axlsfile)].worksheets[1];
sheet.cells.specialcells(xlcelltypelastcell, emptyparam).activate;

x := xlapp.activecell.row;
y := xlapp.activecell.column;

agrid.rowcount := x+1;
agrid.colcount := y+1;

rangematrix := xlapp.range["a1", xlapp.cells.item[x, y]].value;

k := 1;
repeat
for r := 1 to y do
agrid.cells[(r ), (k )] := rangematrix[k, r];
inc(k, 1);
agrid.rowcount := k ;
until k > x;

rangematrix := unassigned;

finally

if not varisempty(xlapp) then
begin
xlapp.quit;
xlapp := unassigned;
sheet := unassigned;
result := true;
end;
end;
end;

Если кто-то сталкивался с данной проблемой отпишитесь!!
За ранее всем СПАСИБО!


 
Jeer ©   (2010-03-30 17:48) [1]

Ты с проблемы начни, нехватка мозга это не проблема, а дефект.


 
sanya ©   (2010-03-30 17:57) [2]

С дефектами  повторюсь. Как будет выглядеть функция для загрузки данных в StringGrid из OpenOffice.Calc??


 
Jeer ©   (2010-03-30 18:13) [3]


> sanya ©   (30.03.10 17:57) [2]
>
> С дефектами  повторюсь.


Т.е. дефект не позволяет включить поиск и найти нечто следующее ?
http://www.delphimaster.ru/articles/openoffice/index.html

А.. я понял - надо знать как именно выглядит требуемая функция..
Тут, батенька - озвучьте сумму.

P.S.
Можно и через нативный ( BIFF) файл с исп. NativeExcel или XLSReadWrite


 
Игорь Шевченко ©   (2010-03-30 19:07) [4]


> У меня есть вопрос как будет выглядеть функция для загрузки
> данных в StringGrid из OpenOffice.Calc??


http://sql.ru/forum/actualthread.aspx?tid=405083


 
Anatoly Podgoretsky ©   (2010-03-30 19:20) [5]

Это тот случай, когда количество перешло в качество и это стало уже проблемой.


 
Jeer ©   (2010-03-30 20:06) [6]


> Anatoly Podgoretsky ©   (30.03.10 19:20) [5]
>
> Это тот случай, когда количество перешло в качество и это
> стало уже проблемой.


А мне показалось, что количество не сумело перейти в осознанное качество и проблема - в этом.



Страницы: 1 вся ветка

Текущий архив: 2010.08.27;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.051 c
15-1268299417
Sergey Masloff
2010-03-11 12:23
2010.08.27
Оффтоп и холивар. Православный крест как символ МИФИ


2-1267359992
Алексей4105
2010-02-28 15:26
2010.08.27
Чтение файлы построчно без завершения на eof


2-1266403680
Незнайка на Луне
2010-02-17 13:48
2010.08.27
База данных по научным статьям


2-1274254857
lock95
2010-05-19 11:40
2010.08.27
поиск одинаковых частей в двух бинарных файлах


2-1272982597
novichek
2010-05-04 18:16
2010.08.27
TCPserver