![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
короче тема такая: в Тмемо текст идет следующим образом :
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
|
|||
|
|||
|
Спасибо!!! тему можно удалять.
|