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

[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: