Merlin’s Delphi Forge

This procedure will let your programs process Windows messages. The only thing is that this function may stop only this procedure while not stopping the rest

var
dtNow: TDateTime;
begin
{ Before pause }
dtNow := Now;
repeat
Application.ProcessMessages; { Process Windows messages }
until dtNow + [...]

When creating a text editor (or any other kind of program that uses the Clipboard you always insert code to determine if there is anything to copy or cut and to update the menus. Well, you should also do this for the paste function. The whole idea is based on Windows messages and is very [...]