Application.ProcessMessages Ersatz

Application.ProcessMessages Ersatz

Application.ProcessMessages Ersatz : Mehreren tausend Tipps, um Ihr Leben einfacher machen.

Nicht nur ist Application.ProcessMessages ziemlich lang zu geben, oft zusätzliche Funktionalität muss aufgerufen werden, wenn seine verwendet. Zu diesem Zweck habe ich zwei grundlegende Wrapper erstellt, die an seiner Stelle verwendet werden können:

...

Prozedur ProcessMsg(); überladen;
Procedure ProcessMsg (const SleepFor: Word); überladen;

Umsetzung

Prozedur ProcessMsg();
beginnen
ProcessMsg(0);
Ende;

Procedure ProcessMsg (const SleepFor: Word); überladen;
beginnen
Application.ProcessMessages();
Sleep(SleepFor);
Ende;

...

Jetzt statt Application.ProcessMessages() zu schreiben; in Ihrem Code können Sie ProcessMsg() schreiben; statt. Und in Zukunft erweitern, was passiert, um Application.ProcessMessages Aufrufe ohne besuchen viele verschiedene Bereiche des Codes.

Wenn Ihre Delphi 2005 oder über ihnen könnten die Inline-Richtlinie zur Deklaration Prozedur anfügen.

Die oben genannten Funktionen erfordern 'Formen' und 'Windows' verwendet-Klausel hinzugefügt werden.

Diese Verfahren konnte der Code in diesem Artikel (als https://www.howtodothings.com/ViewArticle.aspx?Article=758) leicht hinzugefügt werden