f := Windows.CreateFile( 'COM2',
                              GENERIC_READ or GENERIC_WRITE,
                              FILE_SHARE_READ or FILE_SHARE_WRITE,
                              nil,
                              OPEN_EXISTING,
                              FILE_ATTRIBUTE_NORMAL, 0);