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

Web & réseau Delphi Discussion :

Créer un post Redmine depuis Delphi


Sujet :

Web & réseau Delphi

  1. #1
    Membre du Club
    Profil pro
    Inscrit en
    avril 2006
    Messages
    70
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : avril 2006
    Messages : 70
    Points : 58
    Points
    58
    Par défaut Créer un post Redmine depuis Delphi
    Bonjour à tous,

    Ma demande est un peu particulière, je ne sais pas si je la place au bon endroit.

    Certains d'entre-vous ont-ils déjà créé un sujet Redmine depuis une application Delphi via REST API ?

    J'ai vu cet exemple que j'ai essayé de mettre en œuvre https://www.redmine.org/projects/red...pi_with_delphi

    La procédure GetIssue fonctionne bien mais impossible de faire fonctionner AddIssue. J'obtiens toujours une exception du composant Indy eHttpException Internal Server Error.
    J'ai essayé en envoyant un fichier JSON, même problème.

    L'analyse du fichier de LOG sur mon serveur Redmine me retourne les informations suivantes, lors d'une tentative via fichier XML :

    REXML:: ParseException (#<REXML:: ParseException: malformed XML: missing tag start
    Line: 1
    Position: 332
    Last 80 unconsumed characters:
    < ? x m l v e r s i o n = " 1 . 0 " e n c o d i n g = " U T F - 8 " ? > < i s>
    /usr/lib/ruby/1.8/rexml/parsers/baseparser.rb:356:in `pull'
    /usr/lib/ruby/1.8/rexml/parsers/treeparser.rb:22:in `parse'
    ...
    Merci d'avance

  2. #2
    Rédacteur/Modérateur

    Avatar de SergioMaster
    Homme Profil pro
    Développeur informatique
    Inscrit en
    janvier 2007
    Messages
    12 709
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 64
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique
    Secteur : Industrie

    Informations forums :
    Inscription : janvier 2007
    Messages : 12 709
    Points : 34 291
    Points
    34 291
    Billets dans le blog
    52
    Par défaut
    Bonjour,

    dès que je vois REST API je pense : essayez avec REST Debugger (outils/débogueur REST), en plus il permet de créer tous les composants nécessaires.
    Maintenant, peut-être que votre version de Delpi n'a pas ces composants TRESTxxxx
    La seule chose absolue dans un monde comme le nôtre, c'est l'humour. » Albert Einstein

    Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Tokyo, Rio, Sidney) et peut être quelques autres
    SGBD : Firebird 2.5, 3, SQLite
    générateurs Etats : FastReport, Rave, QuickReport
    OS : Window Vista, Windows 10, Ubuntu, Androïd

  3. #3
    Membre du Club
    Profil pro
    Inscrit en
    avril 2006
    Messages
    70
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : avril 2006
    Messages : 70
    Points : 58
    Points
    58
    Par défaut
    Merci infiniment SergioMaster.

    Tout d’abord mon programme était sous Delphi XE3 donc sans l'outil REST Debugger que je ne connaissais pas. Mais j'ai utilisé une autre version de Delphi pour le découvrir.
    C'est impeccable et cela m'a permis de vérifier la validité de mes requêtes XML et JSON.

    Bref, j'ai vu que mon problème ne venait pas d’où je pensais (je suis butté aussi) mais surement dans l'utilisation du composant Overbyte ICS.

    Donc au lieu de persister avec ce composant compliqué (pour moi) j'ai écrit la petite procédure ci-dessous avec un composant TidHtttp et cela fonctionne impeccable

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    var
      sResponse: String;
      fsParams: TFileStream;
     
    begin
      fsParams := TFileStream.Create('.\TOTO.xml', fmOpenRead or fmShareDenyWrite);
      try
        IdHTTP.Request.ContentType := 'text/xml';
        sResponse := IdHTTP.Post('http://X.X.X.X/redmine2/issues.xml?key='+apiAccessKey, fsParams);
        ShowMessage(sResponse);
      except
        on E: Exception do
        ShowMessage('Erreur pendant le POST: ' + E.Message);
      end;
    Merci pour ton coup de pouce.

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

Discussions similaires

  1. créer un fichier sur poste client depuis asp net
    Par Prisson dans le forum ASP.NET MVC
    Réponses: 1
    Dernier message: 29/03/2018, 13h39
  2. Créer une procédure stockée depuis Delphi
    Par blonde dans le forum Bases de données
    Réponses: 10
    Dernier message: 10/03/2006, 11h26
  3. [debutant] créer un alias odbc depuis java
    Par chassonj dans le forum JDBC
    Réponses: 5
    Dernier message: 08/07/2004, 15h03
  4. Sous Word depuis Delphi
    Par alexmorel dans le forum API, COM et SDKs
    Réponses: 9
    Dernier message: 17/06/2004, 12h45
  5. Installer Interbase en arriere plan depuis delphi
    Par nanaalain dans le forum Bases de données
    Réponses: 9
    Dernier message: 24/11/2003, 14h18

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