Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.13;
Скачать: CL | DM;

Вниз

Плз помогите. Делаю отчет в word2000 (win98SE) все работает норма   Найти похожие ветки 

 
SiJack ©   (2003-10-30 16:14) [0]

льно ставлю программу на winXP word2002 - заполняет половину отчета и пишет "Запрашиваемый номер семейства не обнаружен", причем происходит это при заполнении таблицы подскажите в чем может быть трабл?


 
SiJack ©   (2003-10-30 16:17) [1]

Код
dm.ADOPosition.First;
while not dm.ADOPosition.eof do
begin
if (dm.ADOPositionPPosition.Value div (stend*10))=1 then
begin
// заполняем номера счетчиков
dm.WD.Content.Tables.Item(1).Cell(2,dm.ADOPositionPPosition.Value-stend*10).Range.Text:=dm.ADOPositionPNumber.Value; //
// заполняем доп тесты
if (dm.ADOPositionPSensitivity.Value<>0) and (dm.ADOTestPSensitivityCB.Value) then
begin
case dm.ADOPositionPSensitivity.Value of
1: s:="Есть";
2: s:="Нет";
end;
// заносим результаты
dm.WD.Content.Tables.Item(1).Cell(dm.ADOTestPoint.RecordCount+3,6+dm.ADOPositionPPosition.Value-stend*10).Range.Text:=s;
// данные теста
dm.WD.Content.Tables.Item(1).Cell(dm.ADOTestPoint.RecordCount+3,1).Range.Text:=IntToStr(dm.ADOTestPoint.RecordCount+1);
dm.WD.Content.Tables.Item(1).Cell(dm.ADOTestPoint.RecordCount+3,2).Range.Text:="ч";
dm.WD.Content.Tables.Item(1).Cell(dm.ADOTestPoint.RecordCount+3,3).Range.Text:=dm.ADOTestPSensitivityU.AsString;
dm.WD.Content.Tables.Item(1).Cell(dm.ADOTestPoint.RecordCount+3,4).Range.Text:=dm.ADOTestPSensitivityI.AsString;
dm.WD.Content.Tables.Item(1).Cell(dm.ADOTestPoint.RecordCount+3,5).Range.Text:="1";
dm.WD.Content.Tables.Item(1).Cell(dm.ADOTestPoint.RecordCount+3,6).Range.Text:=dm.ADOTestPSensitivityT.AsString+decimalS eparator+dm.ADOTestPSensitivityTSec.AsString;
end;



Страницы: 1 вся ветка

Текущий архив: 2003.11.13;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.024 c
14-41904
bis
2003-10-21 16:13
2003.11.13
чем дальше, тем умнее


1-41152
Zheks
2003-11-03 12:18
2003.11.13
Приостановка выполнения процедуры


3-41077
Layner
2003-10-23 16:54
2003.11.13
Неполное копирование БД SQL Server 2000


14-41882
Ysaev Grigoriy
2003-10-21 16:47
2003.11.13
Програмирование как искусство.


4-42310
JS
2003-09-06 17:07
2003.11.13
Прозрачный bitmap в меню