ru.malik.elaborarer.avtoo.browser.visiblefromdialog.pas

Переключить прокрутку окна
Загрузить этот исходный код

{
    Модуль-заглушка.
    Необходим для размещения нескольких форм в одном модуле.
}

unit ru.malik.elaborarer.avtoo.browser.visiblefromdialog;

    {$MODE DELPHI}

interface

    {%region} uses
        classes,
        forms,
        controls,
        stdctrls,
        pascalx.lang;
    {%endregion}

    {%region} type
        TVisibleFromDialog = class(TForm)
            typesList: TComboBox;
            selectButton: TButton;
            cancelButton: TButton;
            procedure dialogShow(sender: TObject);
            procedure listPaintItem(sender: TWinControl; index: int; area: TRect; state: TOwnerDrawState);
        end;
    {%endregion}

implementation

    {$R *.lfm}

    {%region  TVisibleFromDialog }
        procedure TVisibleFromDialog.dialogShow(sender: TObject);
        begin

        end;

        procedure TVisibleFromDialog.listPaintItem(sender: TWinControl; index: int; area: TRect; state: TOwnerDrawState);
        begin

        end;
    {%endregion}

end.