Показать сообщение отдельно

  #8  
Старый 29.01.2008, 08:10
krypt3r
Познавший АНТИЧАТ
Регистрация: 27.04.2007
Сообщений: 1,044
Провел на форуме:
3660186

Репутация: 905


По умолчанию

Хы, по жизни в дельфях ограничителем строковых переменных являлся апостроф aka одинарная кавычка, а не двойная. А что за операция "->" в делфи? Один из многих вариантов:
Код:
var
  ts : TStringList;
begin;
  ts := TStringList.Create;
  ts.LoadFromFile ('filename.txt');
  SM.Username := ts.Strings[0];  
  ts.Free
end;
нуль вы можете заменить на другой индекс, смотря где имя юзера в файле будет находиться.
И не забывайте освобождать объект, когда он уже не нужен, например, в конце программы. Можно еще и почти паскалевским методом идти через AssignFile - CloseFile
 
Ответить с цитированием