مشکل نمایش متون فارسی

[b_mohammadpoor]

سلام به همگی دوستان

من وقتی با دلفی 7 و ویندوز XP برنامه مینویسم Hint ها را فارسی نشون نمیده کسی میدونه چرا ؟ و چکار باید کرد تا فارسی نشون بده ؟ :wink:

[houshmand]

من که دلفی 7 و WinXp ندارم ولی اگه خواستی فونت Hint را عوض کنی
8)

ابتدا یک داده از کلاس ThintWindow مشابه زیر ایجاد میکنیم

  Type

  ( TAltHintWindow = class(THintWindow

  ; Constructor Create (AOwner:TComponent);override

; end

حال در قسمت Implementaion واحد خود متد Create را بصورت زیر تعریف میکنیم

;(Constractor TAltHintWindow.Create(AOwner

begin

;'canvas.font.name:='Times New Roman

canvas.font.size:=18;

;canvas.Brush.Color:=clRed

;end

در آخر نیز رویداد OnCreate فرم خود را بصورت زیر تغییر دهید

;( ‍‍Procedure Tform1.FormCreate(sender:Tobject

  begin

;   Application.shoHint:=False

;   HintWindowClass:=TaltHintWindow

;   Aplication.shoHint:=true

;end

[phantasm]

سلام

باید فونت hint رو تغیر بدی :

screen.HintFont.Name:='name of font';

button1.ShowHint:=true

مثلا:

screen.HintFont.Name:='Arabic Transparent';

[b_mohammadpoor]

از کمک شما ممنون :lol: