VPF::Вывод текста из ( ) - Форум программистов

raz

Дата 3.12.2008, 21:26 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 124
Регистрация: 31.3.2008
Где: Soligorks =)

Репутация: нет
Всего: нет

Короче есть строка "текст(123)текст"

Как достать из этого всего 123, если он меняется?

--------------------

THandle

Дата 3.12.2008, 21:28 (ссылка)

(нет голосов)

Загрузка ...

Хранитель Клуба
Group Icon

Награды: 1

Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 65
Всего: 372

raz, самое простое - pos, copy.

raz

Дата 3.12.2008, 21:37 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 124
Регистрация: 31.3.2008
Где: Soligorks =)

Репутация: нет
Всего: нет

А как правильно составить запрос?

Тест1(123)

Текст1 и 123 меняются.

Может можно как-то отправлять чтобы считало все что в скобках?

--------------------

THandle

Дата 3.12.2008, 21:45 (ссылка)

(нет голосов)

Загрузка ...

Хранитель Клуба
Group Icon

Награды: 1

Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 65
Всего: 372

Код


procedure TForm1.Button1Click(Sender: TObject);
var
  { Начальная строка }
  S1: String;
  { То что в скобках }
  S2: String;
  { Позиция открывающейся скобки }
  Position: Integer;
begin
  S1 := 'Текст(скобки)еще текст';
  Position := Pos('(', S1);
  S2 := Copy(S1, Position + 1, Pos(')', S1) - Position - 1);
  ShowMessage(S2);
end;

И что еще за запросы?

raz

Дата 3.12.2008, 21:50 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 124
Регистрация: 31.3.2008
Где: Soligorks =)

Репутация: нет
Всего: нет

Спасибо, это я просто не правильно выразился

--------------------

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »