Sonderzeichen

Auf dem Weg von Clipper, FoxPro u.ä. nach Xbase++

Moderator: Moderatoren

Antworten
Benutzeravatar
Manfred
Foren-Administrator
Foren-Administrator
Beiträge: 21150
Registriert: Di, 29. Nov 2005 16:58
Wohnort: Kreis Wesel
Hat sich bedankt: 206 Mal
Danksagung erhalten: 67 Mal

Sonderzeichen

Beitrag von Manfred »

mein Projekt stammt eigentlich aus Clipper Zeiten. Mein Vorgänger hatte dann wohl auch einen Editor, der mit einem OEM Zeichensatz arbeitete. Die VX arbeitet aber im Ansi Zeichensatz. Jetzt habe ich natürlich jede Menge Sonderzeichen Umlaute usw. darin, die man so nicht entziffern kann. Also werden die wohl alle umgewandelt werden müssen. Das geht ja noch aber wie mache ich das mit dem Euro Zeichen? Wenn ich das eintippe erscheinen auf dem Bildschirm wilde Zeichen. Und jedesmal Chr(128) eintippen ist auch nicht gerade die tolle Lösung.
Gruß Manfred
Mitglied der XUG Osnabrück
Schatzmeister des Deutschsprachige Xbase-Entwickler e.V.
großer Fan des Xbaseentwicklerwiki https://wiki.xbaseentwickler.de/index.p ... Hauptseite
Doof kann man sein, man muß sich nur zu helfen wissen!!
Benutzeravatar
Martin Altmann
Foren-Administrator
Foren-Administrator
Beiträge: 16488
Registriert: Fr, 23. Sep 2005 4:58
Wohnort: Berlin
Hat sich bedankt: 111 Mal
Danksagung erhalten: 48 Mal
Kontaktdaten:

Re: Sonderzeichen

Beitrag von Martin Altmann »

Moin,
hast Du die Zeile bei Dir drin?

Code: Alles auswählen

SetLocale( NLS_ICURRENCYEURO, "1" )
Viele Grüße,
Martin
:grommit:
Webseite mit XB2.NET und ausschließlich statischem Content in Form von HTML-Dateien: https://www.altem.de/
Webseite mit XB2.NET und ausschließlich dynamischem Content in Form von in-memory-HTML: https://meldungen.altem.de/

Mitglied der XUG Osnabrück
Vorsitzender des Deutschsprachige Xbase-Entwickler e. V.
Benutzeravatar
Manfred
Foren-Administrator
Foren-Administrator
Beiträge: 21150
Registriert: Di, 29. Nov 2005 16:58
Wohnort: Kreis Wesel
Hat sich bedankt: 206 Mal
Danksagung erhalten: 67 Mal

Re: Sonderzeichen

Beitrag von Manfred »

ja, die habe ich am Anfang eingebaut. Ich dachte auch, damit wäre es erledigt.
Gruß Manfred
Mitglied der XUG Osnabrück
Schatzmeister des Deutschsprachige Xbase-Entwickler e.V.
großer Fan des Xbaseentwicklerwiki https://wiki.xbaseentwickler.de/index.p ... Hauptseite
Doof kann man sein, man muß sich nur zu helfen wissen!!
Benutzeravatar
Martin Altmann
Foren-Administrator
Foren-Administrator
Beiträge: 16488
Registriert: Fr, 23. Sep 2005 4:58
Wohnort: Berlin
Hat sich bedankt: 111 Mal
Danksagung erhalten: 48 Mal
Kontaktdaten:

Re: Sonderzeichen

Beitrag von Martin Altmann »

Für die Ausgabe: Das Eurosymbol selber ist chr( 213 ) (zumindest bei OEM)

Viele Grüße,
Martin
:grommit:
Webseite mit XB2.NET und ausschließlich statischem Content in Form von HTML-Dateien: https://www.altem.de/
Webseite mit XB2.NET und ausschließlich dynamischem Content in Form von in-memory-HTML: https://meldungen.altem.de/

