Problema con condiciones

[nena_yei]

Hola,
tengo un problema con un if..no sé si es que estoy saturada y no veo el error o qué, pero es algo muy raro. Tengo lo siguiente:

Código Delphi [-]
if (etim.Checked) or (cap=1) then
begin
  if(pos('#',temp)>0)then begin
    // Código1
  end else if(copy(temp,0,1)='_')then begin
    // Código2
  end else
   // Código3
end;

Entra en la primera condición y ejecuta el Código1 pero después vuelve a entrar en el Código3!! Qué puede estar pasando?

Gracias!