Форум ДИЦ

Пользовательский и Дилерский форум ДИЦ
Текущее время: Пт окт 19, 2018 3:34 pm

Часовой пояс: UTC + 3 часа [ Летнее время ]




Начать новую тему Ответить на тему  [ Сообщений: 6 ] 
Автор Сообщение
 Заголовок сообщения: Cell.Рамка
СообщениеДобавлено: Сб апр 14, 2018 10:09 am 
Не в сети

Зарегистрирован: Пт апр 16, 2004 5:11 pm
Сообщения: 6720
Откуда: OpenFly Soft Technology, Москва
Начинаю рисовать рамку в событиях при выводе или при рисовании - программа виснет.
При каком событии надо прорисовывать рамку?

_________________
www.TurboFlyERP.ru


Вернуться к началу
 Профиль Отправить личное сообщение Отправить email  
 
 Заголовок сообщения: Re: Cell.Рамка
СообщениеДобавлено: Сб апр 14, 2018 12:53 pm 
Не в сети

Зарегистрирован: Сб май 14, 2005 5:12 pm
Сообщения: 1683
В событиях ПриВыводе и ПриРисовании нельзя менять шаблон. Во всех остальных - можно.


Вернуться к началу
 Профиль Отправить личное сообщение  
 
 Заголовок сообщения: Re: Cell.Рамка
СообщениеДобавлено: Сб апр 14, 2018 6:25 pm 
Не в сети

Зарегистрирован: Пт апр 16, 2004 5:11 pm
Сообщения: 6720
Откуда: OpenFly Soft Technology, Москва
А в какой момент тогда прорисовывать рамки? ПриПеремещении?

_________________
www.TurboFlyERP.ru


Вернуться к началу
 Профиль Отправить личное сообщение Отправить email  
 
 Заголовок сообщения: Re: Cell.Рамка
СообщениеДобавлено: Вс апр 15, 2018 1:01 pm 
Не в сети

Зарегистрирован: Вт авг 01, 2017 8:09 pm
Сообщения: 55
Перед рисованием проверяйте его необходимость, чтобы избежать зацикливания.
Проверьте на том ли месте рамка. И рисуйте только если размер и место разъехались.

_________________
ТБ.Бюджет


Вернуться к началу
 Профиль Отправить личное сообщение Отправить email  
 
 Заголовок сообщения: Re: Cell.Рамка
СообщениеДобавлено: Вт апр 17, 2018 8:54 am 
Не в сети

Зарегистрирован: Пт апр 16, 2004 5:11 pm
Сообщения: 6720
Откуда: OpenFly Soft Technology, Москва
Почему Код не работает в событии ПриПеремещении:

Код:
  proc шаблон_ПриПеремещении;
    ПрорисоватьРамки;
  end;

  proc ПроРисоватьРамки;
    var i,j,k ,index           :Integer;
       if НазвДок="Норма1" then
       J= Template.Frame;
          for i = 1..длинамассива(CellPos) do

            index=индексвподтаблице(CellPos[i]);
            Template.Frame = index;

            CellPos[i].Рамка = [1,2,1,1];
            если index>1 then
               if позиции[index].видТМЦ=200   then
                  CellPos[i].Рамка = [1,2,1,1];
               еслиже позиции[index-1].видТМЦ=200   then
                  CellPos[i].Рамка = [1,1,1,2];
               еслиже index<позиции.количество и позиции[index+1].видТМЦ=200   then
                  CellPos[i].Рамка = [1,2,1,1];
               иначе
                  CellPos[i].Рамка = [1,1,1,1];
               end;
            end;
          end;
      Template.Frame = j;
       end;
  end;

  func РамкаНормыПриВыводе(Cell :TemplateCell; Value :Variant;
                                Action :Template.OutputTypes; var Format :String)
                                :Variant;
      if SearchInArray ( CellPos,Cell )<1  then
         CellPos[длинамассива(CellPos)+1]=cell;
      end;
    Result =Value ; -- Что получили, то и выводим
  end;


Все рамки прорисовываются в коде, а жирных линий на экране нету.

_________________
www.TurboFlyERP.ru


Вернуться к началу
 Профиль Отправить личное сообщение Отправить email  
 
 Заголовок сообщения: Re: Cell.Рамка
СообщениеДобавлено: Вт апр 24, 2018 12:49 pm 
Не в сети

Зарегистрирован: Пт апр 16, 2004 5:11 pm
Сообщения: 6720
Откуда: OpenFly Soft Technology, Москва
Попробуем при подсказке. Максим Русов пока еще не запретил.

_________________
www.TurboFlyERP.ru


Вернуться к началу
 Профиль Отправить личное сообщение Отправить email  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 6 ] 

Часовой пояс: UTC + 3 часа [ Летнее время ]


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 3


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Перейти:  
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group
Русская поддержка phpBB