Sonderzeichen
Moderator: Moderatoren
- Manfred
- Foren-Administrator
- Beiträge: 21224
- Registriert: Di, 29. Nov 2005 16:58
- Wohnort: Kreis Wesel
- Hat sich bedankt: 210 Mal
- Danksagung erhalten: 67 Mal
Sonderzeichen
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!!
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!!
- Martin Altmann
- Foren-Administrator
- Beiträge: 16555
- Registriert: Fr, 23. Sep 2005 4:58
- Wohnort: Berlin
- Hat sich bedankt: 115 Mal
- Danksagung erhalten: 48 Mal
- Kontaktdaten:
Re: Sonderzeichen
Moin,
hast Du die Zeile bei Dir drin?
Viele Grüße,
Martin
hast Du die Zeile bei Dir drin?
Code: Alles auswählen
SetLocale( NLS_ICURRENCYEURO, "1" )
Martin
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.
- Manfred
- Foren-Administrator
- Beiträge: 21224
- Registriert: Di, 29. Nov 2005 16:58
- Wohnort: Kreis Wesel
- Hat sich bedankt: 210 Mal
- Danksagung erhalten: 67 Mal
Re: Sonderzeichen
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!!
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!!
- Martin Altmann
- Foren-Administrator
- Beiträge: 16555
- Registriert: Fr, 23. Sep 2005 4:58
- Wohnort: Berlin
- Hat sich bedankt: 115 Mal
- Danksagung erhalten: 48 Mal
- Kontaktdaten:
Re: Sonderzeichen
Für die Ausgabe: Das Eurosymbol selber ist chr( 213 ) (zumindest bei OEM)
Viele Grüße,
Martin
Viele Grüße,
Martin
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.
- Manfred
- Foren-Administrator
- Beiträge: 21224
- Registriert: Di, 29. Nov 2005 16:58
- Wohnort: Kreis Wesel
- Hat sich bedankt: 210 Mal
- Danksagung erhalten: 67 Mal
Re: Sonderzeichen
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!!
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!!
- AUGE_OHR
- Marvin
- Beiträge: 12913
- Registriert: Do, 16. Mär 2006 7:55
- Wohnort: Hamburg
- Hat sich bedankt: 19 Mal
- Danksagung erhalten: 46 Mal
Re: Sonderzeichen
wie wäre es mitManfred 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.
Code: Alles auswählen
#define EuroZeichen CHR(128)
gruss by OHR
Jimmy
Jimmy
- Manfred
- Foren-Administrator
- Beiträge: 21224
- Registriert: Di, 29. Nov 2005 16:58
- Wohnort: Kreis Wesel
- Hat sich bedankt: 210 Mal
- Danksagung erhalten: 67 Mal
Re: Sonderzeichen
ja Jimmy, manchmal ist es schon echt peinlich.
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!!
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!!
- brandelh
- Foren-Moderator
- Beiträge: 15706
- Registriert: Mo, 23. Jan 2006 20:54
- Wohnort: Germersheim
- Hat sich bedankt: 70 Mal
- Danksagung erhalten: 34 Mal
- Kontaktdaten:
Re: Sonderzeichen
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:
NLS_ICURRENCYEURO muss natürlich auch noch stimmen.
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
Gruß
Hubert
Hubert