How to Create an Asynchronous Unit in Delphi

How to Create an Asynchronous Unit in Delphi