Re: Makro konwertujŕce polskie litery do StarOffice

Autor: Jan N. Waliszewski (jan.waliszewski_at_t-system.com.pl)
Data: Fri 11 Feb 2000 - 13:42:50 MET


Wielkie dzięki za odzew: jak widać sprawa ta nurtuje nie tylko mnie. Po
sprawdzeniu zacytowane poniżej makro powinno być skuteczne (kody sš na pewno
własciwe), ale jak na razie nie udało mi się uzyskać efektu w postaci poprawnej
konwersji. W weekend będę miał trochę więcej czasu, więc zbadam sprawę dokładniej.

Gdyby ktoś z Was zajšł stanowisko w sprawie konrolera SCSI, o którym pisałem
byłoby miło.

                                   Pozdrowienia - Jan N. Waliszewski

Jaroslaw Tabor napisał:

> "Marcin P. Ciaszczyk" napisał(a):
>
> > To znalazlem w poscie od Leszka Gerwatowskiego z 28.08.99
> > /* CYTATA */
> > Sub win2iso
>
> Jak wskazuje nazwa to makro zmienia z 1250 na ISO8859-2 !!!
> To nie jest to co nam potrzeba. To makro pochodzi z SO dla linuxa. W OS/2 jest
> CP852.
>
> Wlasnie niedawno zaczalaem poprawiac to makro zeby chodzilo z 852, ale nie
> doszedlem
> do konca z braku czasu.
> To jest moje :
>
> Sub win2852
> ActiveWindow.ReplaceAll(Chr(165),Chr(164))
> ActiveWindow.ReplaceAll(Chr(198),Chr(143))
> ActiveWindow.ReplaceAll(Chr(202),Chr(168))
> ActiveWindow.ReplaceAll(Chr(163),Chr(157))
> ActiveWindow.ReplaceAll(Chr(209),Chr(227))
> ActiveWindow.ReplaceAll(Chr(211),Chr(224))
> ActiveWindow.ReplaceAll(Chr(140),Chr(151))
> ActiveWindow.ReplaceAll(Chr(143),Chr(141))
> ActiveWindow.ReplaceAll(Chr(175),Chr(189))
> ActiveWindow.ReplaceAll(Chr(185),Chr(165))
> ActiveWindow.ReplaceAll(Chr(230),Chr(134))
> ActiveWindow.ReplaceAll(Chr(234),Chr(169))
> ActiveWindow.ReplaceAll(Chr(179),Chr(136))
> ActiveWindow.ReplaceAll(Chr(241),Chr(228))
> ActiveWindow.ReplaceAll(Chr(243),Chr(162))
> ActiveWindow.ReplaceAll(Chr(156),Chr(152))
> ActiveWindow.ReplaceAll(Chr(159),Chr(171))
> ActiveWindow.ReplaceAll(Chr(191),Chr(190))
> End Sub
>
> Problem w tym ze nie mam jak sprawdzic, bo nie mam Worda ani dokumentu z
> polskimi literkami.
> Jako ktos sprawdzi ze dziala to niech da znac.
>
> JT.



To archiwum zostało wygenerowane przez hypermail 2.1.7 : Tue 18 May 2004 - 15:26:04 MET DST