[delphihelp]

попробовал в модуле unit1.pas поменять тип данных со стринг в ansistring в

Код:

procedure TForm1.Button2Click(Sender: TObject); 
var  myStr : ansiString; 

то стало записывать символы, но крякозябрами.