Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / 1С [игнор отключен] [закрыт для гостей] / 1c и COM / 8 сообщений из 8, страница 1 из 1
24.03.2014, 10:59
    #38594282
sergq
sergq
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1c и COM
Здравствуйте.

Подскажите как добраться до табличной части документа?

делаю так.

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
  ole_TekDoc := UnAssigned;
  ole_1C := CreateOleObject('V82.COMCONNECTOR');//V82.application
  ole_1C := ole_1C.Connect('srvr=х.х.х.х;ref=Base;usr=Àäìèíèñòðàòîð');

  if not VarIsEmpty(ole_1C) then begin
     ole_Doc := ole_1C.Документы.ЗаявкаНаКассовыйРасход;
     if not VarIsEmpty(ole_Doc) then begin
        ole_TekDoc := ole_Doc.Выбрать();
        n := 0;
        Screen.Cursor := crHourGlass;    { Show hourglass cursor }
        while ole_TekDoc.Следующий() do begin
          memo1.Lines.Add(ole_tekDoc.Номер);
          memo1.Lines.Add(ole_tekDoc.Дата);
          memo1.Lines.Add(ole_tekDoc.Контрагент.НаименованиеПолное);
          memo1.Lines.Add(ole_tekDoc.СуммаДокумента);
          memo1.Lines.Add(ole_tekDoc.Коментарий);



А вот как добраться до табличной части? Есть там две таких. одна - РасшифровкаПлатежа.


Спасибо
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.03.2014, 11:07
    #38594297
Shuhard
Shuhard
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1c и COM
ole_TekDoc.РасшифровкаПлатежа
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.03.2014, 11:09
    #38594302
sergq
sergq
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1c и COM
Shuhard,

Член группы не найден
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
24.03.2014, 17:25
    #38594937
Shuhard
Shuhard
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1c и COM
sergqShuhard,

Член группы не найден
какой итератор был применен ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.03.2014, 09:41
    #38596594
sergq
sergq
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1c и COM
Shuhard,

можно подробней что вы имели ввиду?)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.03.2014, 15:07
    #38597035
Сисой
Сисой
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1c и COM
Код: sql
1.
2.
3.
4.
5.
Если на COM-клиенте есть итератор типа For Each ... , то перебираем членов коллекции ole_TekDoc. РасшифровкаПлатежа

Иначе цикл for c 1 по ole_TekDoc. РасшифровкаПлатежа.Количество()

Обращаемся к ole_TekDoc. РасшифровкаПлатежа[i]
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.03.2014, 16:52
    #38597206
sergq
sergq
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1c и COM
Сисой,

или я торможу или... )

Код: pascal
1.
2.
3.
4.
5.
6.
          n:=ole_tekDoc.РасшифровкаПлатежа.Количество;

          tab:=ole_tekDoc.РасшифровкаПлатежа;
          n:=tab.Количество;
          n:=0;
          row:=ole_tekDoc.РасшифровкаПлатежа[n];



Все строки отрабатывают ОК.

Последняя - недопустимое число параметров
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
26.03.2014, 17:55
    #38597299
pail
pail
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
1c и COM
sergq,
вместо [n] лучше использовать метод табличной части .Получить(n) или .Get(n)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / 1С [игнор отключен] [закрыт для гостей] / 1c и COM / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]