Erro da expressão condional

faz um tempo que nao uso delphi e estou faltando agora,queria entender o que tem de errado...

da o erro imcompatible types na 3 linha

if Vx>0 then

begin

 if (X<xo and X+Vx>xo) or (X+tx<xo and X+Vx+tx>xo) then

 begin

 end ;

end;