Ver Mensaje Individual
  #2  
Antiguo 12-11-2010
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola Aluren.

Para seleccionar un registro igual al contenido del Edit:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
 with IBQuery1 do
  begin
    Close;
    SQL.Text:= 'SELECT * FROM TU_TABLA WHERE TU_CAMPO = ' + QuotedStr(Edit1.Text);
    Open;
  end;
end;

Para seleccionar registros coincidentes con la primera parte escrita en el Edit:
Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
begin
  with IBQuery1 do
  begin
    Close;
    SQL.Text:= 'SELECT * FROM TU_TABLA WHERE TU_CAMPO LIKE ' + QuotedStr(Edit1.Text+'%');
    Open;
  end;
end;

Saludos.
Responder Con Cita