pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

* Fixed component compilation on Windows

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2634 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
loesje_
2013-01-21 18:11:54 +00:00
parent 7e3b60e61d
commit 1fe5f8e4a4
3 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/geckoport/version2/Components/GeckoBrowser.pas
View File

@ -2070,7 +2070,7 @@ var
{$ENDIF} {$ENDIF}
begin begin
{$IFDEF MSWINDOWS} {$IFDEF MSWINDOWS}
Result := Handle; Result := nativeWindow(Handle);
{$ENDIF} {$ENDIF}
{$IFDEF LCLCarbon} {$IFDEF LCLCarbon}
Result := nativeWindow(TCarbonWindow(Handle).Window); Result := nativeWindow(TCarbonWindow(Handle).Window);

2
components/geckoport/version2/Components/GeckoChromeWindow.pas
View File

@ -172,7 +172,7 @@ var
AView : NSView; AView : NSView;
{$ENDIF} {$ENDIF}
begin begin
{$IFDEF MSWINDOWS}Result := Handle;{$ENDIF} {$IFDEF MSWINDOWS}Result := nativeWindow(Handle);{$ENDIF}
{$IFDEF LCLCarbon}Result := THANDLE(TCarbonWindow(Handle).Window);{$ENDIF} {$IFDEF LCLCarbon}Result := THANDLE(TCarbonWindow(Handle).Window);{$ENDIF}
//Carbon doesn't work but leave in so package compiles in Carbon IDE. //Carbon doesn't work but leave in so package compiles in Carbon IDE.

2
components/geckoport/version2/fpmake.pp
View File

@ -23,7 +23,7 @@ begin
P:=AddPackage('gecko') as TLazPackage; P:=AddPackage('gecko') as TLazPackage;
p.AfterInstall := @TLazInstaller(Installer).DoRegisterLazarusPackages; p.AfterInstall := @TLazInstaller(Installer).DoRegisterLazarusPackages;
P.Version:='2.9.0-2'; P.Version:='2.9.0-3';
P.OSes:=AllUnixOSes+[Win32,Win64]; P.OSes:=AllUnixOSes+[Win32,Win64];
P.Author := 'Takanori Ito'; P.Author := 'Takanori Ito';
P.License := 'MPL 1.1'; P.License := 'MPL 1.1';