![]() |
![]() |
![]() |
![]() |
![]() |
FTP | ![]() |
![]() |
CCD | ![]() |
![]() |
Buscar | ![]() |
![]() |
Trucos | ![]() |
![]() |
Trabajo | ![]() |
![]() |
Foros | ![]() |
|
#1
|
||||
|
||||
el codigo sria algo asi:
procedure TFMain.FormKeyPress(Sender: TObject; var Key: Char); begin if Key in ['1'] then begin Fmain.PopupMenu1.Popup(550,60); //abro el menu Fmain.PopupMenu1.Items[1].Click; // hago click en el item número 1 end; end; Tene en cuenta poner KeyPreview poner en True en el formulario. Espero haberte ayudado salud2 PD:= Hoy por tí mañana por mi ![]() Última edición por acertij022 fecha: 03-07-2003 a las 15:16:39. |
![]() |
|
|
![]() |
|