Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   programar boton ? y X (https://www.clubdelphi.com/foros/showthread.php?t=62671)

ingabraham 07-01-2009 19:22:06

programar boton ? y X
 
hola,.
necesito programar estos dos botones que tienen los form asi:

si se preciona f1 se realiza un evento este ?
y si se preciona el esc se activara el x

entonces para que estos botones hagan algo donde meto el codigo

si quiero mandarlos a un procedimiento o algo asi.

Gracias de antemano a la colaboración que me puedan brindar.

white_zombie 07-01-2009 19:37:20

Hola, para que te salga la ayuda pulsando F1 hay unas opciones en las propiedades del formulario que los permiten, creo recordar que helpfile y alguna otra.

Para cerrar la aplicación, utiliza el componente TActionList donde eliges la tecla o combinacion de tecla que quieras y en el evento OnExecute pones form1.close, lo cual es como si pulsases el boton X.

Un Saludo.

MiKloSS 07-01-2009 19:45:28

Puedes programarlos en el evento click del boton, y para poder llamarlos con las teclas rapidas f1 y esc, tienes que mandarlos llamar desde el evento shortcut de la forma... salu2

ingabraham 07-01-2009 19:46:54

Cita:

Empezado por white_zombie (Mensaje 333682)
Hola, para que te salga la ayuda pulsando F1 hay unas opciones en las propiedades del formulario que los permiten, creo recordar que helpfile y alguna otra.

Para cerrar la aplicación, utiliza el componente TActionList donde eliges la tecla o combinacion de tecla que quieras y en el evento OnExecute pones form1.close, lo cual es como si pulsases el boton X.

Un Saludo.

nada
el helpfile no hace nada
ha y cual es la combinacion para esc

ingabraham 07-01-2009 19:50:53

Cita:

Empezado por MiKloSS (Mensaje 333684)
Puedes programarlos en el evento click del boton, y para poder llamarlos con las teclas rapidas f1 y esc, tienes que mandarlos llamar desde el evento shortcut de la forma... salu2

no me puedes dar un ejemplo

que es lo que voy aponer
digamos
en on help
yo puse un showmessage y no me muestra nada

white_zombie 07-01-2009 21:02:09

Como comenta el amigo MiKloSS seria algo asi:

Código Delphi [-]
procedure TForm1.FormShortCut(var Msg: TWMKey; var Handled: Boolean);
begin

if (msg.CharCode=VK_ESCAPE) and (msg.result=1)  then
  begin
    showmessage('Has presionado ESC');
  end
 else if (msg.CharCode=VK_F1) and (msg.result=1)     then
  begin
    showmessage('Has presionado F1');
  end;

end;

Un Saludo.

MiKloSS 08-01-2009 03:02:29

algo asi te kedaria, y si kieres ke se de el click pues nada mas pones el nombre del boton on el evento onclick, seria algo asi...

boton_?.OnClick(self); // es es en el VK_F1

y

boton_X.OnClick(self);// para VK_ESCAPE

ingabraham 09-01-2009 16:46:38

Cita:

Empezado por white_zombie (Mensaje 333700)
Como comenta el amigo MiKloSS seria algo asi:


Código Delphi [-]
procedure TForm1.FormShortCut(var Msg: TWMKey; var Handled: Boolean);
begin

if (msg.CharCode=VK_ESCAPE) and (msg.result=1) then
begin
showmessage('Has presionado ESC');
end
else if (msg.CharCode=VK_F1) and (msg.result=1) then
begin
showmessage('Has presionado F1');
end;

end;





Un Saludo.

Gracias me funciono a la perfección., ahora necesito es que si se da click en el boton help se active el f1, o haga algo.
gracias

white_zombie 09-01-2009 18:00:54

Lo siento pero en eso no te puedo ayudar, si te refieres al boton ? que sale en el borde del formulario al lado del boton X creo que no se puede programar su funcionamiento.

Si no me equivoco ese boton tiene un funcionamiento predefinido y es que cuando lo pulsas si te fijas en el cursor sale una interrogacion, una vez pulsado te puedes dirigir al componente del formulario que quieras y si pulsas sobre él te saldra la ayuda que le hubieses indicado al formulario en el helpfile abierta por el topico que indiques en la propiedad helpcontext de ese componente.

Por este motivo mi primer post iba por ese camino porque creo que lo quieres es que tu aplicación tenga un archivo de ayuda.

Lo de la tecla ESC ya lo tienes solucionado para lo otro busca en foro sobre helpfile y helpcontext.

La verdad, me explico bastante mal pero espero haberte aclarado algo.

Un saludo.


La franja horaria es GMT +2. Ahora son las 01:35:45.

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