Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.11.13;
Скачать: [xml.tar.bz2];

Вниз

Плз помогите. Делаю отчет в 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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.034 c
1-41141
minimax
2003-11-03 14:07
2003.11.13
нужен компонент


3-41047
dimablind
2003-10-24 15:26
2003.11.13
функция max в sql


14-42064
zzet
2003-10-21 14:20
2003.11.13
Задача про 12 монет. Возвращение.


1-41621
Senti
2003-10-25 20:23
2003.11.13
проблема с отображением Gif файлов


4-42295
Olfi
2003-09-09 23:28
2003.11.13
Как узнать титл активного окна?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский