Delphi - validación del rut porfacor ayudenme

hola denuevo a todos!!!!
necesito saber como poder validar el rut que ingrese en un db edit, por que si ingreso un rut quiero que me devuelva todos los datos del cliente, esto es para realizar una consulta..? porfavor ayudenme que lo necesito..
la validación del rut donde deve ir en el db edit .. como se hace!!!!!!

No me queda claro si lo que quieres hacer es ver si el rut existe o quieres validar si es válido como rut.

Ve si te sirve esto (valida que exista en la base de datos):

procedure TForm1.DBEdit1KeyPress(Sender: TObject; var Key: Char);
Var
rut : string;
begin
{la query debe estar abierta}

if Ord(Key) = 13 then {presiona enter}
Begin
rut := DBEdit1.Text
if DataSource.State IN [dsInsert,dsEdit] then
Query1.Cancel;
Query1.active := false;
Query1.ParamByName('prut').asString := rut;
end
end;

Suerte.
Por cualquier cosa
[email protected]

Por lo que yo entiendo.... podria ser una buscar el rut en la base... y si lo encuentra dedvolver los datos del cliente... bueno, si es eso, ese proceedimiento debe ir en el evento onexit del edit, ahora si lo que quieres es validar que los digitos del rut no esten malos, pues para mi pais existe una formula para hacerlo, chile, no se de donde eres tu, e ignoro si existe una formula para ello. Salu2