Italian community of Lazarus and Free Pascal

Ho notato che inserendo una StatusBar ad un Form , e su questa dei pannelli  con Style = psOwnerDraw;
quando si aggiunge la gestione dell'evento OnDrawPanel

viene generata in automatico

 procedure BarraStatoDrawPanel(StatusBar: TStatusBar; Panel: TStatusPanel;  const Rect: TRect);  


in fase di compilazione segnala che StatusBar e' duplicata,
ovvio nella classe vi e' la dichiarazione del componente StatusBar: TStatusBar;
creata in automatico,

non resta che ovviare cambiando dichiarazione in modo che il parametro StatusBar abbia un nome diverso

[b][/b]
procedure BarraStatoDrawPanel([b]StatusBar1: TStatusBar[/b]; Panel: TStatusPanel;  const Rect: TRect);  


cosi' StatusBar e StatusBar1 risultano variabili diverse e non si disturbano;

questo solo mantenendo {$mode objfpc}  , se invece la direttiva e' {$mode delphi}  , l'anomalia non si presenta.