Separated Spell checker GUI and Core Library

erajtob · Oct 14, 2010 · 28ae228 · 28ae228
1 parent c57eb64
commit 28ae228
Show file tree

Hide file tree

Showing 16 changed files with 895 additions and 387 deletions.
diff --git a/Keyboard and Spell checker/Classes/clsFileVersion.pas b/Keyboard and Spell checker/Classes/clsFileVersion.pas
@@ -76,15 +76,21 @@
 
 Implementation
 
+Uses
+     uFileFolderHandling;
+
 {===============================================================================}
 
 Constructor TFileVersion.Create(Const AFileName: String = '');
 Begin
      Inherited Create;
 
      If AFileName = '' Then
-          FFileName := ExtractFilePath(Application.ExeName) +
-               ExtractFileName(Application.ExeName)
+          {$IFNDEF SpellCheckerDll}
+          FFileName := Application.ExeName
+               {$ELSE}
+          FFileName := GetDllFullPath
+               {$ENDIF}
      Else
           FFileName := AFileName;
 
@@ -183,3 +189,4 @@
 {===============================================================================}
 
 End.
+