DELPHI + QUERY
01/12/2015
0
Estou criando uma funçao em delphi para executar comandos Sql, porem preciso criar uma query em tempo de execução porem quando conecto ele da violação.
Como posso criar uma Query e conectar em tempo de execução?
Como posso criar uma Query e conectar em tempo de execução?
Junior Delphi
Curtir tópico
+ 0
Responder
Posts
01/12/2015
Junior Delphi
Resolvido
procedure TFrmPadrao.ExecSQL(sql: String);
var Query: TADOQuery;
begin
Query := TQuery.Create(Self);
Query.Connection := Frm_Principal.DB_Mecanica;
Query.Connection.Connected;
Query.Close;
Query.SQL.Clear;
Query.SQL.Add(sql);
Query.ExecSQL;
procedure TFrmPadrao.ExecSQL(sql: String);
var Query: TADOQuery;
begin
Query := TQuery.Create(Self);
Query.Connection := Frm_Principal.DB_Mecanica;
Query.Connection.Connected;
Query.Close;
Query.SQL.Clear;
Query.SQL.Add(sql);
Query.ExecSQL;
Responder
Clique aqui para fazer login e interagir na Comunidade :)