Fórum Consulta SQL - URGENTE!!! #168937

Olá pessoal,
Estou fazendo um BD em tabela Paradox.
- Tenho as seguintes tabelas, q estão relacionadas:
TB_Livros: CodigoDoLivro, DataDeCadastro, TituloDaObra, ISBN, CodigoDaEditora, Volume, Edicao, Exemplar, AnoDePublicacao, CodigoDaColecao, LocalDePublicacao, Acervo.

TB_Autores: CodigoDoAutor, CodigoDoLivro, CodigoDoAutor2, Autor

Tenho um RadioGroup com as seguintes opções:

- Título da Obra
- Número do ISBN
- Nome do Autor
- Nome da Editora
- Nome da Colecao

A minha consulta está assim:

If RadioGroup1.ItemIndex = 0 Then
Begin
With DMDados.Relacao Do
Begin
Close;
SQL.Clear;
SQL.Add(´SELECT * FROM TBLivros INNER JOIN TBAutores ON TBLivros.CodigoDoLivro = TBAutores.CodigoDoLivro´);
SQL.Add(´WHERE TituloDaObra=:P1´);
ParamByName(´P1´).Value:=Edit1.Text+´¬´;
Open;
End
End
Else
If RadioGroup1.ItemIndex = 1 Then
Begin
With DMDados.Relacao Do
Begin
Close;
SQL.Clear;
SQL.Add(´SELECT * FROM TBLivros INNER JOIN TBAutores ON TBLivros.CodigoDoLivro = TBAutores.CodigoDoLivro´);
SQL.Add(´WHERE ISBN=:P1´);
ParamByName(´P1´).Value:=Edit1.Text;
Open;
End
End
Else
If RadioGroup1.ItemIndex = 2 Then
Begin
With DMDados.Relacao Do
Begin
Close;
SQL.Clear;
SQL.Add(´SELECT * FROM TBLivros INNER JOIN TBAutores ON TBLivros.CodigoDoLivro = TBAutores.CodigoDoLivro´);
SQL.Add(´WHERE CodigoDoAutor=:P1´);
ParamByName(´P1´).Value:=StrToIntDef(Edit2.Text, 0);
Open;
End
End
Else
If RadioGroup1.ItemIndex = 3 Then
Begin
With DMDados.Relacao Do
Begin
Close;
SQL.Clear;
SQL.Add(´SELECT * FROM TBLivros INNER JOIN TBAutores ON TBLivros.CodigoDoLivro = TBAutores.CodigoDoLivro´);
SQL.Add(´WHERE CodigoDaEditora=:P1´);
ParamByName(´P1´).Value:=StrToIntDef(Edit2.Text, 0);
Open;
End
End
Else
If RadioGroup1.ItemIndex = 4 Then
Begin
With DMDados.Relacao Do
Begin
Close;
SQL.Clear;
SQL.Add(´SELECT * FROM TBLivros INNER JOIN TBAutores ON TBLivros.CodigoDoLivro = TBAutores.CodigoDoLivro´);
SQL.Add(´WHERE CodigoDaColecao=:P1´);
ParamByName(´P1´).Value:=StrToIntDef(Edit2.Text, 0);
Open;
End;
End;


Só q não estou conseguindo fazer estas consultas. Resumindo, quero uma consulta q faça uma busca por uma das opções acima para q o usuário localize com mais facilidade o livro q deseja solicitar à biblioteca. Este sistema terá q estar em rede para q todas as salas possam ter acesso à estas consultas e depois será feito ainda uma tela para fazerem a solicitação para o setor responsável, a biblioteca.

Alguém pode me ajudar?

Grato,

Ilano.