Тема
:
работа со строками в файле
Показать сообщение отдельно
#
3
24.03.2008, 08:31
PashaXP
Новичок
Регистрация: 05.02.2008
Сообщения: 81
Репутация:
15
ИЛИ
procedure TForm1.Button1Click(Sender: TObject);
Var
str: String;
begin
str:='11043 11029 11029 11036';
DELETE(str,POS('11029',str),Length('11029'));
Edit1.Text:=str;
end;
PashaXP
Посмотреть профиль
Отправить персональное сообщение для PashaXP
Найти все сообщения от PashaXP