Показать сообщение отдельно
  #3  
Старый 24.03.2008, 08:31
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),Length('11029'));
Edit1.Text:=str;
end;
Ответить с цитированием