richmemo: introducing zoomfactor property with win32 implementation.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@3827 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
skalogryz
2014-12-06 20:49:00 +00:00
parent fdd9b88f43
commit 9b8a8037c7
3 changed files with 46 additions and 0 deletions

View File

@@ -89,6 +89,8 @@ type
class function SaveRichText(const AWinControl: TWinControl; Dest: TStream): Boolean; virtual;
class function Search(const AWinControl: TWinControl; const ANiddle: string; const SearchOpts: TIntSearchOpt): Integer; virtual;
class procedure SetZoomFactor(const AWinControl: TWinControl; AZoomFactor: Double); virtual;
end;
TWSCustomRichMemoClass = class of TWSCustomRichMemo;
@@ -207,5 +209,11 @@ begin
Result:=-1;
end;
class procedure TWSCustomRichMemo.SetZoomFactor(const AWinControl: TWinControl;
AZoomFactor: Double);
begin
end;
end.