Zitat von
himitsu:
ich hab/hatte die auch in D4, D7 und D2006 drin.
Dann hast du ein anderes Delphi als ich.
Probiere es doch einfach aus, wenn Du meinst den Besserwisser spielen zu müssen.
Delphi-Quellcode:
const
H1 = '1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890'+
'1234567890123456789012345678901234567890123456789012345678901234567890';
procedure Test(t : String);
begin
showmessage(inttostr(length(t)));
end;
Unter D7 bis D2007 wird eine Länge von 1400 angezeigt und unter D2009 kommt ein Fehler.
Peter