Код:
procedure TForm1.FormCreate(Sender: TObject);
Var S1:String;
S2:String;
begin
S1:='qwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwert';
S2:='qwertqwertqwertqwertqwer'+'tqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwertqwert';
end;
первое выдает ошибку второе нет хотя строки одинаковые, за исключением того что вторая как буд-то из двух строк склеена;
вот от этого и отталкивайся;