[yasenkov]

Я конешно понимаю что всех уже тут достал =( , ... но через месяц уже диплом защищать а прога практически работает тока в моём подсознании ,... подскажите как сохранить excell в формате 97-2003

[poli-smen]

Сообщение от yasenkov

Я конешно понимаю что всех уже тут достал =( , ... но через месяц уже диплом защищать а прога практически работает тока в моём подсознании ,... подскажите как сохранить excell в формате 97-2003

Попробуй так:

Код:

ExcelWorkbook.SaveAs('FileName.xls', xlWorkbookNormal, '', '', False, False,
                     xlNoChange, xlLocalSessionChanges, False, 0, 0, LOCALE_USER_DEFAULT);

Или вместо xlWorkbookNormal используй xlExcel8.

[yasenkov]

Сообщение от poli-smen

Попробуй так:

Код:

ExcelWorkbook.SaveAs('FileName.xls', xlWorkbookNormal, '', '', False, False,
                     xlNoChange, xlLocalSessionChanges, False, 0, 0, LOCALE_USER_DEFAULT);

Или вместо xlWorkbookNormal используй xlExcel8.

Error] Unit2.pas(234): Undeclared identifier: 'xlWorkbookNormal'

[poli-smen]

Сообщение от yasenkov

Error] Unit2.pas(234): Undeclared identifier: 'xlWorkbookNormal'

А ты сделал

Код:

uses
  Excel2000 или ExcelXP

Или как ты работаешь с Excel-ем?

[yasenkov]

Сообщение от poli-smen

А ты сделал

Код:

uses
  Excel2000 или ExcelXP

Или как ты работаешь с Excel-ем?

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, DBTables, Grids, DBGrids, ExtCtrls,Comobj, Activex,
XPMan, ComCtrls;

var
Excel:Variant;
Wbk: OleVariant;
begin
Excel:=CreateOleObject('Excel.Application'); //Ñîçäà¸ì Excel
wbk:=excel.workbooks.open(Edit1.Text); //îòêðûâàåì Excel

[poli-smen]

Сообщение от yasenkov

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, DB, DBTables, Grids, DBGrids, ExtCtrls,Comobj, Activex,
XPMan, ComCtrls;

var
Excel:Variant;
Wbk: OleVariant;
begin
Excel:=CreateOleObject('Excel.Application'); //Ñîçäà¸ì Excel
wbk:=excel.workbooks.open(Edit1.Text); //îòêðûâàåì Excel

Понятно, используешь позднее связывание. Мне больше нравится раннее связывание.
Но в любом случае, чтобы получить доступ к константам нужно прописать в uses тот модуль где они описаны.

[yasenkov]

спасибо всё заработало !