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