![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Memo->Listbox [D7, XP]
Bluedragon © (2008-03-24 19:01:00)Подскажите пожалуйста как мне решить эту задачу.
Есть текст в memo, нужно что бы каждый символ превратился в число(А=1 Б=2 В=3 ... Пробел=0) и добавился в listbox.
grisme (2008-03-24 22:00:00) [1]вроде, анимешник, ан грубишь %)
for i:=1 to Length(Memo1.Text)
и
Семеныч (24.03.08 19:41) [7], и
Reindeer Moss Eater © (24.03.08 21:22) [9]
Reindeer Moss Eater (2008-03-24 21:22:00) [2]ShowMessage('танк'[1]);
Bluedragon (2008-03-24 21:19:00) [3]Для тех кто в танке, можно пример пожалуйста.
Семеныч (2008-03-24 19:41:00) [4]> Bluedragon (24.03.08 19:38) [6]
Если S - строка (текст), то S[i] будет i-м символомэтой строки.
Bluedragon (2008-03-24 19:38:00) [5]Мне не понятно как из цельного текста работать с каждым символам отдельно?
Kolan (2008-03-24 19:34:00) [6]> Как добавлять в листбокс я знаю, но проблема в том что в
> мемо записан цельный текст, а мне нужно что бы каждый символ
> этого текста записался в листбокс
Покаи как ты делаешь. Ответ содержится в [1] и [2]. Что не получается непонятно
Bluedragon (2008-03-24 19:33:00) [7]Как добавлять в листбокс я знаю, но проблема в том что в мемо записан цельный текст, а мне нужно что бы каждый символ этого текста записался в листбокс
Kolan (2008-03-24 19:26:00) [8]> А как сделать так что бы каждый символ записался в отдельную
> строчку в listbox?
Надо использовать метод Add, который есть у Items.
Bluedragon (2008-03-24 19:21:00) [9]А как сделать так что бы каждый символ записался в отдельную строчку в listbox?
Семеныч (2008-03-24 19:15:00) [10]Превращение символа в число: Ord(символ).
Например: число := Ord(символ) - Ord('А') + 1;
Получим преобразование заглавных русских букв (А=1 Б=2 В=3...) в числа.
Преобразования строчных букв и прочих символов можно делать по тому же принципу - загляните в таблицу ASCII.