Typo fix.

packages/ide/fpmopts.inc

@@ -1064,7 +1064,7 @@ end;
 
 procedure TIDEApp.Preferences;
 var R,R2: TRect;
-    D: PDialogEmpytClik;
+    D: PDialogEmptyClik;
     C: PVideoModeCollection;
     VMLB: PVideoModeListBox;
     OldScreenMode,VM: TVideoMode;

packages/ide/wviews.pas

@@ -152,8 +152,8 @@ type
 
     { Dialog that broadcasts empty space mouse clicks }
     { Needed for dialogs that contines TDropDownListBox }
-    PDialogEmpytClik = ^TDialogEmpytClik;
-    TDialogEmpytClik = object(TCenterDialog)
+    PDialogEmptyClik = ^TDialogEmptyClik;
+    TDialogEmptyClik = object(TCenterDialog)
       procedure HandleEvent(var Event: TEvent); virtual;
     end;
 
@@ -1943,7 +1943,7 @@ begin
     end;
 end;
 
-procedure TDialogEmpytClik.HandleEvent(var Event: TEvent);
+procedure TDialogEmptyClik.HandleEvent(var Event: TEvent);
 begin
   inherited HandleEvent (Event);
   case Event.What of