XProfan

- Page 1 -

Thomas
Freier

there The *.xml as *.html stored go can, could the following interestingly his: [web]https://www.sautin.com/html-to-rtf/developers.htm[/web].
the Free HTMLtoRTF is conditioned useable (Zeichensatz).

Gruß Thomas
Windows XP SP2, XProfan X2

05/16/08 ▲

- Page 2 -

Thomas
Freier

New Test: The Free HTMLtoRTF.exe created one good *.doc with eingebetteten tables, if The *.html Presentation in ANSI is.
How can I with XProfan a UTF-8 File To ANSI konvertieren?

Gruß Thomas
Windows XP SP2, XProfan X2

H.Brill

And if You The .xml before into normalen
windowseigenen editor load and then as
ANSI abspeicherst ?
make the often in umgekehrter point with my
Datendateien for PDA, means ANSI To UTF 8.

there it Yes only reiner Text is, ought to the still functions.

Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.

Thomas
Freier

Yes, by hand is it no trouble by me but a Programmcode.
but the must Christof self solve.
enclosed a Test with Franks List and The *.xml as *.txt in ANSI.

xml-Tabellen.zip	428 kB

Hochgeladen:	05/18/08

Downloadcounter:
		Download

Gruß Thomas
Windows XP SP2, XProfan X2

Frank
Abbing

How can I with XProfan a UTF-8 File To ANSI konvertieren?

I had me moreover time a Mini-Dll in Assembler written. in the Grunde are but only a couple Translate$ necessary and ought to then still to some extent slippy run out.
I mail you The Dll and the code if You magst; and a little ASM rule.

Ragnar
Rehbein

Have me today too straight with UTF-8 bait must.
I needed a Conversion of ANSI To UTF-8.

The Längenbestimmung the resultierenden Strings has first not so functions How expects, therefore The something umständlich erscheinende method with the detach the NULL-Bytes.
Compile Mark Separation

 $H windows.ph
 {$cleq}

proc AnsiToUTF8

    parameters ansistring$
    declare unicode$, utf8$, laenge&
    laenge& = len(ansistring$)*2
    unicode$ = mkstr$(chr$(0),laenge&)
    ~MultiByteToWideChar(~CP_ACP,0,Addr(ansistring$),-1,addr(unicode$),laenge&)
    laenge& = ~WideCharToMultiByte(~CP_UTF8,0,Addr(unicode$),-1,0,0,0,0)
    UTF8$ = mkstr$(chr$(0),laenge&)
    ~WideCharToMultiByte(~CP_UTF8,0,Addr(unicode$),len(unicode$),Addr(UTF8$),laenge&,0,0)
    utf8$ = substr$(utf8$,1,chr$(0))
    return utf8$

endproc

proc UTF8ToAnsi

    parameters utf8$
    declare ansistring$, unicode$, laenge&
    laenge& = len(utf8$) * 2
    unicode$ = mkstr$(chr$(0),laenge&)
    ~MultiByteToWideChar(~CP_UTF8,0,Addr(utf8$),-1,Addr(unicode$),laenge&)
    ansistring$ = mkstr$(chr$(0),laenge&)
    ~WideCharToMultiByte(~CP_ACP,0,Addr(unicode$),-1,Addr(ansistring$),laenge&,0,0)
    ansistring$ = substr$(ansistring$,1,chr$(0))
    return ansistring$

endproc

cls
declare x$
x$ = ansiToUTF8(Rön Réne)
print x$
writeini c:utf8.txt,code,utf8code=x$
x$ = UTF8ToAnsi(x$)
print x$
writeini c:utf8.txt,code,ansicode=x$
waitinput

Greeting Ragnar

Rolf
Koch

Ragnar,
only short Info:
If you XPSE uses (How one sees), then You do not need The Header einzubinden (z.B. $H windows.ph). XPSE has these already intus

Habs time dupliziert: [...]

Rolf Koch

Ragnar,
only short Info:
If you XPSE uses (How one sees), then You do not need The Header einzubinden (z.B. $H windows.ph). XPSE has these already intus

I find still, because his Source self no xpse needed. (separate it hierbei xpse obviously Yes only used has wg. whom Kompilerschaltern)

Rolf
Koch

@iF: clear have already right, however relating itself my testimony the einleitende {$cleq} -
Ergo one of both

Do you understood ? *lol*

Ragnar
Rehbein

I find still, because his Source self no xpse needed. (separate it hierbei xpse obviously Yes only used has wg. whom Kompilerschaltern)

very

its sozusagen gewachsener code..
Have the time quick in 5 mins. manage want, but then has it still longer gedauert.
be not yet so pleased, because the Proceduren something unclear attend.
MultiByteToWideChar and WideCharToMultiByte behaviour itself not yet integrally so How I the from the MSDN entnehme.

The crucial Erkenntnis is, that one both functions need circa a Conversion of ANSI To UTF-8 To achieve. the wished I in first line kundtun.
The gutgemeinten Examples To this trouble, in this and Rolands Forum, functions of my opinion to unfortunately not.

Greeting Ragnar