Afalina Soft XL Report 4 - "Ошибка сервера" [D7, WinXP]
ruslan_as © (2005-08-26 11:36:00)
Перестала работать моя программа - ругается на строке
xlReport1.Report. Во избежании лишнего запустил пустой проэкт на
машине, где только компонент XL Report и файл Excel. Все равно
выдает ошибку Visual Basik "Это действие приведет к перезапуску
проекта". Офис 2003.
Раз проблемы с офисом (тем более, что в документации к
Afaline я не нашел упоминания о 2003) я установил Office 97.
Запускаю тот же проэкт - пишет "ошибка сервера". Проблема не была
бы серьезной, но этот проэкт не работает и некоторых других
машинах. Пробовал изменять свойство DataExportMode - изменений
нет.
KorD (2005-08-26 16:39:00) [1]
Попробуй создавать компонент виртуально
у меня тоже както начались похожиеглюки, так помогло
var
xlRepVedPP: TxlReport;
Dsr: TxlDataSource;
begin
xlRepVedPP := TxlReport.Create(Self);
xlRepVedPP.Params.Clear;
xlRepVedPP.Params.Add.Name:='Test';
xlRepVedPP.ParamByName['Test'].Value := '123';
Dsr := xlRepVedPP.DataSources.Add;
Dsr.DataSet :=
adoqVedPP_List;
Dsr.Range :=
'';
Dsr.Alias :=
'adoqVedPP_List';
//Dsr.Options :=
Dsr.Options-[xrgoPreserveRowHeight];
Dsr := xlRepVedPP.DataSources.Add;
Dsr.DataSet :=
adoqVedPP_Data;
Dsr.Range :=
'VedPPData';
Dsr.Alias :=
'adoqVedPP_Data';
//Dsr.Options :=
Dsr.Options-[xrgoPreserveRowHeight];
xlRepVedPP.Report;
xlRepVedPP.Free;
end;
Наверх 
ЧАТ |
Орешник |
|
