让提示HINT在主窗体的状态栏显示
时间:2011-05-27 来源:比翼飞贤
只需要创建一个过程和填写APPLICATION属性即可。简单实用!!
procedure TF_ITMMAIN.DisPlatHint(Sender: TObject);
begin
stat1.Panels[0].Text := ' ' + GetLongHint(Application.Hint);
end;
//在窗体创建填写以下属性
Application.OnHint := DisPlatHint;
Application.ShowHint := True;
相关阅读 更多 +
排行榜 更多 +