La verdad, el título del mensaje no se corresponde mucho con la pregunta, no sé si me pierdo algo.
Hay 2 formas de hacerlo, en ambas tienes que partir de un componente Query, (TQuery, TIBQuery, TMDOQuery... depende de tu base de datos):
- El rompecabezas, es igual que armar un puzzle.
Código Delphi
[-]
var select, LaSql:string;
begin
select := ' select * from tabla';
LaSql := select + ' where codigo = ' + inttostr(edit1.text);
LaSql := LaSql + ' and nombre = '+ QuotedStr(edit2.text);
query1.sql.text := LaSql;
query1.Open;
end;
Como ves, tienes que tener en cuenta todos los espacios en blanco, las uniones de unas cadenas con otras, etc. Basta un error de un paréntesis para que todo se vaya al traste.
- Por parámetros: Partimos de la base que sabemos cuantos parámetros se van a usar en la búsqueda, preparamos en el TQuery un sql así:
Código SQL
[-]
select from tabla
where codigo = :elcodigo and nombre = :elnombre
Ahora en delphi:
Código Delphi
[-]
query1.parambyname('elcodigo').asInteger := strtoint(edit1.text);
query1.parambyname('elnombre').asString:= edit2.text;
query1.Open;
Saludos