Cita:
Empezado por leofuentes21
with qryempleados do begin active:=false; sql.clear; SQL.ADD('select *FROM empleados'); edtclave.Text:=qryempleados.FieldByName('NUM_REG').AsString; edtnombre.Text:=qryempleados.FieldByName('NOMBRES').AsString; edtdireccion.Text:=qryempleados.FieldByName('DIRECCION').AsString; edtid.Text:=qryempleados.FieldByName('ID').AsString; edttelefono.Text:=qryempleados.FieldByName('TELEFONO').AsString; edtfecha.Text:=qryempleados.FieldByName('FECHA').AsString; opciones2.ItemIndex:=qryempleados.fieldByName('SEXO').AsInteger; active:=true; first; end;
|
Se ve que eres nuevo en delphi de tu procedimiento lo unico que estaba mal era la linea actve:=true ya que esa deberia ir despues de sql.add.... y listo, aunque por otro lado podrias utilizar en lugar de un edit al que tengas que estarle asignando el valor del registro cada que te mueves en la tabla mejor utiliza un dbedit que automaticamente muestra el valor del campo seleccionado y para navegar con un DBNavigator que automaticamente te hace el siguiente, anterior, ultimo, siguiente, editar, etc