Правильная ссылка на эту страницу
http://az-design.ru/Support/SoftWare/Delphi/D3/SB34Execute.shtml

Глава 34. TCommonDialog.Execute

Метод Execute

Затрагиваемые объекты TColorDialog, TFindDialog, TFontDialog, TOpenDialog, TPrintDialog, TPrintSetupDialog, TSaveDialog, TReplaceDialog
Назначение Метод Execute используется для открытия общего диалогового окна.
Объявление  
TPrintSetupDialog procedure Execute;
Все остальные Function Execute: Boolean;
Пример синтаксиса
// Открыть диалоговое окно Find в верхнем левом углу экрана
procedure TForm1.sbFindClick (Sender: TObject);
begin
   FindDialog1.Left := 0;
   FindDialog1.Top  := 0;
   FindDialog1.Execute;
end;
// Открыть диалоговое окно Color
procedure TForm1.sbColorClick(Sender: TObject);
var
   x: Integer;

begin
   if ColorDialog1.Execute = True then begin
      RichEdit1.SelAttributes.Color := ColorDialog1.Color;
      strCustomColors := ColorDialog1.CustomColors;
   end;
end;
Описание        Execute отображает общее диалоговое окно и возвращает True, если пользователь закрыл окно, нажав на кнопку ОК. Если пользователь нажимает на Cancel или закрывает диалоговое окно, выбирая Close из системного меню, Execute возвращает False. Возвращаемое значение Execute можно использовать для определения того, какой блок кода выполнять после закрытия диалогового окна, как сделано в примере выше. Метод Execute для TPrinterSetupDialog значения не возвращает. Он обрабатывается системой автоматически.

[Свойство Collate] [Свойство Color] [Свойство Copies] [Свойство Ctl3D] [Свойство CustomColors] [Свойство DefaultExt] [Свойство Device] [Метод Execute] [Свойство FileName] [Свойство Files] [Свойство Filter] [Свойство FilterIndex] [Свойство FindText] [Свойство Font] [Свойство FromPage] [Свойство Handle] [Свойство HelpContext] [Свойство InitialDir] [Свойство Left] [Свойство MaxFontSize] [Свойство MaxPage] [Свойство MinFontSize] [Свойство MinPage] [Событие OnApply] [Событие OnFind] [Событие OnReplace] [Свойство Options] [Свойство Position] [Свойство PrintRange] [Свойство PrintToFile] [Свойство ReplaceText] [Свойство Title] [Свойство ToPage]


<<< Пред. Оглавление
Начало раздела
След. >>>




Дата последнего изменения:
Thursday, 21-Aug-2014 09:10:56 MSK


Постоянный адрес статьи:
http://az-design.ru/Support/SoftWare/Delphi/D3/SB34Execute.shtml