Hi,
Kleiner Test...
Delphi-Quellcode:
var
S: WideString;
I: Integer;
begin
SetLength(S, 25);
for I := 1
to 25
do
S[I] := WideChar(I - 1 + Ord('
A') + 916 - 68);
MessageBoxW(
Handle, PWideChar(S),
nil, MB_OK);
end;
Ohne das +916-68 würde es ABCDEFGHIJKLMNOPQRSTUVWXY werden, und so erhältst du das griechische Alphabet - es ist genau 916-68=848 Zeichen weiter im
Unicode-Alphabet.
Leider funktioniert
inc(MyWideChar, 848);
nur von A bis E, dann weicht die Symbol-Reihenfolge leider ab von der richtigen Reihenfolge des griech. Alphabets - es war eben nur für mathematische Formeln gedacht.
Ich würde dir eine Ersetzungstabelle empfehlen, z. B. eine Array-Konstante.
Warum wird vor dem Sigma nur ein Rechteck angezeigt? Gibt es so einen griech. Buchstaben? Kenn ich nicht.
Mfg
FAlter