Тема: Словарь
Показать сообщение отдельно
  #6  
Старый 22.09.2012, 21:55
Аватар для YVitaliy
YVitaliy YVitaliy вне форума
Местный
 
Регистрация: 14.12.2011
Сообщения: 481
Версия Delphi: Borland Delphi7
Репутация: 17
По умолчанию

Цитата:
Сообщение от UnrealFire
типы edit1.text и mystring не совместимы
Это с каких таких пор? У меня Delphi7 и они прекрасно совместимы. Если в Edit строка окажется длиннее, то автоматически "обрежется" до необходимого размера. Если так не получается, то лучше уж как советует
icsander, через TStringList (для новичка), или TFileStream (не так уж сложно, но нужны дополнительные операции, которые потом тоже придется разсяснять ).
Код:
var stringList:TStringList;
begin
  stringList:=TStringList.Create;
  stringList.Add(Edit1.Text);
  stringList.SaveToFile('E:\Новая папка\Новая папка1\Новая папка2\TestFile.tst');
  stringList.free;
end;
Ответить с цитированием