AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language Delphi CHR() Funktion und griechische Buchstaben
Thema durchsuchen
Ansicht
Themen-Optionen

CHR() Funktion und griechische Buchstaben

Offene Frage von "Foxgrove"
Ein Thema von Foxgrove · begonnen am 5. Feb 2006 · letzter Beitrag vom 7. Feb 2006
Antwort Antwort
Foxgrove

Registriert seit: 10. Sep 2005
Ort: Schwäbisch Gmünd
20 Beiträge
 
Delphi 3 Standard
 
#1

CHR() Funktion und griechische Buchstaben

  Alt 5. Feb 2006, 12:02
Hallo

mit der ORD() Funktion kann man den ANSI-ASCII oder Unicode
Wert eines Zeichens ermitteln,

mit der CHR() den umgekehrten Weg nehmen.

Aber, wenn man alle Zahlen von 1 bis 255 durchmacht,
mit CHR() kommt zwar mit CHR(223) ein BETA,
jedoch kein ALPHA oder PI ...
Es kommen aber ganze Serien von schwarzen Blöckchen..
(nicht darstellbare Zeichen ...?)

Kurios, wenn man zum Spaß hoch geht bis CHR(600)
tauchen immer wieder Zeichen auf, wiederholt
von A- Z und andere auch.

Frage, welchen CHR(wert) hat Alpha?
Es ist mir auch immer noch nicht klar,
wie man das echte griechische Alpha-Zeichen in einem
EditFeld eingeben kann...

Foxgrove
  Mit Zitat antworten Zitat
Phistev
(Gast)

n/a Beiträge
 
#2

Re: CHR() Funktion und griechische Buchstaben

  Alt 5. Feb 2006, 12:21
CHR(223) ist nicht Beta, sondern das scharfe s. Für griechische Buchstaben entweder Unicode-Komponenten oder die Schriftart Symbol verwenden.
  Mit Zitat antworten Zitat
Benutzerbild von 3_of_8
3_of_8

Registriert seit: 22. Mär 2005
Ort: Dingolfing
4.129 Beiträge
 
Turbo Delphi für Win32
 
#3

Re: CHR() Funktion und griechische Buchstaben

  Alt 5. Feb 2006, 12:25
...und wenn du einen Wert über 255 angibst, gehts wieder von vorne los. Also dann wird der Buchstabe zum Wert value mod 256 genommen.
Manuel Eberl
„The trouble with having an open mind, of course, is that people will insist on coming along and trying to put things in it.“
- Terry Pratchett
  Mit Zitat antworten Zitat
Foxgrove

Registriert seit: 10. Sep 2005
Ort: Schwäbisch Gmünd
20 Beiträge
 
Delphi 3 Standard
 
#4

Re: CHR() Funktion und griechische Buchstaben

  Alt 6. Feb 2006, 18:21
Danke, es reicht ...

Es gibt eben in ASCII und ANSI kein ALPHA..
und in Unicode ist es weiß Gott wo..

Foxgrove
  Mit Zitat antworten Zitat
marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#5

Re: CHR() Funktion und griechische Buchstaben

  Alt 6. Feb 2006, 18:54
Würde ich so nicht sagen. Nimm den single byte Zeichensatz Symbol - dort findest du die kleinen griechischen Buchstaben auf den Plätzen $61 bis $7A, die großen von $41 bis $5A. Wenn das nichts ist.

Freundliche Grüße vom marabu
  Mit Zitat antworten Zitat
Foxgrove

Registriert seit: 10. Sep 2005
Ort: Schwäbisch Gmünd
20 Beiträge
 
Delphi 3 Standard
 
#6

Re: CHR() Funktion und griechische Buchstaben

  Alt 6. Feb 2006, 22:20
Ja, das stimmt schon, mit dem Symbol-Zeichensatz
kann man mit dem 'kleinen a' ein schönes ALPHA schreiben.
Ein 'großes Alpha' aber nicht, da ist es eben 'A'.

Aber, wie kann man dann das $61 bis $7A entlocken
oder die großen Buchstaben von $41 bis $5A?

