Hola muppett,
Veo que vas mejorando... pero no estas siguiendo al pie de la letra los consejos que te han aportado. He visto tu código (que por cierto te aconsejo que empieces a usar las etiquetas DELPHI) y puedo apreciar que estás mesclando TTable con TQuery.
Primeramente lanzas una consulta, bueno.. barbaro. Y seguidamente averiguas en TTable cuales son los registros... eso está mal. Una vez que lanzas la consulta con TQuery, es este componente quien tiene los resultados no el TTable. Por lo que debes preguntar por RecordCount de éste. Es decir:
Código Delphi
[-]
if (Query1.RecordCount > 0)
then ShowMessage('Hay registros devueltos por la consulta')
else ShowMessage('No hay registros devueltos por la consulta');
Bueno, por ahora hasta allí veo que la mano. Como dije antes, emplea las etiquetas DELPHI para que el código que nos muestra sea más entendible a la vista.
EDITO:
Viendo que dices que no sabes nada de Delphi creo que es hora de hagas una leída a La Cara Oculta de Delphi 4. Es un libro que explica muy bien todos estos temas y otros. El ABC de Delphi. Lo vas a encontrar con facilidad en internet.
Saludos,