Три букви

← →
Алекз (2004-05-17 02:49) [0]

Люди! Есть edit и button. Мне нужно, чтоб при клике на батон в эдите три последние символа удалялись.

← →
Liona © (2004-05-17 02:57) [1]

А строка в едите известного размера?

А то можно еще и перевернуть строку, удалить 3 первых и перевернуть обратно.

← →
Ihor Osov'yak © (2004-05-17 03:01) [2]

в обработчике клика бутона

if length(edit.Text) >= 3
then
edit.Text := Copy(edit.text, 1, length(edit.text) - 3);

зы. Книги иногда читать нужно. Или на пары ходить. Тоже иногда.

← →
Германн © (2004-05-17 03:02) [3]

2 Liona © (17.05.04 02:57) [1]
А разве размер строки в едите секретный?

← →
Алекз (2004-05-17 03:04) [4]

спасибо!

← →
Beglec (2004-05-17 06:23) [5]

А зачем вводить 3 последние буквы если их всеравно удалят ? :))))
Может просто ограничение на вводе поставить в самом Edit объекте ?
Edit1.MaxLength

Попробуй так:
delete(edit1.text,1,2);
1 - номер символа, с которого начинается удаляемая строка
2 - длина удаляемой строки

Три букви Найти похожие ветки