TPopupForm = record
  FormID: Integer;
  Form: TCustomForm;
  WasPopup: Boolean;
end;

struct TPopupForm {
  int FormID;
  TCustomForm Form;
  Boolean WasPopup;
};