Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / lazarus / 2012-06

SynEdit, synedithighlighter.pp have unnessary TBetterRegistry class

2 messages · 2 people ·

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Zaher Dirkey

Hi, Martin

In synedithighlighter.pp

No need TBetterRegistry it is has undefined function in SYN_COMPILER_4_UP

{$DEFINE _Gp_MustEnhanceRegistry}
{$IFDEF SYN_COMPILER_4_UP}
  {$UNDEF _Gp_MustEnhanceRegistry}
{$ENDIF}
type
  TBetterRegistry = class(TRegistry)
  {$IFDEF _Gp_MustEnhanceRegistry}
    function OpenKeyReadOnly(const Key: string): Boolean;
  {$ENDIF}
  end;

I need permission to remove it and replace it to TRegistry to who use it.

Best Regards

Zaher Dirkey
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus/attachments/20120603/c662e45d/attachment.html>

Reply by email

Martin
to Zaher Dirkey
Zaher Dirkey wrote 18 lines
Hi, Martin In synedithighlighter.pp No need TBetterRegistry it is has undefined function in SYN_COMPILER_4_UP {$DEFINE _Gp_MustEnhanceRegistry} {$IFDEF SYN_COMPILER_4_UP} {$UNDEF _Gp_MustEnhanceRegistry} {$ENDIF} type TBetterRegistry = class(TRegistry) {$IFDEF _Gp_MustEnhanceRegistry} function OpenKeyReadOnly(const Key: string): Boolean; {$ENDIF} end; I need permission to remove it and replace it to TRegistry to who use it.

No proplem

Reply by email