procedure TForm1.FormCreate(Sender: TObject);
begin Application.HintPause:=0;//立即显示 Application.hinthidepause:=100000;//if not leave then 显示100秒end;
delphi 立即显示提示,布布扣,bubuko.com
delphi 立即显示提示
原文：http://www.cnblogs.com/xe2011/p/3884392.html
