Ver Mensaje Individual
  #5  
Antiguo 21-09-2005
Avatar de papulo
papulo papulo is offline
Miembro
 
Registrado: ago 2005
Ubicación: Lleida - Cataluña - España -Europa - Planeta tierra - Sistema solar - Via Lactea ...
Posts: 542
Reputación: 19
papulo Va por buen camino
Mi evento apretando F5 es exactamente este:

Código Delphi [-]
 procedure TFiller.FormKeyDown(Sender: TObject; var Key: Word;
   Shift: TShiftState);
 begin
 case Key of
 VK_F5 : case iStatus of
             0 : exit;
             else
             wKeyPress:= VK_F5;
             Lanzar_Consulta;
         end;
 VK_ESCAPE : case iStatus of
 ...
El otro evento que tendria que lanzar una orden como si apretara F5 seria este:
Código Delphi [-]
 procedure TFiller.cIdiomaChange(Sender: TObject);
 begin
 cLang.ItemIndex := cIdioma.ItemIndex;
 sLang := cLang.Text;
 //Aqui la instruccion que me falta, que lance el evento que se inicia al apretar F5.
 end;

Dicho queda.

Sobre lo que tu me dices, aun me suena a chino, soy un pez aun.
Responder Con Cita