Mitglied der XUG Osnabrück
Vorsitzender des Deutschsprachige Xbase-Entwickler e. V.
Benutzeravatar
Manfred
Foren-Administrator
Foren-Administrator
Beiträge: 21150
Registriert: Di, 29. Nov 2005 16:58
Wohnort: Kreis Wesel
Hat sich bedankt: 206 Mal
Danksagung erhalten: 67 Mal

Re: Sonderzeichen

Beitrag von Manfred »

in dem Fall CHR(128) aber so mache ich das derzeit. Nur wenn man TExtkombinationen usw.macht, dann wird das recht aufwändig und unübersichtlich.
Gruß Manfred
Mitglied der XUG Osnabrück
Schatzmeister des Deutschsprachige Xbase-Entwickler e.V.
großer Fan des Xbaseentwicklerwiki https://wiki.xbaseentwickler.de/index.p ... Hauptseite
Doof kann man sein, man muß sich nur zu helfen wissen!!
Benutzeravatar
AUGE_OHR
Marvin
Marvin
Beiträge: 12903
Registriert: Do, 16. Mär 2006 7:55
Wohnort: Hamburg
Hat sich bedankt: 19 Mal
Danksagung erhalten: 44 Mal

Re: Sonderzeichen

Beitrag von AUGE_OHR »

Manfred hat geschrieben:in dem Fall CHR(128) aber so mache ich das derzeit. Nur wenn man TExtkombinationen usw.macht, dann wird das recht aufwändig und unübersichtlich.
wie wäre es mit

Code: Alles auswählen

#define EuroZeichen CHR(128)
gruss by OHR
Jimmy
Benutzeravatar
Manfred
Foren-Administrator
Foren-Administrator
Beiträge: 21150
Registriert: Di, 29. Nov 2005 16:58
Wohnort: Kreis Wesel
Hat sich bedankt: 206 Mal
Danksagung erhalten: 67 Mal

Re: Sonderzeichen

Beitrag von Manfred »

ja Jimmy, manchmal ist es schon echt peinlich. :banghead:
Gruß Manfred
Mitglied der XUG Osnabrück
Schatzmeister des Deutschsprachige Xbase-Entwickler e.V.
großer Fan des Xbaseentwicklerwiki https://wiki.xbaseentwickler.de/index.p ... Hauptseite
Doof kann man sein, man muß sich nur zu helfen wissen!!
Benutzeravatar
brandelh
Foren-Moderator
Foren-Moderator
Beiträge: 15688
Registriert: Mo, 23. Jan 2006 20:54
Wohnort: Germersheim
Hat sich bedankt: 65 Mal
Danksagung erhalten: 33 Mal
Kontaktdaten:

Re: Sonderzeichen

Beitrag von brandelh »

Wenn die EXE auf ANSI eingestellt ist, kann ich € direkt eintippen (Workbench) und das wird einwandfrei angezeigt (Quellcode ANSI).

Wenn du diesen einfachen DEFINE machst, musst du das in jeder PRG machen und bei einer Umstellung auf ANSI alle ändern.
Ich würde daher eine Funktionvorschlagen, die das Euro Zeichen zurückgibt:

Code: Alles auswählen

*--------------------------------------------------------------------------------
function IsOEM()
return ( set(_SET_CHARSET) = 1 )
*--------------------------------------------------------------------------------
function IsAnsi()
return ( set(_SET_CHARSET) = 0 )
*--------------------------------------------------------------------------------
function EuroZeichen()
   If IsOEM()
      cEuroZeichen := chr( 213 ) 
   else
      cEuroZeichen := chr(128)      
   endif    
return cEuroZeichen
NLS_ICURRENCYEURO muss natürlich auch noch stimmen.
Gruß
Hubert
Antworten