visual inheritance, not running code ancestor.
Original Reporter info from Mantis: maxid
-
Reporter name: Maximiliano Duarte
Original Reporter info from Mantis: maxid
- Reporter name: Maximiliano Duarte
Description:
The error is in the assignment of events when the form is inherited in lfm file.
By assigning an event in child form and then removes it, assigns nil to that event rather than simply remove the assignment or make the call to the parent Event.
Spanish
El error está en la asignacion de los eventos cuando el formulario es heredado en el archivo lfm.
Al asignar un evento en el formulario hijo y se elimina éste despues, le asigna nil a ese evento en vez de simplemente eliminar la asignación o poner la llamada al eventro padre.
Additional information:
I show parts of lfm where this error, one does not work and another in which it works
This fails:
inherited FormPacientes: TFormPacientes
Left = 344
Height = 452
Top = 105
Width = 608
Caption = 'Patients'
ClientHeight = 452
ClientWidth = 608
OnClose = nil -----> here is inaccurate. Should say FormClose or delete the line
OnCreate = FormCreate
OnShow = FormShow
inherited Panel1: TPanel
This work well:
inherited FormEspecialidades: TFormEspecialidades
Left = 667
Height = 288
Top = 373
Width = 343
Caption = 'Specials'
ClientHeight = 288
ClientWidth = 343
-------> This is correct, the event is not assigned to nil
OnCreate = FormCreate
inherited Panel1: TPanel
Mantis conversion info:
- Mantis ID: 20980
- Version: 0.9.31 (SVN)
- Fixed in version: 0.9.31 (SVN)
- Fixed in revision: 35782 (#eddf673b)
- Target version: 1.2