Delphi Mysql Select
Uso Delphi 7 e MySql 5
Preciso fazer um select onde a condição pode ser um nome específico de uma coluna (select 1)
ou trazer todos os campos da coluna (select 2)
select 1
MyQuery1.SQL.add('select nome, cpf');
MyQuery1.SQL.add('from aluno');
MyQuery1.SQL.add('where nome =: parametro');
MyQuery1.Params[0].Value := edit1.text;
select 2
MyQuery1.SQL.add('select nome, cpf');
MyQuery1.SQL.add('from aluno');
Como posso unir estes dois select. No form tem um checkbox, que se for selecionado indica que o usuário quer exibir todos os alunos, e um combobox onde ele escolhe o nome a ser exibido
Preciso fazer um select onde a condição pode ser um nome específico de uma coluna (select 1)
ou trazer todos os campos da coluna (select 2)
select 1
MyQuery1.SQL.add('select nome, cpf');
MyQuery1.SQL.add('from aluno');
MyQuery1.SQL.add('where nome =: parametro');
MyQuery1.Params[0].Value := edit1.text;
select 2
MyQuery1.SQL.add('select nome, cpf');
MyQuery1.SQL.add('from aluno');
Como posso unir estes dois select. No form tem um checkbox, que se for selecionado indica que o usuário quer exibir todos os alunos, e um combobox onde ele escolhe o nome a ser exibido
Claudivan Lopes
Curtidas 0
Respostas
Bruno Leandro
14/09/2012
Ola voce pode fazer assim, no oncreate deixar
MyQuery1.SQL.add('select nome, cpf');
MyQuery1.SQL.add('from aluno');
MyQuery1.SQL.add('');
e ao clicar no filtrar ou no selecionar do checkbox voce colocar o where ou nao
MyQuery1.SQL[2] := '';
if not(checkboxTodos.checked) then
begin
MyQuery1.SQL[2] := 'where nome =: parametro';
MyQuery1.Params[0].Value := edit1.text;
end;
MyQuery1.Open;
MyQuery1.SQL.add('select nome, cpf');
MyQuery1.SQL.add('from aluno');
MyQuery1.SQL.add('');
e ao clicar no filtrar ou no selecionar do checkbox voce colocar o where ou nao
MyQuery1.SQL[2] := '';
if not(checkboxTodos.checked) then
begin
MyQuery1.SQL[2] := 'where nome =: parametro';
MyQuery1.Params[0].Value := edit1.text;
end;
MyQuery1.Open;
GOSTEI 0