Necesito su ayuda por favor!! Soy nueva en esto y tengo algunas dudas a pesar de que ya he buscado en el foro y en otros links. De antemano, muchas gracias…
Mi problema es el siguiente:
Necesito consultar un registro por medio del campo matricula y que aparezcan los datos den unos edits o dbedits para modificaciones.
Tengo el siguiente query:
Código SQL
[-]
select alu_id_alumno
from alumnos
where alu_id_alumno like :MAT
y en el botón de buscar tengo:
Código Delphi
[-]
procedure TFrmBuscar.buscarClick(Sender: TObject);
begin
QBuscar.Active := false;
QBuscar.ParamByName('MAT').Value := '%' + matricula.Text + '%';
QBuscar.Active := true;
if QBuscar.IsEmpty then
messagedlg('Matricula no existe', mtError, [mbok],0)
else
nombre.Text := end;