Отправляет email-рассылки с помощью сервиса Sendsay

Delphi. Уроки

  Все выпуски  

Delphi. Уроки - Урок 8. Диалог OpenFileDialog


Уроки по Delphi. Рассылки сайта progs.biz
Выпуск № 56
 
Начало > Delphi.NET > Windows > Урок 8

Фленов М. DirectX и С++. Искусство программирования.
Фленов М. DirectX и С++. Искусство программирования
Заказать на Озоне

Подробнее


Полные версии уроков (с картинками): урок 8.

Delphi.NET. Windows-приложения
Урок 8. Диалог OpenFileDialog

Класс OpenFileDialog предназначен для использования в вашей программе стандартного диалогового окна для открытия файла. Этот контрол можно разместить на форме, перетащив с панели компонентов, а можно создать непосредственно в коде. Вот пример работы с этим классом непосредственно в коде:

procedure TWinForm.Button1_Click(sender: System.Object; e: System.EventArgs);
var
  ofd: OpenFileDialog;
begin
  ofd := OpenFileDialog.Create;
  // Задаем фильтры для файлов.
  ofd.Filter := 'txt-files|*.txt|All Files|*.*';
  // Задаем начальный фильтр.
  ofd.FilterIndex := 2;
  // Задаем запоминание выбранной директории.
  ofd.RestoreDirectory := true;
  // Если пользователь нажал кнопку OK.
  if ofd.ShowDialog = System.Windows.Forms.DialogResult.OK
  then
  begin
    // Получаем имя выбранного пользователем файла.
    Label1.Text := ofd.FileName;
  end;
end;

Самое главное свойство тут - это FileName. Именно в нем и оказывается выбранное пользователем имя файла.

Обратите внимание, как задаются фильтры для файлов: в строке, записываемой в свойство Filter, они пишутся в две части: первая часть - это описание и вторая - непосредственно фильтр. В качестве разделителя мы используем символ вертикальной черты.

К числу других полезных свойств и методов следует отнести Title (задает заголовок окна), InitialDirectory (задает начальную директорию), CheckFileExists и CheckPathExists (определяет, надо ли проверять существование введенных пользователем имени файла или пути).

Рассылки сайта progs.biz
Visual C++, MFC
C# и .NET
VB.NET
ASP.NET
Win API
C/C++
Delphi
Java
HTML, PHP, mySQL, WEB-дизайн
Flash MX
C++ Builder
Ассемблер
SQL Server
DirectX
Обзор книг
Обзор программ
Новости сайта progs.biz


Parking.ru. Качественный виртуальный хостинг на платформе Windows(r): поддержка NET, многофункциональная панель управления, аренда бизнес-приложений, сертифицированные специалисты. Управляемый выделенный хостинг на платформе Windows(r): производительные серверы, профессиональная поддержка, аренда ПО Microsoft(r), безопасность, гарантии. http://www.parking.ru


Копирование любых материалов сайта без разрешения авторов и владельцев сайта запрещено.
© 2002-2007 сайт progs.biz
© 2002-2007 Игорь Алексеев

В избранное