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

LazDataDesktop: removed DBNavigator hints localization workaround (should not be needed anymore since r25318 #3a6160cc39)

Browse Source 
git-svn-id: trunk@25319 -
This commit is contained in:
maxim 2010-05-11 22:44:34 +00:00
parent 3a6160cc39
commit ed32ccb113
2 changed files with 4 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
tools/lazdatadesktop/datapanel.pp
View File

@ -26,7 +26,7 @@ interface
uses
Graphics, Classes, SysUtils, Controls, ExtCtrls, StdCtrls, DB, dbgrids, dbCtrls,
buttons, fpdatadict, lclstrconsts;
buttons, fpdatadict;
Type
@ -159,18 +159,6 @@ begin
FNavigator.Left:=4;
FNavigator.Height:=22;
FNavigator.DataSource:=FDatasource;
// Non translated in DBCTRLS.pas !!!!
FNavigator.Hints.Clear;
FNavigator.Hints.Add(rsFirstRecordHint);
FNavigator.Hints.Add(rsPriorRecordHint);
FNavigator.Hints.Add(rsNextRecordHint);
FNavigator.Hints.Add(rsLastRecordHint);
FNavigator.Hints.Add(rsInsertRecordHint);
FNavigator.Hints.Add(rsDeleteRecordHint);
FNavigator.Hints.Add(rsEditRecordHint);
FNavigator.Hints.Add(rsPostRecordHint);
FNavigator.Hints.Add(rsCancelRecordHint);
FNavigator.Hints.Add(rsRefreshRecordsHint);
//
CheckButtons;
FExportSB:=TSpeedButton.Create(Self);

3
tools/lazdatadesktop/lazdatadesktop.lpi
View File

@ -16,6 +16,9 @@
<i18n>
<OutDir Value="languages"/>
</i18n>
<VersionInfo>
<StringTable Comments="" CompanyName="" FileDescription="" FileVersion="0.0.0.0" InternalName="" LegalCopyright="" LegalTrademarks="" OriginalFilename="" ProductName="" ProductVersion="0.0.0.0"/>
</VersionInfo>
<PublishOptions>
<Version Value="2"/>
<IncludeFileFilter Value="*.(pas|pp|inc|lfm|lpr|lrs|lpi|lpk|sh|xml)"/>