Comment decouper une requete SQL trop longue sous DELPHI

Bonjour, je developpe une application sous DELPHI7 et le programme me demande
de decouper ma requete INSERT .Comment faire voici le code ;

procedure TF_pharm.Button1Click(Sender: TObject);
begin
With DM_Query do
Begin
Q_Insert.Close;
Q_Insert.Prepared:=False;
Q_Insert.SQL.Text:='INSERT INTO Pharmacie(Nom_pharm,Civilite_proprio,Nom_proprio,Situation_geo
Contact_fixe,Contact_orange,Contact_moov,Contact_mtn,Contact_koz,Contact_green,Autre_contact,login_pharm
Mot_de_passe,Fiche_Nom_pharm,Fiche_Situation_geo,Fiche_Contact_fixe,Fiche_Contact_orange,
Fiche_Contact_moov,Fiche_Contact_mtn,Fiche_Contact_koz,Fiche_Contact_green,plan_acces,Photo)'

VALUES(:Nom_pharm,:Civilite_proprio,:Nom_proprio,:Situation_geo,:Contact_fixe,:Contact_orange, :Contact_moov,:Contact_mtn,:Contact_koz,:Contact_green,:Autre_contact,:login_pharm,:Mot_de_passe,
:Fiche_Nom_pharm,:Fiche_Situation_geo,:Fiche_Contact_fixe,:Fiche_Contact_orange,:Fiche_Contact_moov,
:Fiche_Contact_mtn,:Fiche_Contact_koz,:Fiche_Contact_green,:plan_acces,:Photo)';

Q_Insert.ParamByName('Nom_Clt').Value:=Edit1.Text;
Q_Insert.ParamByName('Adresse').Value:=Edit2.Text;
Q_Insert.ParamByName('Tel').Value:=Edit3.Text;
Q_Insert.Prepared:=true;
Q_Insert.ExecSQL;

end;
end;
end.


Que faire