Lo más sencillo es que pongas un filtro a la tabla que contiene las fichas, de esta manera solamente te imprimirá la ficha filtrada.
Código Delphi
[-]MiTabla.Filter:='DNI ='+QuotedStr(Edit1.Text);
MiTabla.Filtered:=True;
.....
ahora manda a imprimir.
Un Saludo.