HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ
loading...
Скрыть
Вернуться   ANTICHAT > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
Перезагрузить страницу Как загрузить текст из текстового файла (Дельфи)?
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

Как загрузить текст из текстового файла (Дельфи)?
  #1  
Старый 28.01.2008, 23:18
Tapaceuka
Участник форума
Регистрация: 13.01.2008
Сообщений: 125
С нами: 9645786

Репутация: 0
По умолчанию Как загрузить текст из текстового файла (Дельфи)?
Есть у мну вот такой кусок кода на дельфи 7
SM.Username :=UserEd.Text;

Как зделать чтобы данные о SM.Username он грузил не с UserEd.Text а с username.txt который лежит в одной папке вместе с программой ?
𝕏 Twitter Reddit Telegram Копировать ссылку
Последний раз редактировалось begin_end; 29.01.2008 в 02:05.. Причина: Изменена тема (по причине неинформативности)
 
Ответить с цитированием

  #2  
Старый 28.01.2008, 23:22
Slip
Новичок
Регистрация: 26.06.2007
Сообщений: 16
С нами: 9935658

Репутация: 37
По умолчанию
TStringList -> TStringList.LoadFromFile -> TStringList.Strings[123] ?????
 
Ответить с цитированием

  #3  
Старый 28.01.2008, 23:26
Tapaceuka
Участник форума
Регистрация: 13.01.2008
Сообщений: 125
С нами: 9645786

Репутация: 0
По умолчанию
зделай сам плз строку, а то у м устрока вот такая:
SM.Username :=TStringList(username.txt);
и выдаёт вот такое
[Ошибка] Unit1.pas(55): Undeclared identifier: 'txt'
 
Ответить с цитированием

  #4  
Старый 28.01.2008, 23:49
KEZ
Banned
Регистрация: 18.05.2005
Сообщений: 1,981
С нами: 11042306

Репутация: 2726


По умолчанию
username.txt -> "username.txt" ?
 
Ответить с цитированием

  #5  
Старый 28.01.2008, 23:56
Tapaceuka
Участник форума
Регистрация: 13.01.2008
Сообщений: 125
С нами: 9645786

Репутация: 0
По умолчанию
теперь выдаёт такую ошибку
[Ошибка] Unit1.pas(55): Invalid typecast
 
Ответить с цитированием

  #6  
Старый 28.01.2008, 23:56
Slip
Новичок
Регистрация: 26.06.2007
Сообщений: 16
С нами: 9935658

Репутация: 37
По умолчанию
MyStringList = TStringList.Create();// Обязательно нужно создать объект
MyStringList.LoadFromFile("filename.txt");

Больше года не пишу на делфе, не знаю чо в голову стукнуло =\\

Вот здесь есть пример http://www.realcoding.net/article/view/1763
 
Ответить с цитированием

  #7  
Старый 29.01.2008, 00:05
LEE_ROY
Постоянный
Регистрация: 09.11.2006
Сообщений: 639
С нами: 10265091

Репутация: 541


По умолчанию
Цитата:
Сообщение от Slip  
MyStringList = TStringList.Create();// Обязательно нужно создать объект
MyStringList.LoadFromFile("filename.txt");

Больше года не пишу на делфе, не знаю чо в голову стукнуло =\\

Вот здесь есть пример http://www.realcoding.net/article/view/1763
" -> '
 
Ответить с цитированием

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

Репутация: 905


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

  #9  
Старый 29.01.2008, 09:20
noobyara
Новичок
Регистрация: 27.01.2008
Сообщений: 13
С нами: 9625751

Репутация: 26
По умолчанию
Цитата:
Сообщение от krypt3r  
Хы, по жизни в дельфях ограничителем строковых переменных являлся апостроф aka одинарная кавычка, а не двойная.
= (LEE_ROY сказал тоже самое просто покороче...).
Цитата:
Сообщение от LEE_ROY  
" -> '
Цитата:
Сообщение от krypt3r  
А что за операция "->" в делфи?
- вопрос снимается.
 
Ответить с цитированием
Ответ



Предыдущая тема Следующая тема
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Http - аутентификация alexandroff PHP 5 19.07.2005 21:00



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.