Results 1 to 7 of 7

Thread: XML vanaf linux naar delphi

  1. #1
    TLordOfTheRing
    Join Date
    Jun 2003
    Location
    Orodruin
    Posts
    149

    XML vanaf linux naar delphi

    Ik krijg vanaf een linux server beetje XML in mijn delphi applicatie, werkt allemaal prima. Alleen gebruikt de XML die ik krijg \n om naar een newline te gaan, gooi ik dan deze tekst in een TMemo dan maakt ie er prachtig mooie vierkantjes van. Best leuk hoor... maar ik wil dat ie naar de nieuwe regel gaat, kan iemand mij vertellen hoe ik dit voor elkaar krijg.

    (De XML wordt geparsed door TXMLDocument vanuit een string).

  2. #2
    Zorg dat voor de memo alle #10 worden vervangen door een onder windows gebruikelijke #13#10.
    We adore chaos because we like to restore order - M.C. Escher

  3. #3
    Waar zit die newline dan, in de structuur van je XML of in de inhoud? Ik kan me voorstellen dat een XML parser het niet leuk vind als ie in je structuur zit?
    Marcel

  4. #4
    TLordOfTheRing
    Join Date
    Jun 2003
    Location
    Orodruin
    Posts
    149
    De XML ziet er bijvoorbeeld zo uit:

    <tekst>Dit is gewoon een stukje tekst
    En dit is de volgende regel</tekst>

    De XML wordt gegenereerd door een PERL module (Apache icm mod_perl), ik heb het volgende geprobeerd aan de server side:

    $$hash_ref{tekst} =~ s/\n/#10#13/sg;

    Dit printte helaas (eigenlijk uiteraard) gewoon #10#13 uit in de Memo, ook heb ik de volgende regexpen geprobeerd:

    $$hash_ref{tekst} =~ s/\n/\n\r/sg;
    $$hash_ref{tekst} =~ s/\n/\r/sg;

    (De $$hash_ref{tekst} wordt later tussen <tekst> gezet, het XML document wordt dan vervolgens Base64 encoded via SOAP naar de applicatie gestuurd.)

  5. #5
    Senior Member PsychoMark's Avatar
    Join Date
    Nov 2001
    Location
    Raamsdonksveer
    Posts
    10,269
    Ik mag hopen dat die laatste twee regels niet onder elkaar staan . In ieder geval zou \n\r de juiste combinatie moeten zijn. Is 't niet mogelijk dit direct in te voegen in plaats van achteraf te vervangen? Is 't anders geen optie om in je Delphi applicatie een StringReplace (of liever: een FastReplace ) te doen om #10 naar #10#13 te vertalen? (#10 is inderdaad Delphi-only, Perl vat 'm op als letterlijke string of commentaar als je pech hebt )
    Qui custodiet ipsos custodes

  6. #6
    TLordOfTheRing
    Join Date
    Jun 2003
    Location
    Orodruin
    Posts
    149
    Ik ga dat fastreplace wel even proberen (die 2 regels had ik niet onder elkaar staan, maar allebei geprobeerd).

  7. #7
    TLordOfTheRing
    Join Date
    Jun 2003
    Location
    Orodruin
    Posts
    149
    Het werkt nu prima... bedankt!

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Similar Threads

  1. Van Delphi 5 naar 7
    By eriksk in forum WebDelphi
    Replies: 4
    Last Post: 13-Jan-04, 15:18
  2. Replies: 3
    Last Post: 09-Dec-03, 13:51
  3. Connecten Delphi naar MySQL
    By Greta in forum Algemeen
    Replies: 6
    Last Post: 26-Feb-02, 16:38
  4. converteren naar Delphi 6
    By joostingh in forum Algemeen
    Replies: 2
    Last Post: 22-Feb-02, 12:58
  5. VB naar Delphi
    By rckoenes in forum Algemeen
    Replies: 6
    Last Post: 18-Oct-01, 15:55

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •