Opened by renee at 2005-01-03 20:09
User since
2003-08-07
2921 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
2003-08-07
2921 Artikel
BenutzerIn
Habe jetzt im BDE-Administrator (schund Paradox-Datenbanken :angry: ) den Zeichensatz int850, latin1 und noch irgend was probiert.
Bei den ODBC-Einstellungen kann man leider nichts in Bezug auf den Zeichensatz einstellen (außer bei der Sortierreihenfolge oder so, und das hat scheinbar keine Wirkung auf den Output bei mir).
Außerdem habe ich mal an folgendem Beispiel mit utf8 und Encode gespielt:
Resultat: Wenn ich Werte aus der Datenbank auslese kann ich encoden wie ich will, ich kann die Zeichen nicht darstellen.
Außerdem bleibt mir die Darstellung des Euro-Zeichens komplett verwehrt.
Das depriiert irgendwie.
Werde mal sehen ob ich noch irgendwas finde.
thx & mfg pktm
Bei den ODBC-Einstellungen kann man leider nichts in Bezug auf den Zeichensatz einstellen (außer bei der Sortierreihenfolge oder so, und das hat scheinbar keine Wirkung auf den Output bei mir).
Außerdem habe ich mal an folgendem Beispiel mit utf8 und Encode gespielt:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
#!/Perl/bin/perl
use strict;
use Tk;
use Tk::Font;
use Encode;
use utf8;
# l1
my $val = 'äöüߤ';
utf8::encode($val);
Encode::from_to($val,"cp1250","iso-8859-1");
#Encode::from_to($val,"iso-8859-1", "utf8");
# l2
my $octets = Encode::encode("iso-8859-1", $val);
#print $octets;
my $mw = Tk::MainWindow->new();
my $l1 = $mw->Label(-font => $mw->Font(-family=>'Verdana'), -textvariable=>\$val )->pack();
my $l2 = $mw->Label(-font => $mw->Font(-family=>'Verdana'), -textvariable=>\$octets)->pack();
MainLoop;
Resultat: Wenn ich Werte aus der Datenbank auslese kann ich encoden wie ich will, ich kann die Zeichen nicht darstellen.
Außerdem bleibt mir die Darstellung des Euro-Zeichens komplett verwehrt.
Das depriiert irgendwie.
Werde mal sehen ob ich noch irgendwas finde.
thx & mfg pktm
http://www.intergastro-service.de (mein erstes CMS :) )