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 :

export de données vers excel.


Sujet :

Bases de données Delphi

  1. #1
    Futur Membre du Club
    Inscrit en
    Juin 2006
    Messages
    7
    Détails du profil
    Informations forums :
    Inscription : Juin 2006
    Messages : 7
    Points : 5
    Points
    5
    Par défaut export de données vers excel.
    Salut à tous.

    j'aimerais exporter les données de ma database vers excel, lorsque j'ai posé le pb pour la 1ere fois j'ai eu un debut de solution, car on m'a fait savoir que c'est possible avec flexcel, flexcelreport ,tamplate ,mais j'avoue que c'est des choses toutes à fait nouveau pour moi .

    j'ai besoin d'explication consistant sur la maniere d'utilisation de chacun de ces composant pour pouvoir les utilisés .

    donner moi des explication , une adresse de site ,n'importe quoi ,mais de trés consistant qui puisse me permettre d'utiliser ces composant qui sont nouveau pour moi.

    merci d'avence

  2. #2
    Membre actif Avatar de touhami
    Inscrit en
    Avril 2002
    Messages
    327
    Détails du profil
    Informations forums :
    Inscription : Avril 2002
    Messages : 327
    Points : 264
    Points
    264
    Par défaut
    Bonjour,
    Quel type de Base de donnée utilise tu . Paradox , Interbase , SqlServer????

  3. #3
    Futur Membre du Club
    Inscrit en
    Juin 2006
    Messages
    7
    Détails du profil
    Informations forums :
    Inscription : Juin 2006
    Messages : 7
    Points : 5
    Points
    5
    Par défaut
    Citation Envoyé par touhami
    Bonjour,
    Quel type de Base de donnée utilise tu . Paradox , Interbase , SqlServer????
    j'utilise un DBasepourWindows.

  4. #4
    Nouveau membre du Club
    Homme Profil pro
    Chef de projet MOA
    Inscrit en
    Avril 2004
    Messages
    27
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Maroc

    Informations professionnelles :
    Activité : Chef de projet MOA
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Avril 2004
    Messages : 27
    Points : 27
    Points
    27
    Par défaut Export vers Excel
    Le plus simple est
    - afficher le resultat dans un dbgrid independemment du type de bdd
    - ouvrir Olecontener Excel
    - Ecrire les lignes du dbgrid dans la feuille Excel en cours
    Bonne chance
    chaud_soleil

  5. #5
    Membre expert
    Avatar de TicTacToe
    Inscrit en
    Septembre 2005
    Messages
    1 940
    Détails du profil
    Informations personnelles :
    Âge : 51

    Informations forums :
    Inscription : Septembre 2005
    Messages : 1 940
    Points : 3 575
    Points
    3 575
    Par défaut
    presque +1

    pas besoin d'ouvrir un DBGrid s'il n'y en a pas besoin.

    Le plus rapide à mon avis,

    1. Parcourir ton dataSet, alimenter un buffer texte (un simple string), avec tes valeurs séparées par #9 ( TAB ) pour les champs, et #13 (RETOUR CHARIOT) pour les lignes
    2. Copier ce buffer dans le presse papier
    3. Ouvrir un Excel via Ole
    4. coller le buffer dans le fichier à l'emplacement désiré

    bon courage
    Section Delphi
    La mine d'or: La FAQ, les Sources

    Un développement compliqué paraitra simple pour l'utilisateur, frustrant non ?
    Notre revanche ? l'inverse est aussi vrai ;-)

  6. #6
    Membre éprouvé
    Avatar de Andry
    Profil pro
    Informaticien
    Inscrit en
    Juillet 2002
    Messages
    1 164
    Détails du profil
    Informations personnelles :
    Localisation : Madagascar

    Informations professionnelles :
    Activité : Informaticien

    Informations forums :
    Inscription : Juillet 2002
    Messages : 1 164
    Points : 1 181
    Points
    1 181
    Par défaut
    Un composant d'export sous Excel existe aussi dans la suite JVCL.
    A+
    On progresse .....

  7. #7
    Futur Membre du Club
    Inscrit en
    Juin 2006
    Messages
    7
    Détails du profil
    Informations forums :
    Inscription : Juin 2006
    Messages : 7
    Points : 5
    Points
    5
    Par défaut
    donner plus de detaille sur le composant d'export excel

  8. #8
    Membre émérite Avatar de edam
    Homme Profil pro
    Développeur Delphi/c++/Omnis
    Inscrit en
    Décembre 2003
    Messages
    1 894
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Maroc

    Informations professionnelles :
    Activité : Développeur Delphi/c++/Omnis
    Secteur : High Tech - Éditeur de logiciels

    Informations forums :
    Inscription : Décembre 2003
    Messages : 1 894
    Points : 2 771
    Points
    2 771
    Par défaut
    pour moi j'utlise
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
        ExcelApplication1: TExcelApplication;
        ExcelWorksheet1: TExcelWorksheet;
    dans la pallete de serveurs
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    37
    38
    39
    40
    41
    42
    Function  TDataModule2.Export_Exel(Tabl: TDataSet):Integer;
    var
         s:string;
         i,j:integer;
         MonClasseur : _workbook;
         MaFeuille :_Worksheet;
    begin
         result:=-1;
         try
            MonClasseur:=ExcelApplication1.Workbooks.Add(xlWBATWorksheet,0);
            MaFeuille:=MonClasseur.Worksheets[1] as _worksheet;
         except
            exit;
         end;
         try
            for i:=0 to tabl.FieldCount-1 do
              MaFeuille.Cells.Item[1,i+1].Value:=Tabl.Fields[i].FieldName;
            Tabl.First;
            for j:=2 to Tabl.RecordCount+1 do
              begin
     
                for i:=0 to Tabl.FieldCount-1 do
                 try
                   if Tabl.Fields[i].IsNull then MaFeuille.Cells.Item[j,i+1].Value:=''
                   else
                   if Tabl.Fields[i].DataType in [ftDate,ftDateTime] then
                      MaFeuille.Cells.Item[j,i+1].Value:=FormatDateTime('dd/mm/yyyy',Tabl.Fields[i].Value)
                   else MaFeuille.Cells.Item[j,i+1].Value:=Tabl.Fields[i].AsString;
                 except
                   ShowMessage('Erreur');
                 end;
                application.ProcessMessages;
                Tabl.Next;
              end;
            s:='c:\tabl.xls'+#0;
            MonClasseur.Close(True,s,emptyparam,0);
            ShellExecute(0,'Open',@s[1],nil,'',1);
            result:=1;
         except
     
         end;
    end;
    PAS DE DESTIN, C'EST CE QUE NOUS FAISONS

  9. #9
    Membre éprouvé
    Avatar de Andry
    Profil pro
    Informaticien
    Inscrit en
    Juillet 2002
    Messages
    1 164
    Détails du profil
    Informations personnelles :
    Localisation : Madagascar

    Informations professionnelles :
    Activité : Informaticien

    Informations forums :
    Inscription : Juillet 2002
    Messages : 1 164
    Points : 1 181
    Points
    1 181
    Par défaut
    Tout d'abord, il y a le :
    - compos TJvDBGridExcelExport dans la palette JvDataAccess qui te permet d'exporter ton dbGrid vers Excel
    - compos TJvgExportExcel dans la palette JVCL Globus 2 qui te permet d'exporter un Dataset vers Excel.

    Alors à toi de choisir mais faut que tu installe JVCL ou au moins les packets contenant ces 2 compos.

    A+
    On progresse .....

  10. #10
    Futur Membre du Club
    Inscrit en
    Juin 2006
    Messages
    7
    Détails du profil
    Informations forums :
    Inscription : Juin 2006
    Messages : 7
    Points : 5
    Points
    5
    Par défaut
    Citation Envoyé par Andry
    Tout d'abord, il y a le :
    - compos TJvDBGridExcelExport dans la palette JvDataAccess qui te permet d'exporter ton dbGrid vers Excel
    - compos TJvgExportExcel dans la palette JVCL Globus 2 qui te permet d'exporter un Dataset vers Excel.

    Alors à toi de choisir mais faut que tu installe JVCL ou au moins les packets contenant ces 2 compos.

    A+
    dis comment proceder pour installer ces composant??

    merci d'avance.

  11. #11
    Membre éprouvé
    Avatar de Andry
    Profil pro
    Informaticien
    Inscrit en
    Juillet 2002
    Messages
    1 164
    Détails du profil
    Informations personnelles :
    Localisation : Madagascar

    Informations professionnelles :
    Activité : Informaticien

    Informations forums :
    Inscription : Juillet 2002
    Messages : 1 164
    Points : 1 181
    Points
    1 181
    Par défaut
    Salut,

    Faut que tu télécharge le fichier d'installation de la JVCL. Sur ce site, il y un lien pour le télécharger, sinon tu peux le chercher sur SourceFourge.
    Après soit tu n'installe que le ou les paquets que tu veux manuellement ou bien tu installe avec l'installateur automatiqeu livré avec.

    A+
    On progresse .....

Discussions similaires

  1. Exportation de données vers excel en c++
    Par fwed33 dans le forum C++
    Réponses: 5
    Dernier message: 09/01/2007, 15h51
  2. exporter des données vers Excel
    Par vautour29 dans le forum Access
    Réponses: 10
    Dernier message: 12/12/2006, 17h15
  3. [En cours]Exporter des données vers Excel
    Par Muhad'hib dans le forum Contribuez
    Réponses: 2
    Dernier message: 12/01/2006, 14h25
  4. exporter des données vers EXCEL!
    Par JauB dans le forum Macros et VBA Excel
    Réponses: 11
    Dernier message: 25/11/2005, 15h13
  5. Export de données vers Excel
    Par psykot63 dans le forum Access
    Réponses: 2
    Dernier message: 03/01/2005, 12h04

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