програмная смена текущей закладки на форме

[Gostapko]

привет.

Заказчик озвучил интересную задачу: при сохранении записи с незаполнеными обязательными полями нужно подсветить поле красным цветом (например), а если на форме несколько закладок (таб контрол), то сначала переключить на нужную закладку. Переключить - SendKeys, а вот как с "подсветкой" быть? Доступиться в рантайме к свойствам Border и иже с ними нельзя, а подсветить надо. У кого какие идеи будут?

Н.Б. Идеи о красивых сообщениях не принимаются, нужно именно "покрасить в синий цвет" . заказчик нынче на вес золота и спорить с ним - последнее дело )

[Fordewind]

Цитата:

Сообщение от Genost

привет.

Заказчик озвучил интересную задачу: при сохранении записи с незаполнеными обязательными полями нужно подсветить поле красным цветом (например), а если на форме несколько закладок (таб контрол), то сначала переключить на нужную закладку. Переключить - SendKeys, а вот как с "подсветкой" быть? Доступиться в рантайме к свойствам Border и иже с ними нельзя, а подсветить надо. У кого какие идеи будут?

Н.Б. Идеи о красивых сообщениях не принимаются, нужно именно "покрасить в синий цвет" . заказчик нынче на вес золота и спорить с ним - последнее дело )

1. Берем нужные поля и делаем им клоны, крашеные в нужные цвета.
2. Кладем клоны на тех же вкладках, что и оригиналы (не надо накладывать на сами оригиналы) и делаем их не видимыми
3. В момент Х делаем оригиналы невидимыми, задаем клонам координаты оригинала и делаем их видимыми. Командуем CurrForm.ИмяКлона.ACTIVATE;

Все.

[apanko]

Цитата:

Сообщение от Genost

Заказчик озвучил интересную задачу: при сохранении записи с незаполнеными обязательными полями нужно подсветить поле красным цветом (например), а если на форме несколько закладок (таб контрол), то сначала переключить на нужную закладку. Переключить - SendKeys, а вот как с "подсветкой" быть? Доступиться в рантайме к свойствам Border и иже с ними нельзя, а подсветить надо. У кого какие идеи будут?

Н.Б. Идеи о красивых сообщениях не принимаются, нужно именно "покрасить в синий цвет" . заказчик нынче на вес золота и спорить с ним - последнее дело )

Я бы переключался между закладками с помощью Activate.

Form - OnQueryCloseForm() : Boolean
IF "Field1" = '' THEN BEGIN
  CurrForm."Field1".Activate;
  ERROR('');
END;

Что касается цвета. То первое, что приходит в голову - это завести элементы управления-дублеры, покрашенные в нужный цвет, и делать их видимыми, а обычные элементы управления скрывать (все в том же триггере).


UPD. Медленно писал. Fordewind опередил

[Gostapko]

ох, спасибо ребята, но не подходит... такую функциональность нужно предусмотреть на всех формах (мамадарагая). а если заказчик подкрутит еще какой-то ад-он стороннего партнера? туда мы средствами НАВ-а не влезем (лицензия), да и если влезем, то опять-таки нужно продублировать таким макаром все новые формы. сколько их там тыщ только в стандартной поставке?...
может, еще будут варианты?

[Fordewind]

Цитата:

Сообщение от Genost

ох, спасибо ребята, но не подходит... такую функциональность нужно предусмотреть на всех формах (мамадарагая). а если заказчик подкрутит еще какой-то ад-он стороннего партнера? туда мы средствами НАВ-а не влезем (лицензия), да и если влезем, то опять-таки нужно продублировать таким макаром все новые формы. сколько их там тыщ только в стандартной поставке?...
может, еще будут варианты?

А у заказчика денег хватит на такую хотелку? Я конечно, понимаю, что кризис и все такое, но это не предусмотрено ядром ну никак.

[romeo]

Обычный, стандартный, так не любимый пользователями TESTFIELD мне кажется намного лучше. И тонизирует хорошо. И пользователи расслабляться не будут и знать будут на каких вкладках формы какие поля. Глядишь ориентироваться в СВОЕЙ работе будут лучше -)

[Sid Vicious]

Цитата:

Сообщение от apanko

Я бы переключался между закладками с помощью Activate.

Разве такое возможно ? Я не смог найти такой возможности. К этому еще не помешало бы что-то вроде OnActivate().

[apanko]

Цитата:

Сообщение от Sid Vicious

Разве такое возможно ? Я не смог найти такой возможности. К этому еще не помешало бы что-то вроде OnActivate().

Возможно.
Скорее всего вас смутила строка CurrForm."Field1".Activate;
Обратите внимание, что Field1 это не поле, а имя (свойство name) нужного элемента управления (textbox).

[Fordewind]

Цитата:

Сообщение от Sid Vicious

Разве такое возможно ? Я не смог найти такой возможности. К этому еще не помешало бы что-то вроде OnActivate().

Нажимаете F5 - CurrForm - Controls - ИмяКонтрола -Zoom In (стрелка внизу)- Functions - Activate

[Sancho]

Цитата:

Сообщение от Genost

Н.Б. Идеи о красивых сообщениях не принимаются, нужно именно "покрасить в синий цвет" . заказчик нынче на вес золота и спорить с ним - последнее дело )

как вариант, кепшены полей красить...
криво, конечно, все это, и кодить много... но, если женщина хочет...


рядом с каждым полем вставить битмапс: желтый треугольник с восклицательным значком.
менять его видимость