Странность с SetLength

На форме есть Button и Edit, в процедуре Button следующий код:

Code:

Var
  s:string;
begin
  s:='';
  SetLength(s,12);
  edt1.Text:=s;
end;

Как же так выходит, что при клике на Button, в edt1.Text выводится 'comctl32.dll'? oO

Вот бинарь: http://www.sendspace.com/file/c9r75c

Использую delphi lite, win7.

 

Wolfomeo, чисто теоретически как-имто макаром в s попадает память...

 

Да, очень странно.

Lite и 'чистую' IDE ставил (на XP и 7) - так само

 

Проблема решена, использованием процедуры FillChar.

Тему можно закрывать.