Архив форумов ЦИТФорума

[Konstantin P.]

Vot takoj prostoj kod:
procedure TForm1.Button1Click(Sender: TObject);
var str : String;
i : integer;
begin
for i:=0 to 513 do begin
Str:=Str+'*Dannie*';
end;
i:=Length(Str);

[Konstantin P.]

Problema v tom, chto konec stroki ne zapisivaetsja posle 4096 simvola.

[Konstantin P.]

Nashel! Prosto u Delphi 6 View Variable gljuchit...