update

r57zone · Jun 8, 2015 · 1586210 · 1586210
1 parent d5efbff
commit 1586210
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/Unit1.pas b/Unit1.pas
@@ -47,6 +47,7 @@ procedure TForm1.FormCreate(Sender: TObject);
 var
 WND:HWND; Path:string;
 begin
+Application.Title:='Notification Show';
 WND:=FindWindow(nil, 'Notification Show');
 if WND<>0 then while WND<>0 do begin sleep(100); WND:=FindWindow(nil, 'Notification Show'); end;
 Caption:='Notification Show';