1 files changed, 8 insertions, 8 deletions

diff --git a/src/gui/fpg_editcombo.pas b/src/gui/fpg_editcombo.pas
index 311d452f..72b804ef 100644
--- a/src/gui/fpg_editcombo.pas
+++ b/src/gui/fpg_editcombo.pas
@@ -87,7 +87,7 @@ type
     FSelStart: integer;
     FSelOffset: integer;
     FCursorPos: integer;
-    FSpecialChar: integer;
+    FDeadKeyChar: integer;
     procedure   DoDropDown; override;
     function    GetText: string; virtual;
     function    HasText: boolean; virtual;
@@ -524,10 +524,10 @@ var
   i: integer;
 begin
   prevval   := FText;
-  if FSpecialChar> -1 then
+  if FDeadKeyChar> -1 then
   begin
-    case FSpecialChar of
-      58536:
+    case FDeadKeyChar of
+      keyDeadDiaeresis:
         case AText of
           'a':
             AText:= 'â';
@@ -540,7 +540,7 @@ begin
           'u':
             AText:= 'ü';
         end;
-      58462:
+      keyDeadCircumflex:
         case AText of
           'a':
             AText:= 'â';
@@ -554,7 +554,7 @@ begin
             AText:= 'û';
         end;
     end;
-    FSpecialChar:= -1;
+    FDeadKeyChar:= -1;
   end;
   s         := AText;
   consumed  := False;
@@ -618,7 +618,7 @@ begin
   hasChanged := False;
 
   if (keycode= 58536) or (keycode= 58462) then
-    FSpecialChar:= keycode;
+    FDeadKeyChar:= keycode;
 
   if not Enabled then
     consumed := False
@@ -919,7 +919,7 @@ begin
   FDrawOffset       := 0;
   FSelectedItem     := -1;       // to allow typing if list is empty
   FNewItem          := False;
-  FSpecialChar      := -1;
+  FDeadKeyChar      := -1;
 
   CalculateInternalButtonRect;
 end;