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

added setting style for carbon richmemo

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@822 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
skalogryz
2009-06-05 17:04:00 +00:00
parent 69d6ecc34e
commit d48379d957
3 changed files with 107 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
components/richmemo/richmemofactory.pas
View File

@@ -7,8 +7,9 @@ interface
uses
WSLCLClasses,
RichMemo,
{$ifdef LCLWin32}Win32RichMemo{$endif}
RichMemo
{$ifdef LCLWin32},Win32RichMemo{$endif}
{$ifdef LCLCarbon},CarbonRichMemo{$endif}
;
function RegisterCustomRichMemo: Boolean;
@@ -18,6 +19,7 @@ implementation
function RegisterCustomRichMemo: Boolean; alias : 'WSRegisterCustomRichMemo';
begin
{$ifdef LCLWin32}RegisterWSComponent(TCustomRichMemo, TWin32WSCustomRichMemo);{$endif}
{$ifdef LCLCarbon}RegisterWSComponent(TCustomRichMemo, TCarbonWSCustomRichMemo);{$endif}
Result := False;
end;