|
TFieldGetTextEvent
Hola:
Tengo un problema al llamar desde un evento a un procedimiento. He estado revisando el foro y hay un ejemplo de como formatear campos usando el evento TFieldGetTextEvent.
Mi procedimiento lo declaro como:
procedure FormatearFechaHoraEDI(Sender: TField; var Text: string; DisplayText: Boolean);
Pero cuando lo llamo desde una tabla, desde esta forma:
mitabla.ongettext := formatearFechaHora;
El compilador me devuleve el siguiente error:
[Pascal Error] pedidos_entrada.pas(183): E2010 Incompatible types: 'TFieldGetTextEvent' and 'Pointer'
¿Qué error cometo?.
Gracias,
JL
|