Как кинуть данные в Excel?

← →
Leda (2005-11-04 20:23) [0]

Подскажите пожалуйста, как кинуть данные в Excel, а затем вернуть уже готовый результат в форму Delphi.

← →
Explorer (2005-11-05 09:56) [1]

Если я правильно понял вопрос, то что-то примерно такое:

procedure TForm1.Button1Click(Sender: TObject);
var
Excel:variant;
WBk,Rnge : OleVariant;
a_:integer;
d3:Variant;
begin
Excel:=CreateOleObject("Excel.Application");
WBk := Excel.WorkBooks.open("C:\2.xls");
a_:=2;
Excel.ActiveSheet.Cells[8, a_].Value := "что-то пишем в ячейку";
d3:= Excel.ActiveSheet.Cells[8, a_].Value;
WBk.Close(SaveChanges := True);
Excel.Quit;
Edit3.Text := d3; //выводим данные из ячейки
end;

end.

← →
Polevi © (2005-11-05 16:04) [2]

бред

← →
Explorer (2005-11-05 19:10) [3]

что именно?

Читаем статью "по волнам интеграции" на королевстве делфи

Как кинуть данные в Excel? Найти похожие ветки