work under 32 bit , not under 64
var
T:Tstringlist;
i:integer;
begin
T:=TstringList.create;
for i:=1 to 3 do t.add('Some data:'+inttostr(i));
Application.Terminate;
end;
32 bit : look below (catch except ok)
64 bit: nothing !
so , there is a bug somehow.