Gdiplus - DrawString, Jak ustawić charset

[Mironas]

Jak ustawić 'nietypowy' charset dla rysowania tekstu w Gdiplus?
Poniższy kod rysuje tekst ale ignoruje 'BALTIC_CHARSET'.

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

  Image1->Canvas->Font->Charset = BALTIC_CHARSET;
  Gdiplus::Font* font = new Gdiplus::Font (Image1->Canvas->Handle);

  Gdiplus::Bitmap BMP = new Gdiplus::Bitmap (szer, wys, PF);
  Gdiplus::Graphics graf (BMP);

  graf.DrawString((WideString)s, -1, font, point_tekst, &brush);
 

[polymorphism]

Spróbuj zrobić fonta z użyciem struktury LOGFONT.

[Cyfrowy Baron]

Gdiplus nie ma harsetu ma za to funkcję SetDigitSubstition, która służy do ustawienia języka i sub-języka dla wyświetlanego tekstu. Tyle, że to w zasadzie niczego nie zmienia, gdyż gdiplus dobrze sobie radzi z każdą czcionką, więc ustawianie tego parametru nie ma większego znaczenia. Ciekawi mnie w jakiej sytuacji jest ci to potrzebne.

Przykład zastosowania SetDigitSubstition:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

#pragma option -w-hid
#include <gdiplus.h>
#pragma option -w-hid.

    Gdiplus::GdiplusStartupInput gdiplusStartupInput;
        ULONG_PTR gdiplusToken;

#pragma link "gdiplus.lib"

 GdiplusStartup(&gdiplusToken, &gdiplusStartupInput, NULL);

  Gdiplus::RectF layoutRect( 0, 5, Image1->Width, Image1->Height);
  Gdiplus::Font myFont(L"Tahoma", 16);

//  LANGID language = MAKELANGID(LANG_POLISH, SUBLANG_POLISH_POLAND);

  Gdiplus::StringFormat format;
  format.SetAlignment(StringAlignmentCenter);
  format.SetDigitSubstitution(LANG_POLISH, SUBLANG_POLISH_POLAND);

  Gdiplus::SolidBrush redBrush( Gdiplus::Color(255, 255, 0, 0) );


  Gdiplus::Graphics graf (Image1->Canvas->Handle);

  graf.DrawString( L"TEST Przykładowy tekst ", -1, &myFont, layoutRect, &format, &redBrush);

Nie bardzo rozumiem na czym to ma polegać, gdyż zmiana harsetu np. w Memo też niczego w tekście pisanym nie zmienia, gdyż jak wynika z moich obserwacji - system zamiast określonej czcionki podstawia taką, która zawiera znaki podane w tekście.

[Mironas]

Spróbuj zrobić fonta z użyciem struktury LOGFONT.

Nie pomaga. Wcześniej też próbowałem z HFONT i też nic.

Ciekawi mnie w jakiej sytuacji jest ci to potrzebne.

Ale pamiętasz, że ciekawość to pierwszy stopień do piekła?
Wysyłam starą aplikację (pisaną jeszcze w BCB6) na Łotwę. Okazało się, że domyślne ustawienie Font->Charset (DEFAULT_CHARSET) powoduje, że na ich komputerach (np w Edit, Memo) nie wpisują się poprawnie ich literki:
AĀBCČDEĒFGĢHIĪJKĶLĻMNŅOPRSŠTUŪVZŽ
aābcčdeēfgģhiījkķlļmnņoprsštuūvzž
Po ręcznej zmianie wszystkich charest-ów na BALTIC_CHARSET Działa poprawnie. Ale w aplikacji wykorzystuję Gdiplus do generowania m.in. grafik z tekstami - i z tego co widzę, tam nadal nie generują się znaki z ich alfabetu. A jak sprawdzę:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

  LOGFONTA LF;
  font->GetLogFontA(&graf, &LF);
  LF.lfCharSet;
 

to LF.lfCharSet ma wartość 238 czyli EASTEUROPE_CHARSET - czyli moje ustawienia systemowe. Dlatego liczę, że u nich będzie to domyślnie BALTIC_CHARSET.

[Cyfrowy Baron]

Spróbuj tego:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

LANGID language = MAKELANGID(LANG_RUSSIAN, SUBLANG_RUSSIAN_RUSSIA);

  format.SetDigitSubstitution(LANG_RUSSIAN, language);

Tylko, że BCB6 operowało na AnsiString, a XE i nowsze na UnicodeString, więc cokolwiek testujesz w nowszej wersji środowiska będzie działać prawidłowo. U siebie w XE2, żeby wstawić cyrylicę w Memo nie muszę wogóle zmieniać charset, działa na DEFAULT_CHARSET. Jakiego charset'u bym nie ustawił mogę bez problemu wpisywać cyrylicę.

Po ręcznej zmianie wszystkich charest-ów na BALTIC_CHARSET Działa poprawnie.

Z tego co widzę u siebie to dostępny jest charset = RUSSIAN_CHARSET.

Przejrzałem dokumentację dla GDI+ i nie widzę tam niczego poza SetDigitSubstition co pozwalałoby w jakikolwiek sposób wpływać na opcje językowe czcionki.

[Mironas]

format.SetDigitSubstitution(LANG_POLISH, SUBLANG_POLISH_POLAND);

W BCB6 nie mam zdefiniowane SUBLANG_POLISH_POLAND (ani SUBLANG_LATVIAN_LATVIA).
Jednak jak wyżej pisałem mam nadzieję, że pod łotewskim windowsem będzie to poprawnie działało.

[polymorphism]

Nie pomaga. Wcześniej też próbowałem z HFONT i też nic.

