Encuentra los 5 (o mas) errores...

[papulo]

¡¡RESUELTO!! Aunque la ayuda me ha servido lo mismo que si estuviera en Arameo, lo que he visto es que comenzaba el statement con un condicional, y va ser que eso no le gustaba, asi que con este sencillo retoque

Código Delphi [-]
 VK_F2 : begin
            if iStatus=1 then
            begin
              iStatus := 10;
              Lanzar_Consulta;
            end;
         end;

Ya lo he hechado andar, ya que si me permite usar el if dentro del begin.