Consulta Sencilla SQL + Delphi

[Maury Manosalva]

Hola a todos, tengo esta sencilla pregunta, quiero por SQL si un usuario esta creado en la lista de usuarios permitidos para entrar en la aplicación pero me aparece un error Unterminated String, yo estaba haciendo la consulta verificando usuario y contraseña en una sola consulta:
consulta := 'Select * from TabUsuarios where LogUsuario ='+char(39)+ txtUsuario.Text+char(39)+
'and ConUsuario ='+chr(39) + txtcontrasena.Text+char(39);

y funciona perfecto, pero se me ocurrio que si el usuario no existia mostrara un mensaje de 'usuario no existe', pero si el usuario existe y la contraseña esta mal, al tercer intento lo saque de la aplicación y ademas me bloquee el usuario que esta tratando de entrar. como lo estoy haciendo, asi:

consulta := 'Select logUsuario from TabUsuarios where LogUsuario like ='+char(39)+ txtUsuario.Text +char(39)+';

pero me aparece : Unterminated String y Missing Operator or semicolon..

Que estoy haciendo mal...

Gracias.

Maury Manosalva
Colombia