我的代码哪里有问题?(关于登陆的)很简单的!!

Question

代码如下
begin
  Application.Initialize;
  Application.CreateForm(Tf_Login,f_Login);
  if f_Login.Show = mrOK then
  Application.CreateForm(Tf_Main, f_Main);
  else
    Application.Terminate;
  Application.Run;
end.错误提示如下[Error] STUDENT.DPR(17): Undeclared identifier: 'mrOK'
[Error] STUDENT.DPR(24): ';' not allowed before 'ELSE'
[Error] STUDENT.DPR(27): Record, object or class type required
请问我哪里有问题呀!!

Answer 1

begin
  Application.Initialize;
  Application.CreateForm(Tf_Login,f_Login);
  if f_Login.Showmodal = mrOK then
  Application.CreateForm(Tf_Main, f_Main)
  else
    Application.Terminate;
  Application.Run;
end.

Answer 2

去掉else前的分号
条件语句改一下呀

Answer 3

去掉else前的分号了,还是有错误提示如下
[[Error] STUDENT.DPR(17): Undeclared identifier: 'mrOK'
代码如下
begin
  Application.Initialize;
  Application.CreateForm(Tf_Login,f_Login);
  if f_Login.Showmodal = mrOK then
  Application.CreateForm(Tf_Main, f_Main)
  else
    Application.Terminate;
  Application.Run;
end.请帮助??

Answer 4

楼上说的对. Delphi与C不同, else前不能加分号的.

Answer 5

uses tf_login tf_main的库单元了吗？