Передача данных в Excel

← →
Aleksandrrr © (2005-08-10 12:57) [0]

Как правильно организовать передачу данных в Excel
Пытаюсь сделать это следующим способом, но тщетно!

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DdeMan;

type
TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
// Button2: TButton;
DdeClientConv1: TDdeClientConv;
procedure Button1Click(Sender: TObject);

private
{ Private declarations }
public
{ Public declarations }

end;

var
Form1: TForm1;

implementation

{$R *.dfm}
function PokeData(Item: string; Data: PChar): Boolean;
begin
end;
procedure TForm1.Button1Click(Sender: TObject);
var ToExcel: array[0..100] of char;
begin
StrPCopy("ToExñel", Edit1.Text);
DDEClientConv1.PokeData( "R2C3",ToExcel);

end;
end.

← →
Digitman © (2005-08-10 13:00) [1]

обязателен именно DDE-механизм ?

или его использование - первое что пришло на ум ?

← →
dRake © (2005-08-10 14:27) [2]

Вот компонент для работы с xls файлами.

http://dopesoft.net/files/XLSReadWrite2.rar

С сорцами и примерами.

не хочет устанавливаться.
Нет файла XLS ReadWriteII_D7.dpk ,который требуют установить.
Может, я че-то не понял?

Передача данных в Excel Найти похожие ветки