Waren das noch schöne Zeiten, als man mit AltGr und den
separaten Zifferblock die Sonderzeichen auf den
Bildschirm bringen konnte.

Foxgrove
PS.: lebensnotwendig ist es ja wiederum nicht!
  Mit Zitat antworten Zitat
Phistev
(Gast)

n/a Beiträge
 
#7

Re: CHR() Funktion und griechische Buchstaben

  Alt 6. Feb 2006, 22:31
ASCII -> Schriftart Symbol einstellen ($41-$5A sind einfach die Großbuchstaben)
Unicode -> Zeichen $386 bis $3CE (einfach charmap / Zeichentabelle benutzen)
  Mit Zitat antworten Zitat
marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#8

Re: CHR() Funktion und griechische Buchstaben

  Alt 7. Feb 2006, 07:11
Guten Morgen, Foxgrove.

Zitat von Foxgrove:
Ja, das stimmt schon, mit dem Symbol-Zeichensatz kann man mit dem 'kleinen a' ein schönes ALPHA schreiben. Ein 'großes Alpha' aber nicht, da ist es eben 'A'.
Es soll schon ein großes Alpha sein. Der Font-Designer trifft offensichtlich nicht deinen Geschmack. Nimm einfach den Font, der deinen Vorstellungen entspricht. Die Auswahl ist riesig.

Zitat von Foxgrove:
Aber, wie kann man dann das $61 bis $7A entlocken oder die großen Buchstaben von $41 bis $5A?
Wie Phistev schon geschrieben hat - bei $41 beginnen die Großbuchstaben und bei $61 die Kleinbuchstaben. Du kannst also einfach 'D' eingeben und erhältst ein großes Delta.

Zitat von Foxgrove:
Waren das noch schöne Zeiten, als man mit AltGr und den separaten Zifferblock die Sonderzeichen auf den Bildschirm bringen konnte.
Diese Zeiten sind noch nicht vorbei. Nimm die Alt-Taste anstelle von AltGr und genieße den Flashback.

Freundliche Grüße vom marabu
  Mit Zitat antworten Zitat
Benutzerbild von Der Jan
Der Jan

Registriert seit: 22. Dez 2005
289 Beiträge
 
Delphi XE7 Ultimate
 
#9

Re: CHR() Funktion und griechische Buchstaben

  Alt 7. Feb 2006, 08:06
Schau mal bei die Wikis
Wenn du auf einem System arbeitest, wo standardmäßig griechische eingestellt ist und die entsprechenden Zeichensätze installiert sind, dann wird das große Alpha bei 0xc1 und das kleine bei 0xe1, Beta bei 0xc2 usw. Wenn du natürlich auf einem deutschen System (ISO 8859-1, Western Latin) arbeitest, wirst du in diesen Regionen mit chr() kaum griechische Zeichen finden...

[Edit: $C1, $E1, $C2... wir sind ja Pascal ]
Gruß, Jan
  Mit Zitat antworten Zitat
Benutzerbild von Bernhard Geyer
Bernhard Geyer

Registriert seit: 13. Aug 2002
17.202 Beiträge
 
Delphi 10.4 Sydney
 
#10

Re: CHR() Funktion und griechische Buchstaben

  Alt 7. Feb 2006, 10:49
Ich kann dir nur den Tipp geben bloß nicht mit Codepage/Charsets oder mit speziellen "grichischen" Fonts zu arbeiten welche an den eigentlichen Westeuropaischen Zeichen grichische Zeichen enthalten.

Nimm das ElPack und schreibe dein Programm komplett auf die verwendung von Unicode/Widechar um. Alles andere ist nur Stückwerk wo du an allen möglichen Ecken auf Probleme stoßen wirst.

Für ein eigentliches Problem:

Delphi-Quellcode:
var
  MyUnicodeString: WideString;
begin
  MyUnicodeString := WideChar(1234) + WideChar($1234);
  ElPackEdit.Text := MyUnicodeString;
end;
Windows Vista - Eine neue Erfahrung in Fehlern.
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:27 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz