Здравствуйте Renat, Вы писали:
R>Люди... помогите..
R> перепробовал всё, что мог(а мог я не много
R> — не помогает...
R> мож кто знает.
R> Спасибо.
Мне казалось, что вот так
var
Str: TStrings;
AStr: AnsiString;
begin
Str := TStringList.Create;
Str.Add('aaaa');
Str.Add('bbbb');
AStr := AnsiString(Str.Text);
end;