Последние записи
- Как запустить программу указанную в Edit.Text
- Скачать файл с использованием потока
- Поиск слова в Memo
- Распаковщик формата .img из GTA San Andreas
- Подсчет количества повторяющихся букв в файле
- Простейший скрипт загрузки картинки с помощью php
- Рассылка. Выпуск 154
- Получение картинки с веб-камеры
- Скопировать определённый кусок image
- Сделать printscreen экрана и сохранить
18th
Окт
Как открыть файл в Memo используя OpenDialog?
Posted by Chas under Пост-обзор
OpenDialog1.FileName := ”;
OpenDialog1.Execute;
If OpenDialog1.FileName <> ” Then
Begin
If FileExists(OpenDialog1.FileName) Then
Memo1.Lines.LoadFromFile(OpenDialog1. yle="color: #006600">FileName);
End Else
//Ничего не выбрано, диалог был завершен жмаканьем по CANCEL
OpenDialog1.Execute;
If OpenDialog1.FileName <> ” Then
Begin
If FileExists(OpenDialog1.FileName) Then
Memo1.Lines.LoadFromFile(OpenDialog1. yle="color: #006600">FileName);
End Else
//Ничего не выбрано, диалог был завершен жмаканьем по CANCEL