Solo debo añadir, que en caso que el Método o procedimiento no lleve parámetros, no es necesario (y de hecho no compilará el código) poner los paréntesis vacios (al mejor estilo de c). Basta con añadir el punto y coma... algo como:
Código Delphi
[-]
Procedure TForm1.casa;
Begin
Sentencias;
end;
Cita:
|
Empezado por roman
que un procedimiento global haga referencia a un formulario en particular.
|
El principal problema de esto, es que el día que necesitas mas de una instancia del formulario... todo fallaría, o mas bien, el código afectaria siempre al formulario apuntado por Form1... y si ha sido llamado por Form1A, que es otra instancia de TForm1??
Cita:
|
Empezado por roman
o pasas el formulario como parámetro al procedimiento:
|
Esto también seria funcional, pero para evitar TypeCast, en lugar de recibir un parámetro del tipo TForm, seria mejor recibir un parámetro de la clase puntual del formulario a tratar (o del ancestro base donde estén los componentes a modificar, en caso de usar herencia visual)
Es decir..
en lugar de
Procedure Casa(Forma : TForm);
es preferible:
Casa(Forma :
TForm1); o
Casa(Forma :
TFormBaseConsultas);
Hasta luego.
pd. Román: veo que vas bien en las clases de Adivinación para Moderadores del club...... a ver si me das copia para el examen..
