Si, es un buen truco, pero a la pregunta formulada no hay respuesta, es decir dbxexpress no devuelve un resultado salvo en
Código Delphi
[-]
FormBBDD.SQLConnection.Execute(sql, nil, @DataSet);
Por preguntar ¿eh?
Pero, ¿Que pasa si la sentencia sql viene de un campo TMemo?
Vamos, lo que he hecho ha sido porner un TMemo y un boton, entonces queda
Código Delphi
[-]
procedure TFormConfTablas.BotonSQLClick(Sender: TObject);
var
sql, msg: string;
begin
sql := MemoSQL.Text;
try
FormBBDD.SQLConnection.ExecuteDirect(sql)
except
on E: Exception do
begin
msg := E.Message;
Application.MessageBox(PChar(msg), 'Atencion', MB_ICONERROR);
end;
end;
end;
En realidad no se que sentencia voy a escribir, esto lo hago para borrar registro "sucios", etc.