Procedimiento Generico para oprimir un boton

[GerTorresM]

Hola a todos:

La situación que se me presenta es la siguiente:

He creado un Unidad en la cual estoy creando procedimientos y funciones genericas para utilizar a lo largo de un aplicativo; para el caso pense en crear un procedimiento que me permitiera oprimir un boton desde código el resultado fue el siguiente

Código Delphi [-]
procedure OprimirBoton(Boton : TControl);
Begin
  Boton.Perform(WM_LButtonDown,0,0);
  Boton.Perform(WM_LButtonUp,0,0);
end;

Ahora al intentar compilar la aplicación me envia el siguiente mensaje de error

[Error] UProcedimientos.pas(936): Undeclared identifier: 'WM_LButtonDown'
[Error] UProcedimientos.pas(937): Undeclared identifier: 'WM_LButtonUp'

pense en primer lugar que era falta de alguna libreria así que adicione la libreria Buttons, pero aún continua enviando el mensaje de error.


Agradezco de antemano la atención que me puedan dar.



gertorresm
Colombia.