Still celebrating National IT Professionals Day with 3 months of free Premium Membership. Use Code ITDAY17

x
?
Solved

TXPManifest affects TEdit's text (D7)

Posted on 2004-10-11
6
Medium Priority
?
414 Views
Last Modified: 2008-01-09
I have a form with an edit box. At run time I press Alt+Shift (XP) to change language and set edit1.text. Setting CharSet to ARABIC_CHARSET every thing is ok. I can draw edit1.text on image1.canvas using above charset.
Now I add XPManifest1 to form1. I redo above procedure and obtain ????... .
Is edit1 using unicode characters inside? How can I use edit1.text, either by making edit1 act as normal or using a function to get the simple string?
In fact, how can I store edit1.text in a variable and draw it on image1.canvas when needed?
0
Comment
Question by:szayeri
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 3
  • 2
6 Comments
 
LVL 14

Accepted Solution

by:
DragonSlayer earned 375 total points
ID: 12278321
In order to use Unicode, you have to use the Unicode-enabled 3rd party controls at http://tnt.ccci.org/delphi_unicode_controls/
0
 

Author Comment

by:szayeri
ID: 12287908
Dear DragoSlaver
Thank you for your comment. I'm not searching for unicode-enabled components. I do know TNT (of course, I still do not know how to create and use unicode string tables!). I prefer NOT to use 3rd party components. My problem is with TEdit + TXPManifest.
0
 
LVL 14

Assisted Solution

by:DragonSlayer
DragonSlayer earned 375 total points
ID: 12289667
How did you draw the text? If I recall correctly, you need DrawTextW in order to draw in unicode.
0
 

Author Comment

by:szayeri
ID: 12299188
Thank you DragoSlayer
Your comment does not help or I could not use it.
I found something more interesting. Putting two TEdit and using Edit1.Text:=Edit2.Text in a button click after I have pressed Alt+Shift (as above) and Edit2.Text is in my languge (Arabic) sets those arabic characters of Edit1.Text to question marks and English characters are correct (both in Edit1.Text and Image1.Canvas)!
Is it a bug in D7?
I should say again that this problem does not happen without TXPManifest.
Can I use XP styles without using TXPManifest (if it helps)?
0
 

Author Comment

by:szayeri
ID: 13362786
I did not find the reason to my problem but I found that changing the windows "default language" to "Arabic" solves it.
Ofcourse, the above comments are quite true (as I know). So I have splitted the points to those who spent time to help me.
Thanks again!
0

Featured Post

Important Lessons on Recovering from Petya

In their most recent webinar, Skyport Systems explores ways to isolate and protect critical databases to keep the core of your company safe from harm.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This article explains how to create forms/units independent of other forms/units object names in a delphi project. Have you ever created a form for user input in a Delphi project and then had the need to have that same form in a other Delphi proj…
In this tutorial I will show you how to use the Windows Speech API in Delphi. I will only cover basic functions such as text to speech and controlling the speed of the speech. SAPI Installation First you need to install the SAPI type library, th…
In this brief tutorial Pawel from AdRem Software explains how you can quickly find out which services are running on your network, or what are the IP addresses of servers responsible for each service. Software used is freeware NetCrunch Tools (https…
Do you want to know how to make a graph with Microsoft Access? First, create a query with the data for the chart. Then make a blank form and add a chart control. This video also shows how to change what data is displayed on the graph as well as form…

688 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question