A
Angleewangxiaoj
Unregistered / Unconfirmed
GUEST, unregistred user!
事例中碰到一个showhint过程,却不知道是怎么得来的,控件中没有这个事件啊!
procedure TMainForm.ShowHint(Sender: TObject);
begin
StatusLine.SimpleText := Application.Hint;
end;
procedure TMainForm.ShowHint(Sender: TObject);
begin
StatusLine.SimpleText := Application.Hint;
end;