¡¡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.