unit messages; interface uses windows; {$DEFINE read_interface} {$DEFINE MESSAGESUNIT} {$I messages.inc} implementation end.