Special character

[Ugo]

I must use special characters in fields get, mget of fwh and in fields memo or character in the dbf.
During the insertion it is ok, changes as soon as I exit from the field:

Is possible to solve?
Thanks in advance.

[Enrico Maria Giordano]

Please build a simple PRG showing the problem.

EMG

[James Bott]

Ugo,

I am not having that problem here.

FWH 2.7 Aug 2006 build/xHarbour

James

[Ugo]

Please build a simple PRG showing the problem.

Enrico,
this is the test:

Code: Select all  Expand view  RUN

FUNCTION Main()
/* RC File:
1 24 "themed.manifest"

SPECIALCHAR DIALOG 51, 72, 254, 85
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION
CAPTION "Special Char"
FONT 8, "MS Sans Serif"
{
EDITTEXT 101, 13, 10, 230, 45, ES_MULTILINE | ES_AUTOVSCROLL | ES_WANTRETURN | WS_BORDER | WS_VSCROLL | WS_TABSTOP
PUSHBUTTON "Char Map", 102, 41, 67, 50, 14
PUSHBUTTON "Paste", 103, 100, 67, 50, 14
PUSHBUTTON "End", 104, 162, 67, 50, 14
}*/
   LOCAL oDlg, oGet, cNote := Space( 100 ), oClp, oBt1, oBt2, oBt3, oFont

   DEFINE FONT oFont NAME "Arial" SIZE 0, - 11
   DEFINE DIALOG oDlg RESOURCE "SpecialChar" FONT oFont
   DEFINE CLIPBOARD oClp OF oDlg
   REDEFINE GET oGet VAR cNote ID 101 OF oDlg MEMO
   REDEFINE BUTTON oBt1 ID 102 ACTION WinExec( "CHARMAP.EXE" )
   REDEFINE BUTTON oBt2 ID 103 ACTION ( oGet:Paste( oCLp:GetText() ), oDlg:Refresh() )
   REDEFINE BUTTON oBt3 ID 104 ACTION OdLG:END()
   Activate Dialog oDlg
   oClp:END()

   Return Nil

You can reproduce the problem with click on "Char Map" Button, select in the Arial Font the U+015E char and click on copy, next right click on get control and select paste, you see the char, if you exit focus, the char change!

In the fwh exe do not work the paste button.

If you remove from rc the line:

Code: Select all  Expand view  RUN

1 24 "themed.manifest"

do not work!

Can you confirm?
Is possible to solve?

[Ugo]

I am not having that problem here.

FWH 2.7 Aug 2006 build/xHarbour

James,
I compile with FWH 7.01 and xHrb 0.99.71.
Do not work with my previous versione May 2006

Have you tested my sample?

[Antonio Linares]

Ugo,

Your sample is working fine here with FWH 7.01, with and without themes

[Ugo]

Your sample is working fine here with FWH 7.01, with and without themes

Antonio,
on my computer is different!!!
see the enclosed pictures (with themes):
1)

Is not the same character!!!

Also without themes:

Is not the same character!!!

[Antonio Linares]

Ugo,

Please download the EXE from here and test it:

http://www.uploading.com/files/A8FHEWOT/test.zip.html

[Ugo]

Please download the EXE from here and test it

Antonio,

WOW, your test work fine

The problem is my library!

Many thanks for the help!!!

[Ugo]

Antonio,

the problem is present in GET without MEMO!

Can you confirm?

[Ugo]

the problem is present in GET without MEMO!

Antonio,

I found another problem, the special character is visible but not usable!
Test this:

