paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-10-29 03:21:33 +01:00
Code Issues Packages Projects Releases Wiki Activity

Examples: Fix compilation of "Translation" example on Windows, broken by r49495 #931c7a9de4. Issue #28761.

Browse Source 
git-svn-id: trunk@49920 -
This commit is contained in:
juha 2015-10-03 12:10:56 +00:00
parent a171f6e322
commit a8ac9b0c60
2 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
examples/translation/localizedforms.lfm
View File

@ -4,5 +4,5 @@ object LocalizedForm: TLocalizedForm
Top = 238 Top = 238
Width = 320 Width = 320
Caption = 'LocalizedForm' Caption = 'LocalizedForm'
LCLVersion = '1.3' LCLVersion = '1.5'
end end

7
examples/translation/localizedforms.pas
View File

@ -16,7 +16,10 @@ unit LocalizedForms;
interface interface
uses uses
Classes, Forms; {$IFDEF MSWINDOWS}
Windows,
{$ENDIF}
Classes, SysUtils, Forms;
type type
TLocalizedForm = class(TForm) TLocalizedForm = class(TForm)
@ -48,8 +51,6 @@ implementation
{$R *.lfm} {$R *.lfm}
{ Local procedures } { Local procedures }
{$IFDEF MSWINDOWS} {$IFDEF MSWINDOWS}