Тема: работа со строками в файле
Показать сообщение отдельно
  #2  
Старый 24.03.2008, 07:24
PashaXP 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),5);
Edit1.Text:=str;
end;
Ответить с цитированием