удаление последнего символа

← →
pro_xaoc © (2010-05-17 10:58) [0]

прошу помощи. Как программно удалить последний символ из компонента Edit? Я делал так, например:

if length(edit1.text)=4 then
edit1.text:=edit1.text(length(3));

но дельфи ругается, говоря что я пишу всякий бред.
прошу помогите выяснить это.

← →
Евгений Р. (2010-05-17 11:00) [1]

if length(edit1.text)>0 then edit1.text:=copy(edit1.text,1,length(edit1.text)-1)

← →
RWolf © (2010-05-17 11:00) [2]

edit1.text:=Copy(edit1.text, 1, length(edit1.text)-1);

← →
pro_xaoc © (2010-05-17 11:13) [3]

о большое вам спасибо, разобрался =)))

← →
Anatoly Podgoretsky © (2010-05-17 12:01) [4]

> но дельфи ругается, говоря что я пишу всякий бред.
> прошу помогите выяснить это.

А чего тут выяснять, правду говорит - это бред и есть.

← →
12 © (2010-05-17 13:55) [5]

> Как программно удалить последний символ из компонента Edit

А обычно как его удаляют? кувалдой?

← →
Leonid Troyanovsky © (2010-05-17 14:44) [6]

> 12 © (17.05.10 13:55) [5]

> А обычно как его удаляют? кувалдой?

Клавишами, End+Backspace.

--
Regards, LVT.

← →
Anatoly Podgoretsky © (2010-05-17 16:25) [7]

> Leonid Troyanovsky (17.05.2010 14:44:06) [6]

Это кусачки

← →
han_malign (2010-05-17 17:09) [8]

> Это кусачки

EM_SETSEL+EM_REPLACESEL

← →
sniknik © (2010-05-17 17:14) [9]

procedure TForm1.SpeedButton1Click(Sender: TObject); var i: integer; begin with Edit1 do begin i:= SendMessage(Handle, EM_LINELENGTH, -1, 0); SendMessage(Handle, EM_SETSEL, i-1, i); SendMessage(Handle, WM_CLEAR, 0, 0); end; end;

← →
Leonid Troyanovsky © (2010-05-17 18:17) [10]

> Anatoly Podgoretsky © (17.05.10 16:25) [7]

> Это кусачки

Клешни :)

--
Regards, LVT.

← →
pro_xaoc © (2010-05-17 19:00) [11]

Харе строить из себя умников, вопрос был задан четко и корректно, а знающие люди давно уже ответили на них, если хотите что либо доказать пожалуйста, аргументируйте!!!

← →
pro_xaoc © (2010-05-17 19:02) [12]

И потом, читали это: Конференция для начинающих, а также для тех, кому сложно объяснить чего он хочет. Просьба к участникам быть взаимовежливыми, профессионалам отдельная просьба - быть снисходительными.

← →
Leonid Troyanovsky © (2010-05-17 19:06) [13]

> pro_xaoc © (17.05.10 19:00) [11]

> Харе строить из себя умников, вопрос был задан четко и корректно,
> а знающие люди давно уже ответили на них, если хотите что
> либо доказать пожалуйста, аргументируйте!!!

Рассуждай токмо о том, о чем понятия твои тебе сие дозволяют.
Так: не зная законов языка ирокезского, можешь ли ты делать
такое суждение по сему предмету, которое не было бы
неосновательно и глупо? [КП]

--
Regards, LVT.

← →
pro_xaoc © (2010-05-17 19:19) [14]

> Рассуждай токмо о том, о чем понятия твои тебе сие дозволяют.
> Так: не зная законов языка ирокезского, можешь ли ты делатьтакое
> суждение по сему предмету, которое не было бы неосновательно
> и глупо?

Да ты сам понял что написал? ... иди русский подучи немного...

← →
Leonid Troyanovsky © (2010-05-17 19:24) [15]

> pro_xaoc © (17.05.10 19:19) [14]

> Да ты сам понял что написал? ... иди русский подучи немного.

Великий русский поэт написал, совместно с братьями.
И где там с русским нескладно?

Господи, куда же мы катимся?

--
Regards, LVT.

← →
{RASkov} © (2010-05-17 19:26) [16]

> [14] pro_xaoc © (17.05.10 19:19)

приостынь...

← →
_Юрий © (2010-05-17 20:01) [17]

Интересно, а обвинения оппонента в неграмотности всегда сами по себе пишутся с ошибками?
Такое впечатление, что да :-)

← →
Leonid Troyanovsky © (2010-05-17 20:09) [18]

> _Юрий © (17.05.10 20:01) [17]

> Интересно,

Не.

--
Regards, LVT.

понимаю когда не понимают, начинаешь объяснять, оскорбляются. (незнакомые термины за сот в свой адрес принимают) или когда объясняешь, а они считают, что знают и типа "че вы тут совсем за ламера меня держите?" и снова оскорбляются...
но чтобы вот так. дали код, а в ответ "Харе строить из себя умников,"... это новое слово в искусстве оскорбляться.

анекдот, к месту, только нужно немного исходные поправить ->
---------------------------
Эстонский тюнинг автомобиля - это 10 педалей тормоза, передающих все оттенки смысла...

сот - мат

Читали, но это конференция для начинающих.

> Anatoly Podgoretsky © (17.05.10 20:17) [22]

> Читали, но это конференция для начинающих.

> pro_xaoc © (17.05.10 19:00) [11]

Начинающие отдыхают.

--
Regrds, LVT.

> понимаю когда не понимают, начинаешь объяснять, оскорбляются.
> (незнакомые термины за сот в свой адрес принимают) или
> когда объясняешь, а они считают, что знают и типа "че вы
> тут совсем за ламера меня держите?" и снова оскорбляются.
> ..но чтобы вот так. дали код, а в ответ "Харе строить из
> себя умников,"... это новое слово в искусстве оскорбляться.
> анекдот, к месту, только нужно немного исходные поправить
> ->

дело не в этом! и потом, это форум или помойка?
Какой у меня был вопрос? правильно "удаление последнего символа", а посты с 4 по 8 и 10-ый пост к этому относится? правильно - никак не относится, так что не надо мне тут говорить типо оскорбление то да сё! Я ценю людей, которые говорят четко и ясно, вот как посты под номерами 1 и 2. Вот я их отблагодарил по человечески. А после этого кто-то там комментирует ещё, но зачем это надо, если тема уже закрыта??? Блин, конкретный вопрос - конкретный ответ и точка!

> pro_xaoc © (17.05.10 20:27) [24]

> дело не в этом! и потом, это форум или помойка?
> Какой у меня был вопрос? правильно "удаление последнего
> символа", а посты с 4 по 8 и 10-ый пост к этому относится?
> правильно - никак не относится, так что не надо мне тут
> говорить типо оскорбление то да сё! Я ценю людей, которые
> говорят четко и ясно, вот как посты под номерами 1 и 2.
> Вот я их отблагодарил по человечески. А после этого кто-
> то там комментирует ещё, но зачем это надо, если тема уже
> закрыта???

Борис, те не прав.

--
Regards, LVT.

> pro_xaoc © (17.05.10 20:27) [24]

О, как много еще ТС предстоит узнать о общении в сети :)
зы
в данном топике ты имел честь наблюдать flood, offtopic и flame :)

удаление последнего символа Найти похожие ветки