Duvida delphi SQL com variavel
Bom dia,
Sempre trabalhei com Delphi em meus projetos, e executava diretamente a inserção de SQL em query, exemplo:
query.close;
query.sql.clear;
query.sql.add('select * from teste order by nmteste');
query.sql.open;
Ontem comecei a criar funções para que diminua esse numero de linhas em meu projeto, foi ai que pintou um erro que não estou conseguindo encontrar uma solução
Em um procedimento eu coloquei:
procedure InserirSQL(var qQuery: TSQLQuery; SQL: string);
begin
with qQuery do
begin
Close;
SQL.Clear;
SQL.Add(SQL);
end;
end;
Ao compilar da o erro: [DCC Error] unFirebird.pas(54): E2010 Incompatible types: 'string' and 'TStrings'
ou seja, não aceita uma variável do tipo string para receber o sql
Tem alguma maneira disso funcionar? recebendo no add uma variável com o SQL?
Eu utilizo DBExpress em minhas aplicações, com o IDE Delphi XE2.
Obrigado a todos desde já
Sempre trabalhei com Delphi em meus projetos, e executava diretamente a inserção de SQL em query, exemplo:
query.close;
query.sql.clear;
query.sql.add('select * from teste order by nmteste');
query.sql.open;
Ontem comecei a criar funções para que diminua esse numero de linhas em meu projeto, foi ai que pintou um erro que não estou conseguindo encontrar uma solução
Em um procedimento eu coloquei:
procedure InserirSQL(var qQuery: TSQLQuery; SQL: string);
begin
with qQuery do
begin
Close;
SQL.Clear;
SQL.Add(SQL);
end;
end;
Ao compilar da o erro: [DCC Error] unFirebird.pas(54): E2010 Incompatible types: 'string' and 'TStrings'
ou seja, não aceita uma variável do tipo string para receber o sql
Tem alguma maneira disso funcionar? recebendo no add uma variável com o SQL?
Eu utilizo DBExpress em minhas aplicações, com o IDE Delphi XE2.
Obrigado a todos desde já
Eder Barabas
Curtidas 0
Respostas
Marco Salles
25/08/2012
O nome do parêmatro que vc esta utilizando
procedure InserirSQL(var qQuery: TSQLQuery; SQL: string);
esta confundindo o Compilador
altere o nome deste parâmetro
exemplo
procedure InserirSQL(var qQuery: TSQLQuery; qualquerCoisaSQL: string);
procedure InserirSQL(var qQuery: TSQLQuery; SQL: string);
esta confundindo o Compilador
altere o nome deste parâmetro
exemplo
procedure InserirSQL(var qQuery: TSQLQuery; qualquerCoisaSQL: string);
GOSTEI 0
Eder Barabas
25/08/2012
Pohhhh Marco... Verdade...
Nem me liguei do with que usei...
Obrigado pela orientação...
Nem me liguei do with que usei...
Obrigado pela orientação...
GOSTEI 0
Marco Salles
25/08/2012
é acontece..
[]sds
[]sds
GOSTEI 0