3

Delphi 7 を使用しています。ファイルを使用する代わりに、オートメーションを使用して、リストの内容をプログラムから OpenOffice Calc にエクスポートしたいと考えています。

タスクは簡単です。新しいドキュメントを作成し、行/列を繰り返し、セル データを変更します。

いくつかのコードを見つけましたが、完全ではありません。誰かがこの非常に単純なタスクを実行するためのサンプル コードを用意してくれることを期待していました。数時間の試行時間を節約できます。

前もって感謝します！

編集: OpenOffice Calc を自動化して、上で書いたことを実現したいと思います。ありがとう！

4

2 に答える 2

2

最も簡単な解決策は、CSV ファイル出力を記述し、それを OpenOffice で開くことです。

OpenOffice Calc と Excel の両方で読み取ることができる .XLS ファイルを書き込むためのライブラリもあります。CSV はとても単純なので、例が必要なのだろうか。TStringList を作成し、コンマ区切り形式で文字列を追加します。ファイルに保存します。

いわゆる「プログラムによる」方法には、OLE オートメーションが含まれます。

uses
  OleAuto;

var
 mgr,calc,sheets,sheet1,dt,args:Variant;
begin
   args = VarArrayCreate(...);    
   mgr := CreateOleObject('com.sun.star.ServiceManager');
   dt := mgr.createInstance('com.sun.star.frame.Desktop')
   calc = dt.loadComponentFromURL('private:factory/scalc', '_blank', 0, args)
   sheets = calc.getSheets()
   sheet1 = sheets.getByIndex(0)
   ...
于 2011-04-20T17:23:15.193 に答える
2

Open Office が自動化をサポート

参照: http://udk.openoffice.org/common/man/tutorial/office_automation.html

Delphi の Open Office 情報は、http:
//development.openoffice.org/#OLEにあります。

サイト ooomacros.org はダウンしているようですが、幸いなことにウェイバック マシンにはまだコピーがあります
。

幸運を。

于 2011-04-20T20:37:31.613 に答える