не работает MaxLength в ValueListEditor

← →
_guest_ (2008-12-26 12:02) [0]

не работает MaxLength в ValueListEditor. Кто сталкивался? Это глюк Делфей или я чего-то не понимаю. В Делфи7 такой проблемы вроде нет.

← →
Johnmen © (2008-12-26 12:07) [1]

Что такое "MaxLength в ValueListEditor"? И почем оно должно работать бесплатно?

← →
_guest_ (2008-12-26 12:13) [2]

> Johnmen © (26.12.08 12:07) [1]
> Что такое "MaxLength в ValueListEditor"? И почем оно должно
> работать бесплатно?

Хорошо: не работает ValueListEditor1.ItemProps[1].MaxLength := 2;
"не работасть" заключается в том, что после этого ввод строки не ограничивается двумя символами.
А про "бесплатно" я не понял, извини.

← →
_guest_ (2008-12-26 12:54) [3]

ни у кого случайно нет Делфи6 и 5 минут времени для меня: кинуть на пустую форму ValueListEditor, ввести в него один пункт, ограничить ввод, запустить и попробовать ввести несколько символов.
А потом написать здесь - работает ограничение ввода или нет. Буду очень благодарен. Если и не работает, так хоть успокоюсь и сделаю по-другому.

← →
Johnmen © (2008-12-26 13:34) [4]

Просмотр исходников показывает, что учет этого свойства реализован в D7.
Но НЕ реализован (не перекрыт) в D6, где берётся от предка, а там =0.

← →
Johnmen © (2008-12-26 13:34) [5]

...если интересно, см. процедуру GetEditLimit.

← →
_guest_ (2008-12-26 13:48) [6]

> Johnmen © (26.12.08 13:34) [4]
> Просмотр исходников показывает, что учет этого свойства
> реализован в D7.Но НЕ реализован (не перекрыт) в D6, где
> берётся от предка, а там =0.

т.е. можно найти ValEdit от Делфи7 посмотреть как там и сделать так же?

> Johnmen © (26.12.08 13:34) [5]
> ...если интересно, см. процедуру GetEditLimit.

не совсем понимаю как ее привязать к ValueListEditor... но все равно спасибо.

> _guest_ (26.12.08 13:48) [6]

Посмотри, как она реализована в D7, и сделай так же.
Только не понятно, зачем эти танцы, если есть D7?

← →
_guest_ (2008-12-26 14:06) [8]

> Johnmen © (26.12.08 13:52) [7]
> Посмотри, как она реализована
> в D7, и сделай так же.Только не понятно, зачем эти танцы,
> если есть D7?

D7 нет, только D6, а: "В Делфи7 такой проблемы вроде нет." - с утра сижу в посковиках и нашел упоминание, что в D7 это работает.

> Делфи7 такой проблемы вроде нет

function TValueListEditor.GetEditLimit: Integer;
var
ItemProp: TItemProp;
begin
ItemProp := FStrings.FindItemProp(Row-FixedRows);
if Assigned(ItemProp) then
Result := ItemProp.MaxLength else
Result := inherited GetEditLimit;
end;

не работает MaxLength в ValueListEditor Найти похожие ветки