| Autor |
Beitrag |
FriFra
 
Beiträge: 557
Win XP Prof, Win XP Home,Win Server 2003,Win 98SE,Win 2000,Win NT4,Win 3.11,Suse Linux 7.3 Prof,Suse Linux 8.0 Prof
D2k5 Prof, D7 Prof, D5 Standard, D3 Prof, K3 Prof
|
Verfasst: So 03.11.02 15:40
Ich lasse ein Konsolenprogramm vedeckt laufen und capture die Ausgaben in in eine Stringlist.
Wenn ich mir die Werte anzeigen lasse (Messagebox/memo etc.) sind immer alle Umlaute verstümmelt. Weiss jemand, wie man die Umlaute korrekt angezeigt bekommt?
|
|
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1
|
Verfasst: So 03.11.02 16:00
Benutzt die Konsole eventuell den ASCII-Zeichensatz? Windows benutzt aber Ansi bzw. Unicode je nach Version.
|
|
FriFra 
Beiträge: 557
Win XP Prof, Win XP Home,Win Server 2003,Win 98SE,Win 2000,Win NT4,Win 3.11,Suse Linux 7.3 Prof,Suse Linux 8.0 Prof
D2k5 Prof, D7 Prof, D5 Standard, D3 Prof, K3 Prof
|
Verfasst: So 03.11.02 16:53
Davon gehe ich auch aus, aber wie kann ich nun den String konvertieren?
|
|
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1
|
Verfasst: So 03.11.02 18:10
  Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
| procedure Ascii2Ansi(var s: string);
var
s0: string;
begin
Setlength(s0,length(s));
if (length(s0)>0) then
OemToChar(Pchar(s),PChar(s0));
s:=s0;
end;
procedure Ansi2Ascii(var s: string);
var s0: string;
begin
Setlength(s0,length(s));
if length(s0)>0 then
CharToOem(Pchar(s),Pchar(s0));
s:=s0;
end; |
|
|
FriFra
Beiträge: 557
Win XP Prof, Win XP Home,Win Server 2003,Win 98SE,Win 2000,Win NT4,Win 3.11,Suse Linux 7.3 Prof,Suse Linux 8.0 Prof
D2k5 Prof, D7 Prof, D5 Standard, D3 Prof, K3 Prof
|
Verfasst: So 03.11.02 18:37
 Danke! Es funktioniert.
|
|
Luckie
Ehemaliges Mitglied
Erhaltene Danke: 1
|
Verfasst: So 03.11.02 18:40
|
|
|
