Скачать: CL | DM;

Автопереход на следующий объект   Найти похожие ветки 

← →
Andrey V. ©   (2004-03-11 07:23) [0]

Допустим есть TMaskEdit и маска у него такова, что текст всегда добивается нулями .
Как после набора знаков перейти на следующий объект.
Перейти-то понятно как , я обычно использую
Perform(WM_NEXTDLGCTL,0,0);
а вот как отловить момент когда каретка доходит до конца - непонятно.

---

← →
MBo ©   (2004-03-11 07:33) [1]

или SelStart проверять или длину Text с удаленными пробелами

---

← →
Andrey V. ©   (2004-03-11 07:38) [2]

2 MBo
Так в том-то и дело , что длина текста всегда одинаковая, даже если мы туда неичего не пишем.

---

← →
Defunct ©   (2004-03-11 07:48) [3]

procedure TForm1.MaskEdit1KeyDown(Sender: TObject; var Key: Word;
 Shift: TShiftState);
begin
 Caption := Format("%D",[MaskEdit1.SelStart]);
end;

---

← →
MBo ©   (2004-03-11 07:49) [4]

>даже если мы туда неичего не пишем
Тогда он состоит из пробелов, их можно удалять

---

← →
Andrey V. ©   (2004-03-11 08:16) [5]

Спасибо SelStart рулит .

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.023 c