F1 = Notebook?? F2 = IE ????

[Niko]

hola a todos

Me gustaria saber como puedo en mi formulario hacer que cuando por ejemplo se pulse F1, salga en la statusbar que he pulsado 'F1' y que abra el notebook, y que cuando pulse F2 salga 'F2' y abra el internet explorer...... etc...


como puedo hacer??

[Ruben_Cu]

Hola NIKO, implementa este evento con este código para obtener lo que deseas. En la unit windows.pas están el resto de los números asociados a las distintas teclas. Debes pasar la propiedad KeyPreview del formulario a true.

procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word;
Shift: TShiftState);
var tecla:string;
begin
case key of
112: begin
winexec('notepad.exe',SW_SHOW);
tecla:='F1';
end;
113: begin
winexec('C:\Archivos de programa\Internet Explorer\IEXPLORE.EXE',SW_SHOW);
tecla:='F2';
end;
end;
statusbar1.SimpleText:='Tecla Pulsada '+tecla;

end;

Espero te ayude esta idea.
Saludos