paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-16 09:09:35 +02:00
Code Issues Packages Projects Releases Wiki Activity

lazdatadesktop: fixed compilation

Browse Source 
git-svn-id: trunk@16353 -
This commit is contained in:
mattias 2008-09-01 17:36:24 +00:00
parent 64668d1e39
commit b110becc44
4 changed files with 10 additions and 13 deletions

4
tools/lazdatadesktop/dicteditor.pp
View File

@ -25,8 +25,8 @@ unit dicteditor;
interface
uses
Classes, SysUtils, fpdatadict, controls, comctrls, stdctrls, extctrls,
graphics, imglist, RTTIGrids, lresources;
Classes, SysUtils, FileUtil, fpdatadict, Controls, ComCtrls, StdCtrls,
ExtCtrls, Graphics, ImgList, RTTIGrids, LResources;
Type

8
tools/lazdatadesktop/frmmain.pp
View File

@ -25,8 +25,8 @@ unit frmmain;
interface
uses
Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, Menus,
ActnList, StdActns, ComCtrls, dicteditor, fpdatadict, IniPropStorage,
Classes, SysUtils, LResources, FileUtil, Forms, Controls, Graphics, Dialogs,
Menus, ActnList, StdActns, ComCtrls, dicteditor, fpdatadict, IniPropStorage,
conneditor, LCLType,
RTTICtrls, ExtCtrls, StdCtrls, ddfiles;
@ -308,8 +308,8 @@ begin
FN:=GetAppConfigDirUTF8(False);
ForceDirectoriesUTF8(FN);
FN:=GetAppConfigFile(False);
FRecentDicts.LoadFromFile(UTF8ToSys(FN,'RecentDicts'));
FRecentConnections.LoadFromFile(UTF8ToSys(FN,'RecentConnections'));
FRecentDicts.LoadFromFile(UTF8ToSys(FN),'RecentDicts');
FRecentConnections.LoadFromFile(UTF8ToSys(FN),'RecentConnections');
ShowRecentDictionaries;
ShowRecentConnections;
ShowDDImports;

5
tools/lazdatadesktop/lazdatadesktop.lpi
View File

@ -115,16 +115,13 @@
</Units>
</ProjectOptions>
<CompilerOptions>
<Version Value="5"/>
<Version Value="8"/>
<Target>
<Filename Value="lazdatadesktop"/>
</Target>
<SearchPaths>
<Libraries Value="/opt/gnome/lib/"/>
</SearchPaths>
<CodeGeneration>
<Generate Value="Faster"/>
</CodeGeneration>
<Linking>
<Options>
<Win32>

6
tools/lazdatadesktop/querypanel.pp
View File

@ -25,9 +25,9 @@ unit querypanel;
interface
uses
Classes, SysUtils, DB, fpDatadict, controls, extctrls, stdctrls, comctrls,
LResources, LCLType, dialogs, actnlist, datapanel, synedit, synmemo,
synhighlightersql;
Classes, SysUtils, DB, fpDatadict, FileUtil, Controls, ExtCtrls, StdCtrls,
ComCtrls, LResources, LCLType, Dialogs, ActnList, datapanel, SynEdit, SynMemo,
SynHighlighterSQL;
Type