Ver Mensaje Individual
  #6  
Antiguo 06-09-2007
Avatar de Delphius
[Delphius] Delphius is offline
Miembro Premium
 
Registrado: jul 2004
Ubicación: Salta, Argentina
Posts: 5.582
Reputación: 25
Delphius Va camino a la fama
Bueno... mira... no tengo Delphi a mano... y lo escribí al vuelo... Tu código debe ir más o menos así...

Código Delphi [-]
with MyQuery do
    begin
      SQL.Clear;
      SQL.Add('Select * from Datos where Datos.Cedula = :CedulaParam');
      // Suponiendo que Cedula es del tipo integer...
      MyQuery.Parameters.ParamByName('CedulaParam').Value := StrToInt(Edit1.Text);
      Open;

      if RecordCount = 1
         then begin
                // hay un registro... entonces muestro el contenido del
                // campo nombre
                Edit1.Text := FieldByName('Nombre').AsString;
              end;
    end;

Puede que tenga una fallas pero las cosas van por algo de este estilo.
EDITO:
Por cierto... sería oportuno decirte que uses las etiquetas [ DELHPI ], [/ DELPHI ] (sin espacios) de modo que el código que expones se vea mejor.
Saludos,
__________________
Delphius
[Guia de estilo][Buscar]

Última edición por Delphius fecha: 06-09-2007 a las 05:50:37. Razón: recomendación del uso de etiquetas
Responder Con Cita