#74 unit1.pas(16,50) Error: Duplicate identifier "Action" (Lazarus 1.2.4 (fpc 2.6.4) + tdbf freepascal trunk (future V7.0.0))

[Nashev]

from my mail, unconfirmed:

Lazarus 1.2.4 (fpc 2.6.4) + tdbf freepascal trunk (future V7.0.0)
При задіянні події OnLanguageWarning виникає помилка компіляції
--- unit1.pas(16,50) Error: Duplicate identifier "Action"

тому що шаблон події має var Action
TLanguageWarningEvent = procedure(Dbf: TDbf; var Action: TDbfLanguageAction) of object;

а при доданні на форму цей var Action конфліктує із
TForm = class(TCustomForm)
published
property Action;

лікується перейменуванням var LAction: TDbfLanguageAction