Code: Select all  Expand view  RUN

   LOCAL oDlg, oGet, cNote := "", oClp, oBt1, oBt2, oBt3, oFont, oIni

   DEFINE FONT oFont NAME "Arial" SIZE 0, - 11
   DEFINE DIALOG oDlg RESOURCE "SpecialChar" FONT oFont
   DEFINE CLIPBOARD oClp OF oDlg

   INI oIni File "MemoTest.ini"
      GET cNote SECTION "Test" ENTRY "Memo" OF oIni DEFAULT Space( 100 )

      REDEFINE GET oGet VAR cNote ID 101 OF oDlg MEMO
      REDEFINE BUTTON oBt1 ID 102 ACTION WinExec( "CHARMAP.EXE" )
      REDEFINE BUTTON oBt2 ID 103 ACTION ( oGet:Paste( oCLp:GetText() ), oDlg:Refresh() )
      REDEFINE BUTTON oBt3 ID 104 ACTION OdLG:END()
      Activate Dialog oDlg
      oClp:END()

      SET SECTION "Test" ENTRY "Memo"  TO cNote OF oIni
   ENDINI
   Return Nil

Insert the special character and click on "End" button.
Now run the program and you will see the "S" not the "Ş".

Can you confirm?

Is possible to save the special character into the DBF and INI files?

[Ugo]

Is possible to save the special character into the DBF and INI files?

any suggestions?

[Enrico Maria Giordano]

Do you have any problems saving special characters to DBF or INI files? If yes, can I see a little sample?

EMG

[Ugo]

Do you have any problems saving special characters to DBF or INI files?

Enrico,
Yes!

can I see a little sample?

Yes:

Code: Select all  Expand view  RUN

FUNCTION Main()
/* RC File:
1 24 "themed.manifest"

SPECIALCHAR DIALOG 51, 72, 203, 112
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION
CAPTION "Special Char"
FONT 8, "MS Sans Serif"
{
EDITTEXT 101, 13, 10, 180, 45, ES_MULTILINE | ES_AUTOVSCROLL | ES_WANTRETURN | WS_BORDER | WS_VSCROLL | WS_TABSTOP
PUSHBUTTON "Char Map", 102, 16, 90, 50, 14
PUSHBUTTON "Paste", 103, 75, 90, 50, 14
PUSHBUTTON "End", 104, 137, 90, 50, 14
EDITTEXT 105, 13, 68, 83, 12
}*/
   LOCAL oDlg, oGet, cNote := "", cNot1 := Space(20), oClp, oBt1, oBt2, oBt3, oFont, oIni

   DEFINE FONT oFont NAME "Arial" SIZE 0, - 11
   DEFINE DIALOG oDlg RESOURCE "SpecialChar" FONT oFont
   DEFINE CLIPBOARD oClp OF oDlg

   INI oIni File "MemoTest.ini"
      GET cNote SECTION "Test" ENTRY "Memo" OF oIni DEFAULT Space( 100 )
      GET cNot1 SECTION "Test" ENTRY "Memo1" OF oIni DEFAULT Space( 20 )

      REDEFINE GET oGet VAR cNote ID 101 OF oDlg MEMO
      REDEFINE GET oGet VAR cNot1 ID 105 OF oDlg
      REDEFINE BUTTON oBt1 ID 102 ACTION WinExec( "CHARMAP.EXE" )
      REDEFINE BUTTON oBt2 ID 103 ACTION ( oGet:Paste( oCLp:GetText() ), oDlg:Refresh() )
      REDEFINE BUTTON oBt3 ID 104 ACTION OdLG:END()
      Activate Dialog oDlg
      oClp:END()

      SET SECTION "Test" ENTRY "Memo"  TO cNote OF oIni
      SET SECTION "Test" ENTRY "Memo1"  TO cNot1 OF oIni
   ENDINI
   Return Nil

You can reproduce the problem with click on "Char Map" Button, it selects in the Arial Font the U+015E char and click on copy.
Now paste (with right click and paste) into memo-get and into normal get.
When you exit from the normal get change the char!
Now exit and reopen the program, the char is not the same in the memo-get, in INI file is saved the standard char.
In dbf file is the same.
Can you confirm?

[SORRY FOR MY BAD ENGLISH!!! ]

[Enrico Maria Giordano]

As I said you in private email, I can't see the pasted special character here. It immediately becomes "S".

EMG