带爱像的右下角HINT显示,自动隐藏
function alterInfo: TdxAlertWindowManager;
begin
if not Assigned(Falter) then
begin
Falter := TdxAlertWindowManager.Create(nil);
end;
Result := Falter;
end;
procedure ShowTrayHint(const AText: string; const ACaption: string = ‘‘;
AImageIndex: TImageIndex = 0);
begin
alterInfo.Show(ACaption, AText, AImageIndex);
end;
时间: 2024-10-12 07:35:30