Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Lazarus, FreePascal, Kylix, etc. (https://www.clubdelphi.com/foros/forumdisplay.php?f=14)
-   -   funcion Perform (https://www.clubdelphi.com/foros/showthread.php?t=46027)

chorrito 21-07-2007 04:06:03

funcion Perform
 
hola listeros,

tengo varias aplicaciones desarrolladas con lazarus, desde la version
0.9.10 a la actual 0.9.22, y bueno el proyecto sigue avanzando,

pero tengo problemas para el KeyPress de los Forms,
tengo el codigo en el evento OnkeyPress, pero no anda,
compila bien y todo, pero no lo hace,
y el keypreview de los forms esta en tru
entonces, pensaba crear una DLL en delphi con la

funcion Perform(msn: cardinal; wparam: integer; lparam:integer)

pero al compilar me dice que no existe tal funcion,
y le agregre todos los USES posibles, pero nada,

habra alguna forma de hacerlo o si se puede en lazarus

Robert01 21-07-2007 21:11:21

Hola

No podrías poner una parte del código aunque sea. Yo estuve probando y no tuve ninguna clase de problemas con ese evento.

Saludos

chorrito 25-07-2007 21:54:29

en el evento OnKeyPress del Form


if key=#13 then
begin
key:=#0;
Perform(WM_NEXTDLGCTL,0,0)
end;


y en el Form el KeyPreview esta en True

pero no funciona, en la compilacion no da ningun error,
pero no funciona al presionar la tecla ENTER
tambien tengo la unit Messages agregada


La franja horaria es GMT +2. Ahora son las 08:47:55.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi