Кнопка с вопросом

[Nikita_]

Нужна помощь, нужно что бы при нажатии на кнопку выдавался текст в окне(текст будет вопросом), и строка для ввода, при правильном ответе (верно) при неправильном (неверно)

[BARNEY]

 case MessageBox(Handle, 'Текст', 'Заголовок', MB_YESNO + MB_ICONWARNING
        + MB_DEFBUTTON2) of
        IDYES:
          begin

          end;
        IDNO:
          begin

          end;
      end;

p.s.
и строка для ввода... тогда проще форму нарисовать