paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-22 21:19:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

IdeHelpManager: formatting

Browse Source 
git-svn-id: trunk@45826 -
This commit is contained in:
juha 2014-07-11 16:30:40 +00:00
parent e8c25a5a34
commit 7e4684a637
1 changed files with 7 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
ide/idehelpmanager.pas
View File

@ -253,8 +253,7 @@ type
BtnPanel: TButtonPanel; BtnPanel: TButtonPanel;
NodesGroupBox: TGroupBox; NodesGroupBox: TGroupBox;
NodesListBox: TListBox; NodesListBox: TListBox;
procedure HelpSelectorDialogClose(Sender: TObject; procedure HelpSelectorDialogClose(Sender: TObject; var CloseAction: TCloseAction);
var CloseAction: TCloseAction);
procedure NodesListBoxDblClick(Sender: TObject); procedure NodesListBoxDblClick(Sender: TObject);
private private
FNodes: THelpNodeQueryList; FNodes: THelpNodeQueryList;
@ -562,8 +561,7 @@ begin
end; end;
end; end;
procedure TSimpleHTMLControl.SetHTMLContent(Stream: TStream; procedure TSimpleHTMLControl.SetHTMLContent(Stream: TStream; const NewURL: string);
const NewURL: string);
begin begin
FURL:=NewURL; FURL:=NewURL;
Caption:=HTMLToCaption(Stream,MaxLineCount); Caption:=HTMLToCaption(Stream,MaxLineCount);
@ -643,8 +641,7 @@ begin
end; end;
end; end;
procedure TScrollableHTMLControl.SetHTMLContent(Stream: TStream; procedure TScrollableHTMLControl.SetHTMLContent(Stream: TStream; const NewURL: string);
const NewURL: string);
begin begin
FURL:=NewURL; FURL:=NewURL;
Caption:=HTMLToCaption(Stream,MaxInt); Caption:=HTMLToCaption(Stream,MaxInt);
@ -845,8 +842,7 @@ begin
end; end;
end; end;
function TLazIDEHTMLProvider.GetStream(const URL: string; Shared: Boolean function TLazIDEHTMLProvider.GetStream(const URL: string; Shared: Boolean): TStream;
): TStream;
begin begin
Result:=FProviders.GetStream(URL,Shared); Result:=FProviders.GetStream(URL,Shared);
end; end;
@ -1725,9 +1721,9 @@ begin
Result:=true; Result:=true;
end; end;
function TIDEHelpManager.GetHintForSourcePosition( function TIDEHelpManager.GetHintForSourcePosition(const ExpandedFilename: string;
const ExpandedFilename: string; const CodePos: TPoint; out BaseURL, const CodePos: TPoint; out BaseURL, HTMLHint: string;
HTMLHint: string; Flags: TIDEHelpManagerCreateHintFlags): TShowHelpResult; Flags: TIDEHelpManagerCreateHintFlags): TShowHelpResult;
var var
Code: TCodeBuffer; Code: TCodeBuffer;
CacheWasUsed: boolean; CacheWasUsed: boolean;