Ustawienie DEFAULT_CHARSET powinno załatwić sprawę, ale... Pokaż jak tworzysz tego fonta.

[Mironas]

Pokaż jak tworzysz tego fonta.

Tak na próbę - w ten sposób:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

  Image1->Canvas->Font->Charset = Font->Charset;
  Gdiplus::Graphics graph (Image1->Canvas->Handle);
  Gdiplus::Font* font1 = new Gdiplus::Font (Image1->Canvas->Handle);

  LOGFONTA LF;
  font1->GetLogFontA(&graph, &LF);
  LF.lfCharSet = BALTIC_CHARSET;

  // tworzenie właściwego fonta
  Gdiplus::Font* font2 = new Gdiplus::Font (Image1->Canvas->Handle, &LF);

  // sprawdzenie charset-u
  font2->GetLogFontA(&graph, &LF);
  ShowMessage( LF.lfCharSet );    // zwraca 238 czyli EASTEUROPE_CHARSET
 

[polymorphism]

Wygląda OK. Trudno powiedzieć skąd ten problem.

[Cyfrowy Baron]

Dzieje się tak chyba dlatego, że jak już Font pobierze uchwyt do LOGFONT to go nie zwalnia i nie pozwala zmienić wartości struktury. Wartość lfCharSet należy więc zmieniać przed wywołaniem funkcji GetLongFont_. Sprawę komplikuje dodatkowo to, że w XE2 działa to tylko ze strukturą LOGFONTW:

Tak zadziała i komunikat pokaże wartość 204:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

  Image1->Canvas->Font->Charset = Font->Charset;
  Gdiplus::Graphics graph (Image1->Canvas->Handle);
  Gdiplus::Font* font1 = new Gdiplus::Font (Image1->Canvas->Handle);

  LOGFONTW LF;
  LF.lfCharSet = RUSSIAN_CHARSET;

  Gdiplus::Font* font2 = new Gdiplus::Font (Image1->Canvas->Handle, &LF);


  // sprawdzenie charset-u
  font2->GetLogFontW(&graph, &LF);
  ShowMessage( LF.lfCharSet );    // zwraca 204 czyli RUSSIAN_CHARSET;

[Mironas]

Tak zadziałało - na chwilkę
Wystarczyło dodać LF.lfWeight = FW_BOLD; (lub FW_NORMAL lub cokolwiek innego) i znowu się rozjechało:

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

  Gdiplus::Graphics graph (Image1->Canvas->Handle);

  LOGFONTW LF;
  LF.lfWeight = FW_BOLD;  // po dodaniu tego
  LF.lfCharSet = RUSSIAN_CHARSET;

  Gdiplus::Font* font2 = new Gdiplus::Font (Image1->Canvas->Handle, &LF);

  // sprawdzenie charset-u
  font2->GetLogFontW(&graph, &LF);
  Form1->Caption = LF.lfCharSet;    // znowu zwraca 238 (EASTEUROPE_CHARSET)
 

Panowie, na razie zawieszam dyskusję. Być może tak jak pisałem na łotewskim windowsie wszystko będzie działało dobrze. Wysłałem program, klient na razie nie zgłasza tego problemu więc szkoda naszego czasu. Jeśli problem jednak się pojawi to odezwę się ponownie.
Dziękuję za zaangażowanie i pozdrawiam.

[Mironas]

Problem wygląda o wiele gorzej i nie dotyczy tylko Gdiplus ale też standardowych komponentów VCL w BCB6. Przykładowo TButton i TLabel wyświetlają tekst zupełnie inaczej. Oba mają ustawiony charset na BALTIC_CHARSET i wstawiony ten sam tekst (alfabet łotewski):

KOD cpp:   �  UKRYJ  �

KOD cpp:   �  POKAŻ  �

  Button1->Caption = "AÂBCČDEÇFGĚHIÎJKÍLĎMNŇOPRSĐTUŰVZŢ";
  Label1->Caption = "AÂBCČDEÇFGĚHIÎJKÍLĎMNŇOPRSĐTUŰVZŢ";
 

W efekcie na labelu tekst wyświetla się poprawnie a na buttonie nie (załączam zrzut). Ręce opadają. Nie pozostaje nic innego jak odpuścić sobie klienta i niech czeka na nową wersję programu napisaną w XE.
Ostrzeżenie dla wszystkich: Nie pisać programów w BCB6 dla Łotwy.

[polymorphism]

I po to właśnie powstał unikod...

p.s. jesteś pewny, że kodowanie pliku źródłowego jest takie same jak ma system klienta?

[Mironas]

jesteś pewny, że kodowanie pliku źródłowego jest takie same jak ma system klienta?

Nie wiem co masz na myśli. Na Łotwie używają kodowania Windows-1257. Pliki źródłowe (cpp/h) mam normalnie w ANSI. Tylko jakie to ma znaczenie. Znak to znak - konkretna wartość. W kodzie może mi się wyświetlać nieprawidłowo.

[polymorphism]

Jak by to było takie proste, znak-to-znak, to nie miałbyś teraz takich problemów. To "normalnie w ANSI" to jakie konkretnie kodowanie jest? Jak piszesz na polskim windowsie, to "normalne ANSI" z reguły oznacza kodowanie windows-1250 (na łotewskim windowsie pewnie jest to windows-1257), i w takim kodowaniu są wszystkie literały w Twojej aplikacji. Dla polskiego języka są co najmniej trzy kodowania, dlatego wystarczy, że aplikacja będzie miała inne kodowanie niż systemowe, by mieć problem z wyświetlaniem znaków. Dlatego dziś między innymi pisze się aplikacje w unikodzie.