edit和shoumessage

[gaoquanjiegqj]

一个edit框接受一个字符 一旦光标离开这个edit框 马上判断输入的字符串是否符合规则，如果符合规则则查询数据库
这个操作怎么做？

还有 shoumessage弹出后不是有个确定按钮麽？如果我想让点击那个确定按钮后 弹出另外一个窗体 该怎么做

本人新学 麻烦说详细点 谢谢了

[Corn1]

Edit1.OnExit:
if 输入的字符合法 then
查询数据库

ShowMessage('楼主你好！');
Form2.Show;

[7年]

玉米正解。

[starluck]

[Quote=引用楼主 gaoquanjiegqj 的帖子:]
一个edit框接受一个字符 一旦光标离开这个edit框 马上判断输入的字符串是否符合规则，如果符合规则则查询数据库
这个操作怎么做？

还有 shoumessage弹出后不是有个确定按钮麽？如果我想让点击那个确定按钮后 弹出另外一个窗体 该怎么做

本人新学 麻烦说详细点 谢谢了
[/Quote]



離開用 OnExit 事件


你不應該是 ShowMessage 應該用 Application.MessageBox 來選擇性的是否出現另外一個窗體吧？ ：）

[lgx0914]

if application.MessageBox('您真的要退出系统？','提示',mb_yesno+mb_iconquestion)<>ID_YES then begin  

end

[de410]

procedure Tcxfm.Edit1Exit(Sender: TObject);
begin
if 字符合法判断 then
begin
if application.MessageBox('您真的要退出系统？','提示',mb_yesno+mb_iconquestion)<>ID_YES then
begin
弹出另外一个窗体的代码
end
else
exit;
end
else
...
end;