MaxLength на TEdit не работи на Android с DELPHI XE7 (актуализация 1)

Някой знае ли защо не работи MaxLength на TEdit на Android с DELPHI XE7 (актуализация 1)?

Има ли някакво решение за преодоляване на този проблем?


android delphi maxlength firemonkey delphi-xe7
person Community    schedule 11.12.2014    source източник
comment
Ако го зададете по време на изпълнение при създаване на формуляр, Edit1.MaxLength := xxx, работи ли тогава? Имайте предвид, че това свойство засяга само въвеждането от клавиатурата.   -  person LU RD    schedule 11.12.2014
comment
Опитвам го по време на изпълнение, но не работи. :(   -  person    schedule 11.12.2014
comment
Същият проблем е и с TMemo   -  person pudnivec74    schedule 11.12.2014

Отговори (2)


arrow_upward
6
arrow_downward

Има някакъв проблем в DELPHI XE7 актуализация 1 (вижте моя доклад QC 129171)

Можете да го преодолеете с този малък код (пример за MaxLength = 5):

procedure TForm1.Edit1Typing(Sender: TObject);
begin
  if Length(Edit1.Text) > 5 then
    Edit1.Text:= Edit1.Text.Substring(0, 5);
end;
person pudnivec74    schedule 11.12.2014

arrow_upward
0
arrow_downward

Този бъг също съм подавал. За щастие грешката беше коригирана в следващата версия.

person Community    schedule 01.11.2015