como fazer pesquisa em 2 campos com Query SQL

ola amigos do clube! tenho um tabela chamada DB_ctrc, quero realizar uma busca da seguinte forma :

quero buscar todo o movimento do clientes SEBASTIAO, campo embarcador, com um intervalo de data campo dataemissao,

COMO FAZER UMA BUSCA JUNTA ou seja fazer sair tudo o movimento do Sebastiao entre a data 01/10/2003 a 01/11/2003


tentei issso




procedure TF_P_icms_por_embarcador.BitBtn1Click(Sender: TObject);
Var
Data1,Data2:String;
begin
Data1 := Copy(MaskEdit1.Text,4,2)+´/´+Copy(MaskEdit1.Text,1,2)+´/´+Copy(MaskEdit1.Text,7,4);
Data2 := Copy(MaskEdit2.Text,4,2)+´/´+Copy(MaskEdit2.Text,1,2)+´/´+Copy(MaskEdit2.Text,7,4);
if Rb2.Checked = true then
begin
with qembarcador do
begin
Close;
sql.clear;
SQL.ADD(´Select*from Bd_ctrc where dataemissao Between ´+chr(39)+Data1+chr(39)+´ and ´+chr(39)+Data2+chr(39));
Open;
If IsEmpty Then
begin
Application.MessageBox(´Registro(s) não encontrada(s)´,´Pesquisa´,Mb_Ok+Mb_IconInformation);
MaskEdit1.SetFocus;
end;
end;
end
Else
begin
//
with qembarcador do
begin
Close;
sql.clear;
sql.Add(´Select*from Bd_CTRC where UPper(BD_ctrc.embarcador) like ´+chr(39)+Uppercase(edit1.text)+´¬´+chr(39));
Open;
If IsEmpty Then
begin
Application.MessageBox(´Registros(s) não encontrada(s)´,´Pesquisa´,Mb_Ok+Mb_IconInformation);
Edit1.SetFocus;
end;

end;
end;

end;

MAIS QUERIA E QUE BUSCASSE JUNTO E NAO SEPARADAMENTE,