关于显示提示对话框的问题!

Question

showmessage这个函数是不是在显示了提示信息后自动退出一个过程的执行?
有没有函数能够显示提示后继续执行过程的下面句子,除非用exit停止?

Answer 1

ShowMessage执行后并不退出过程体，继续执行下面的语句。

Answer 2

那为什么我在showmessage下面写的Focused方法无效呢?怎么样实现focused方法的执行?

Answer 3

你是不是少了begin ..end语句啊，不过最好是贴出代码来看一上，这样比较好解决问题

Answer 4

  try
    user:=trim(usertxt.Text);
    password:=trim(passtxt.Text);
    if user='' then
    begin
      showmessage('请输入用户名')
      usertxt.Focused;
    end
    else if password='' then
    begin
      showmessage('请输入密码')
      passtxt.Focused;
    end
      else if userKind.Text='' then
      begin
        showmessage('请选择用户类型');
        userKind.Focused;
      end;
  finally
  end;

Answer 5

不知道为什么,一般showmessage后回把焦点放在按钮上,怎么样转移焦点到edit中?

Answer 6

方法最用错了...usertxt.Focused;
~~~~~~~~~~~~~~~~~~~~~~~
usertxt.SetFocus;

Answer 7

try
    user:=trim(usertxt.Text);
    password:=trim(passtxt.Text);
    if user='' then
    begin
      showmessage('请输入用户名')
      usertxt.SetFocus;
    end
    else if password='' then
    begin
      showmessage('请输入密码')
      passtxt.SetFocus;
    end
      else if userKind.Text='' then
      begin
        showmessage('请选择用户类型');
        userKind.SetFocus;
      end;
  finally
  end;

Answer 8

你用try...finally...end,在执行完showmessage和focused后，跳转到finally了，当然结束了这个过程。你用try...except...end试试看

Answer 9

多谢各位,可以结帖,能不能再问一个问题:
(我很笨,不要笑我哦)
try...finally...end一般在什么情况下使用?

Answer 10

那异常处理就是:try...except...end咯?

Answer 11

except处理异常的时候用finally主要用来释放一些资源,还原一些状态!

Answer 12

try...except...end是你確信要處理未知的異常時使用。
try...finally...end是不管前面怎樣成功已否，都要執行finally裡面的過程。