![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
ПОМОГИТЕ ПОЖАЛУЙСТА!((( Я пыталась сама не выходит( что то не то получается
Удалить часть символьной строки, заключенной в скобки (вместе со скобками). ![]() |
|
#2
|
||||
|
||||
|
Читаем справку по функциям Pos и PosEx.
|
|
#3
|
||||
|
||||
|
Код:
procedure TForm1.Button1Click(Sender: TObject);
Var
Str: String;
begin
Str:=Edit1.Text;
// строка, решающая Вашу задачу
Delete(Str, AnsiPos('(', Str), AnsiPos(')', Str)-AnsiPos('(', Str)+1);
Label1.Caption:=Str;
end; |