[Ultras]

ой, извеняюсь, забыл:

Код:

function GetString(text: string; tstrs: TStringList): string;