Download Now

    Reference TCustomDialog

    Declared in Codebot.Platform.pas on line 370

    TCustomDialog implements IDialog for the backends. A backend overrides Show to open the dialog and calls Close when the user closes it, from any thread. Show is called by Execute on the thread which called Execute. The dialogs below close without being shown and are the defaults until a backend is initialized.
      TCustomDialog = class(TInterfacedObject, IDialog)
      protected
        { Show the dialog. By default it closes without accepting. }
        procedure Show; virtual;
        { Close the dialog and deliver OnClose }
        procedure Close(Accepted: Boolean);
      public
        { Show the dialog by calling Show }
        procedure Execute(OnClose: TDialogCloseEvent);
      end;

    See also