IWinApplication.ProcessMessages

Синтаксис Fore

ProcessMessages;

Синтаксис Fore.NET

ProcessMessages();

Описание

Метод ProcessMessages отправляет запрос на обработку системных сообщений, вызывающих перерисовку окна приложения.

Вызов метода приводит к проверке очереди системных сообщений, адресованных какому-либо окну текущего приложения. Если очередь не пуста, то осуществляется немедленная обработка сообщений, обновляющих содержимое окна. После обработки сообщения удаляются из очереди.

Использование метода актуально при выполнении длительных процессов для актуализации содержимого окон приложения.

Пример Fore

Sub DoProcess;
Var
    b: Boolean = False;
    WinApp: IWinApplication;
Begin
    //...
    WinApp := WinApplication.Instance;
    Repeat
        //...
        //Циклические действия
        //...
        If <Условие выхода из цикла> Then
            b := True
        End If;
        WinApp.ProcessMessages;
    Until b;
End Sub DoProcess;

Указанная процедура может использоваться для запуска каких-либо циклических процессов, время выполнения которых не известно. Для актуализации содержимого окна приложения в конце каждой итерации будет вызываться метод ProcessMessages.

Пример Fore.NET

Sub DoProcess();
Var
    b: Boolean = False;
    WinApp: WinApplication = New WinApplicationClass_2();
Begin
    //...
    Repeat
        //...
        //Циклические действия
        //...
        If <Условие выхода из цикла> Then
            b := True
        End If;
        WinApp.ProcessMessages();
    Until b;
End Sub;

См. также: