O definiendo parámetros, lo que te permite definir la consulta dentro de la query (en el mismo formulario) y luego simplemente pasarle los parámetros y ejecutarla.
Código Delphi
[-]query1.close;
query1.sql.clear;
query1.sql.text:= ('insert into empl values (:d, :edit1, :checkbox1, :cd, :ubic)');
Código Delphi
[-]query1.parambyname('d').AsInteger:= d;
query1.parambyname('edit1').AsString:= edit1.Text;
query1.parambyname('checkbox1').AsString:= checkbox1.Text;
...
query1.execsql;