Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 17.11.2008, 18:33   #1
TriCERATOP
Пользователь
 
Аватар для TriCERATOP
 
Регистрация: 17.11.2008
Сообщений: 30
Восклицание Загрузка .txt файлов

Помогите кто может:
Как сделать, чтобы в компонент Edit загружалась информация из *.txt файла?
Если есть проблемы -значит мы живем...
TriCERATOP вне форума Ответить с цитированием
Старый 17.11.2008, 22:20   #2
Alter
Старожил
 
Аватар для Alter
 
Регистрация: 06.08.2007
Сообщений: 2,183
По умолчанию

Код:
procedure TForm1.Button1Click(Sender: TObject);
Var Lst :TStrings;
    S :String;
begin
 S := 'C:\WINDOWS\setuplog.txt'; //Путь к файлу
 Lst := TStringList.Create;
  Try
 If FileExists(S) Then
 begin
  Lst.LoadFromFile(S);
  Edit1.Text := Lst.Text;
 end
  else
 ShowMessage('Не существует');
  Finally
 Lst.Free;
  End;
end;
Alter вне форума Ответить с цитированием
Старый 18.11.2008, 11:17   #3
TriCERATOP
Пользователь
 
Аватар для TriCERATOP
 
Регистрация: 17.11.2008
Сообщений: 30
По умолчанию

Спасибо. Теперь все понятно.
Если есть проблемы -значит мы живем...
TriCERATOP вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Загрузка иконок файлов igroman Общие вопросы Delphi 4 29.05.2008 09:00
Открытие файлов *.txt Bill Gates Общие вопросы Delphi 3 28.11.2007 22:44
Загрузка файлов с сервера Axxel Общие вопросы по Java, Java SE, Kotlin 4 22.11.2007 10:51
Загрузка файлов в проект Maycal Общие вопросы C/C++ 3 11.10.2007 09:46
Множественная загрузка файлов Artem Общие вопросы Delphi 14 03.08.2007 20:38