|
 | | |
| Autor | Správa |
miamia
 Užívateľ
 Založený: 07.11.2009 Príspevky: 9
 | Zaslal: Ut 24.08.10 11:26 |   |
Prosím Vás, mam ďalší problém, v prompt boxe mi rozhadzuje slovenskú/českú diakritiku. V programovom kóde mi tiež nepíše správne znaky ako č,ť,ž, atď
kde robím chybu? |
| |
  |
 |
Forty-
 Užívateľ
 Založený: 01.04.2010 Príspevky: 343
 | Zaslal: Ut 24.08.10 14:44 |   |
|
  |
 |
miamia
 Užívateľ
 Založený: 07.11.2009 Príspevky: 9
 | Zaslal: Ut 24.08.10 16:12 |   |
to mi tiež napadlo, ale kde sa to nastavuje?
skúšal som zadať znak cez Chr, ale aj tak mi to vykreslí zle. Zaujímavé je, že niektoré znaky (napr. á,é) vykresluje ok. |
| |
  |
 |
miamia
 Užívateľ
 Založený: 07.11.2009 Príspevky: 9
 | Zaslal: St 25.08.10 11:53 |   |
zistil som, ze mi v tejto funckii nespracovava dobre ChrW
Public Function InputBoxDK(Prompt, Optional Title, Optional Default, Optional XPos, _
Optional YPos, Optional HelpFile, Optional Context) As String
On Error GoTo 1002
Dim lngModHwnd As Long, lngThreadID As Long
lngThreadID = GetCurrentThreadId
lngModHwnd = GetModuleHandle(vbNullString)
hHook = SetWindowsHookEx(WH_CBT, AddressOf NewProc, lngModHwnd, lngThreadID)
InputBoxDK = InputBox(Prompt, Title, Default, XPos, YPos, HelpFile, Context)
UnhookWindowsHookEx hHook
1002:
End Function
v normalnom inputboxe mi zobrazuje hodnoty chrw ok. V com je chyba? |
| |
  |
 |
imrich
 Užívateľ
 Založený: 29.09.2007 Príspevky: 101 Bydlisko: Nové Mesto nad Váhom Vek: 32
 | Zaslal: Pi 08.04.11 15:13 |   |
Ahojte tiež som mával ten istí problém.
Ale vyskúšajte toto.
Picture1.Font.Charset = 238 '"Central European"
Picture1.FontSize = 12
Picture1.FontName = "Times New Roman"
"Picture1" <--- zameňte za čokoľvek iné.  |
| |
   |
 |
|
Nemôžete pridávať nové témy do tohto fóra. Nemôžete odpovedať na témy v tomto fóre. Nemôžete upravovať svoje príspevky v tomto fóre. Nemôžete mazať svoje príspevky v tomto fóre. Nemôžete hlasovať v tomto fóre.
|
| |