Delphi 응용 프로그램에서 Shell_NotifyIcon을 사용하여 애니메이션 트레이 아이콘 표시

Question

Delphi 응용 프로그램이 알림 영역에 애니메이션 트레이 아이콘을 표시하도록합니다. 나는 또한 그것에 대해 검색했지만 사용하지 않는 TTrayIcon에 대한 결과 만 얻었습니다.

나는 Shell_NotifyIcon을 사용하며 알림 영역에 트레이 아이콘을 애니메이션하는 방법을 알 수 없습니다. Animate Interval을 설정하는 데 사용되는 Timer (TTimer)은 언제든지 중지하고 시작할 수 있어야합니다.

문제점은 양식을 처음 복원 한 후 TTimer을 시작하는 방법을 모르겠습니다.

사용자가 내 프로그램을 열어 시스템 트레이로 최소화하고 시스템 트레이 아이콘의 애니메이션 효과가 좋았으며 사용자가 어떤 이유로 다시 복원 한 다음 다시 시스템 트레이로 최소화 한 다음 다시 시스템 트레이로 최소화합니다. 시스템 트레이 아이콘 애니메이션과 TTimer은 다시 시작할 수 있어야하며 애니메이션이 적용되지 않는 일반적인 시스템 트레이 아이콘처럼 표시하면 안됩니다.

어떻게하면됩니까?

미리 감사드립니다.

Answer 1

는 사실, 난 아주 잘 당신의 질문을 이해하지 못했지만, 당신은 TTimer를 활성화하기 위해 참조하는 경우에는 프로그램을 복원 할 때 당신은 당신은 "ApplicationEvents"를 사용할 수 있습니다

최소화 할 때 사용하지 않도록 설정 :

을

1. OnMinimize :

   procedure TForm1.ApplicationEvents1Minimize(Sender: TObject); 
   begin 
       Timer1.Enabled:=False; 
   end; 
   

2. OnRestore :

   procedure TForm1.ApplicationEvents1Restore(Sender: TObject); 
   begin 
       Timer1.Enabled:=True; 
   end; 
   

행운을 빕니다.