VPF::Как фунццции ExtractStrings передать строку?

poiuyt1234

Дата 26.2.2009, 14:32 (ссылка)

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

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 135
Регистрация: 30.4.2008

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

Есть такая функция:

Код


 type TSysCharSet = set of Char;
    function ExtractStrings(Separators, WhiteSpace: TSysCharSet; Content: PChar; Strings: TStrings): Integer;

Нашел пример ее использования:

Код


  var

      sl: TStringList;

    begin

      sl := TStringList.Create;

      try

        ExtractStrings([';', ','], [' '], 'language: russian; delphi, php, c++; Ivanov', sl);

        // тут обрабатываем sl.Items

      finally

        sl.Free;

      end;

    end;

Здесь все понятно.. но вот как вместо текста:

Цитата

language: russian; delphi, php, c++; Ivanov

Передать переменную string ? Пробовал подставлять string, но естественно выдал ошибку о не совместимости типов..
Как преобразовать string в пригодный тип?

CodeMonkey

Дата 26.2.2009, 14:47 (ссылка)

(голосов:1)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1839
Регистрация: 24.6.2008
Где: Россия, Тверь

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

PChar(stringvar)

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

Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.

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