|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
06.03.2010, 18:15 | #1 |
Регистрация: 03.03.2010
Сообщений: 9
|
Удалить символ
Нужно составить программу: удалить каждый символ * и повторить каждый символ,отличный от *
значения вводить и выводить в Edit |
06.03.2010, 20:03 | #2 |
Регистрация: 06.03.2010
Сообщений: 3
|
Edit1 - INPUT
Edit2 - OUTPUT for i:=1 to length(Edit1.Text) do if Edit1.Text[i]<>'*' then Edit2.Text:=Edit2.Text+Edit1.Text[i]+Edit1.Text[i]; По-моему как-то так (в делфи не проверял). |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
В заданном предложении удалить символ | perojenko | Помощь студентам | 2 | 16.12.2010 22:55 |
Delphi 7, удалить символ в конце файла | Flame_of_Death | Помощь студентам | 5 | 10.08.2009 06:32 |
[Делфи]Как удалить последний символ в edit1.text? | zotox | Помощь студентам | 3 | 05.08.2009 12:05 |
Перенести/Удалить один символ в ячейке | Tirendus | Microsoft Office Excel | 4 | 31.07.2009 13:15 |
как удалить из файла символ? | evgenrpo | Общие вопросы C/C++ | 2 | 04.06.2009 22:35 |