|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Подскажите Ламеру начет замены символов в Tmemo
короче тема такая: в Тмемо текст идет следующим образом :
1234=6562194 567=554616 а нужно это преобразовать в вид: 1234: 6562194 567: 554616 как это можно сделать заранее спасибо. |
#2
|
||||
|
||||
Код:
procedure TForm1.Button1Click(Sender: TObject); var i: integer; begin for i := 0 to Memo1.Lines.Count-1 do Memo1.Lines.Strings[i] := StringReplace( Memo1.Lines.Strings[i], '=', ': ', [] ); end; |
#3
|
|||
|
|||
Спасибо!!! тему можно удалять.
|