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

Moved TCustomGeckoBrowser's InitWebBrowser from private to public so it can be used in Lazarus designer.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1113 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
macpgmr
2010-01-04 21:13:56 +00:00
parent 6edaf05fe6
commit a9dc8441be
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

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

@@ -160,7 +160,6 @@ type
FOnNewWindow: TGeckoBrowserNewWindow; FOnNewWindow: TGeckoBrowserNewWindow;
procedure InitWebBrowser;
procedure ShutdownWebBrowser; procedure ShutdownWebBrowser;
procedure InnerLoadURI(uri: WideString; Flags: PRUint32; procedure InnerLoadURI(uri: WideString; Flags: PRUint32;
referer: nsIURI; postData, headers: TStream); referer: nsIURI; postData, headers: TStream);
@@ -187,6 +186,7 @@ type
public public
constructor Create(AOwner: TComponent); override; constructor Create(AOwner: TComponent); override;
destructor Destroy; override; destructor Destroy; override;
procedure InitWebBrowser; //FPC port: moved from private to public
procedure LoadURI(const uri: WideString); overload; procedure LoadURI(const uri: WideString); overload;
procedure LoadURI(const uri: WideString; const referer: UTF8String); procedure LoadURI(const uri: WideString; const referer: UTF8String);
overload; overload;