вторник, 23 октября 2012 г.

Диалоговые окна в Lazarus

Невизуальные компоненты типа диалоговых окон в Lazarus располагаются на вкладке "Dialogs":


Позволяют вызывать диалоговые окна для выбора файла для открытия, сохранения, отправки на печать, настройки шрифта, выбора цвета, даты, выбора папки и т.д.
Рассмотрим некоторые из них:
TOpenFialog - вызывает диалоговое окно для открытия файла
TSaveDialog - сохранение файла
TFontDialog - выбор шрифта
TColorDialog - выбор цвета
TCalendarDialog - выбор даты из календаря
Вызов диалогового кона осуществляется с помощью функции Execute, которая возвращает значение true, если окно успешно вызвано и false в обратном случае:
Значения, выбранные в диалоговом окне будут хранится соответственно в полях:
TOpenFialog.FileName - полное имя выбранного файла
TSaveDialog.FileName - сохранение файла
TFontDialog - выбранный шрифт (тип TFont)
TColorDialog - выбранный цвет (тип TColor)
TCalendarDialog - дата (день, месяц и год, тип TDate)

Пример кода для загрузки в Memo1 файла, выбранного с помощью диалога:
var FName: string;
...
begin
  if OpenDialog1.Execute then
  begin
    FName := OpenDialog1.FileName;
    Memo1.Lines.LoadFromFile(FName);
  end;

Комментариев нет:

Отправить комментарий