IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Bases de données Delphi Discussion :

Delphi et mysql


Sujet :

Bases de données Delphi

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éclairé Avatar de marsupilami34
    Profil pro
    Inscrit en
    Juin 2005
    Messages
    576
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2005
    Messages : 576
    Par défaut Delphi et mysql
    Bonjour,
    J'ai réalisé un prog en delphi me ^permettant de prendre les valeurs d'une table de base de données et de les insérer dans une autre.
    Pour cela je me suis servi de la librairie mysql.

    Dans un premier temps, je réalise une requete qui range dans un tableau de mesure, les valeurs à insérer dans l'autre table de BD. Ensuite, et j'ai réalisé une boucle insert qui me permet d'insérer toutes les valeurs de mon tableau de mesure.
    Le problème est que une fois la première ligne de la bd remplie, le programme plante. Je ne comprends pas pourquoi. :

    Quelq'un peut-il m'aider à résoudre ce problème.

    Merci d'avance.

  2. #2
    Membre Expert
    Avatar de Lung
    Profil pro
    Analyste-programmeur
    Inscrit en
    Mai 2002
    Messages
    2 704
    Détails du profil
    Informations personnelles :
    Âge : 45
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Analyste-programmeur
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Mai 2002
    Messages : 2 704
    Par défaut
    Avec un point d'arrêt, ca planque sur quelle instruction exactement ?

    :
    L'urgent est fait, l'impossible est en cours, pour les miracles prévoir un délai. :bug: ___ "http://club.developpez.com/regles/#LIII-A"Écrivez dans un français correct !!

    C++Builder 5 - Delphi 6#2 Entreprise - Delphi 2007 Entreprise - Delphi 2010 Architecte - Delphi XE Entreprise - Delphi XE7 Entreprise - Delphi 10 Entreprise - Delphi 10.4.2 Entreprise - Delphi 11.3 Entreprise - Visual studio 2022
    OpenGL 2.1 - Oracle 10g - Paradox - Interbase (XE) - PostgreSQL (15.7)

  3. #3
    Modérateur
    Avatar de Rayek
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mars 2005
    Messages
    5 236
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 51
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Mars 2005
    Messages : 5 236
    Par défaut
    Précise l'erreur que tu as, car c'est un peu maigre pour pouvoir t'aider ?

    Tes deux tables sont elles sous MySQL ou bien transferes tu les données dans un autre type de base de données ?

    Quel type de composants utilises tu ? Ado ? BDE ? MySQL.pas ? etc ... ?

    La version de delphi que tu utilises ?

    PS: Je pense qu'un gentil modérateur va déplacer ton post dans la section Base de données ^^
    Modérateur Delphi

    Le guide du bon forumeur :
    __________
    Rayek World : Youtube Facebook

  4. #4
    Membre éclairé Avatar de marsupilami34
    Profil pro
    Inscrit en
    Juin 2005
    Messages
    576
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2005
    Messages : 576
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
     
    for loop:=0 to length(tab_mesure)-1 do
    begin
        if mysqlext_central.request(mysqlconnection_central,pchar('insert into hs11xy_mesure (num_lot,type_test,num_cel,Cp,Rp,statut) values ('''+tab_mesure[loop,0]+''','''+tab_mesure[loop,1]+''','''+tab_mesure[loop,2]+''','''+tab_mesure[loop,3]+''','''+tab_mesure[loop,4]+''','''+tab_mesure[loop,5]+''')'))<>0 then
        begin
            errormsg:=mysql_error(mysqlconnection_central); 
            MessageDlg(errormsg,mtError,[mbOK],0);         
            ExitProcess(1);
         end;
    end;
    J'utilise comme composant mysql.pas
    Et ca plante quand j'ai rentré une mesure dans la BD.

    Merci pour votre aide

  5. #5
    Modérateur
    Avatar de Rayek
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mars 2005
    Messages
    5 236
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 51
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Mars 2005
    Messages : 5 236
    Par défaut
    Citation Envoyé par marsupilami34
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
     
    for loop:=0 to length(tab_mesure)-1 do
    begin
        if mysqlext_central.request(mysqlconnection_central,pchar('insert into hs11xy_mesure (num_lot,type_test,num_cel,Cp,Rp,statut) values ('''+tab_mesure[loop,0]+''','''+tab_mesure[loop,1]+''','''+tab_mesure[loop,2]+''','''+tab_mesure[loop,3]+''','''+tab_mesure[loop,4]+''','''+tab_mesure[loop,5]+''')'))<>0 then
        begin
            errormsg:=mysql_error(mysqlconnection_central); 
            MessageDlg(errormsg,mtError,[mbOK],0);         
            ExitProcess(1);
         end;
    end;
    J'utilise comme composant mysql.pas
    Et ca plante quand j'ai rentré une mesure dans la BD.

    Merci pour votre aide
    Si tu donnes pas l'intituler exact de l'erreur ont va avoir du mal a t'aider ^^.
    Modérateur Delphi

    Le guide du bon forumeur :
    __________
    Rayek World : Youtube Facebook

  6. #6
    Expert confirmé

    Avatar de Nono40
    Homme Profil pro
    Ingénieur développement logiciels
    Inscrit en
    Mai 2002
    Messages
    8 640
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 58
    Localisation : France, Loir et Cher (Centre)

    Informations professionnelles :
    Activité : Ingénieur développement logiciels
    Secteur : Industrie

    Informations forums :
    Inscription : Mai 2002
    Messages : 8 640
    Par défaut
    Pourquoi passer par un tabeau ??
    Insère directement les champs lus au fur et à mesure.

    D'autre part je ne sais pas si MySQL le permet mais pourquoi ne pas le faire directement avec une réquète INSERT issue d'un SELECT ?
    Delphi :
    La F.A.Q. , 877 réponses à vos questions !
    264 sources à consulter/télécharger !

  7. #7
    Modérateur
    Avatar de Rayek
    Homme Profil pro
    Développeur informatique
    Inscrit en
    Mars 2005
    Messages
    5 236
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 51
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Mars 2005
    Messages : 5 236
    Par défaut
    Citation Envoyé par Nono40
    Pourquoi passer par un tabeau ??
    Insère directement les champs lus au fur et à mesure.

    D'autre part je ne sais pas si MySQL le permet mais pourquoi ne pas le faire directement avec une réquète INSERT issue d'un SELECT ?
    Je crois que c'est pas possible un insert direct depuis un select.

    Je pense que son problème vient plus d'un problème de doublons, enfin ca serait bien d'avoir le message exact de l'erreur ^^
    Modérateur Delphi

    Le guide du bon forumeur :
    __________
    Rayek World : Youtube Facebook

  8. #8
    Membre expérimenté
    Profil pro
    Inscrit en
    Septembre 2003
    Messages
    298
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2003
    Messages : 298
    Par défaut
    Il serait bien que connaitre aussi la version de MysSQL et de mysql.pas car il y en a plusieurs

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Delphi et MySQL avec ADO
    Par sylviefrfr dans le forum Bases de données
    Réponses: 8
    Dernier message: 05/12/2007, 14h15
  2. [Delphi 2006][Mysql 4.0.24] connection impossible
    Par vincentj dans le forum Bases de données
    Réponses: 2
    Dernier message: 07/03/2006, 16h05
  3. Gestion d'images avec DELPHI et Mysql?
    Par sessime dans le forum Bases de données
    Réponses: 4
    Dernier message: 22/11/2005, 11h27
  4. [Delphi 6][MySql 4.1.11][Win XP] - Connection vers DB MySQL
    Par florran dans le forum Bases de données
    Réponses: 15
    Dernier message: 16/06/2005, 14h30
  5. Delphi 7/ MySQL / DBExpress
    Par yvescollet dans le forum Bases de données
    Réponses: 13
    Dernier message: 16/07/2004, 23h12

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo