Jak otworzyć i narysowac tabele w OpenOffice za pomocą OLE?
W Wordzie jest następująco:
//--------------------------------------------------------
uses
ComObj;

procedure TForm1.Button1Click(Sender: TObject);
var
WordApp, NewDoc, WordTable: OLEVariant;
iRows, iCols, iGridRows, jGridCols: Integer;
begin
try
WordApp := CreateOleObject('Word.Application');
except

Exit;

end;

WordApp.Visible := True;

NewDoc := WordApp.Documents.Add;

iCols := 5; iRows := 5;

WordTable := NewDoc.Tables.Add(WordApp.Selection.Range, iCols, iRows);

//dodajemy tekst do (2,2)
WordTable.Cell(2, 2).Range.Text := ' Jak to samo zrobić w OpenOffice????? ';
//---------------------------------------------------------------------------------------
No własnie ,a jak to samo zrobić w OpenOffice ???????

otworzyc OpoenOffica można:

//------------------------------------------------------------
var
OO,Table: Variant;
begin
OO := CreateOleObject('com.sun.star.ServiceManager');
//------------------------------------------------------------

ale co dalej????

Pozdrawiam!