Forlan hat eine Funktion geschrieben, mit der man die "BalloonTips" in der Notification Area de- bzw. aktivieren kann.
toms und
DeddyH haben diese Funktion noch verfeinert:
uses Registry;
Delphi-Quellcode:
procedure EnableBalloonTips(Enable: Boolean);
var
reg: TRegistry;
begin
reg := TRegistry.Create;
try
reg.RootKey := HKEY_CURRENT_USER;
if reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\', True) then
begin
reg.WriteInteger('EnableBalloonTips', Ord(Enable));
reg.CloseKey;
end;
finally
reg.Free;
end;
end;
Microsoft
weist darauf hin, dass man sich nach dem Ändern des Schlüssels einmal vom System ab- und wieder anmelden sollte.
[edit=TBx]Username von DeddyH korrigiert Mfg, TBx[/edit]
[edit=TBx] Mfg, TBx[/edit]