تغییر تنظیمات فونت Canvas.Textout

شروع موضوع توسط M.Yaghoubian ‏23 آپریل 2007 در انجمن Delphi

  1. M.Yaghoubian

    M.Yaghoubian کاربر تازه وارد

    تاریخ عضویت:
    ‏23 آپریل 2007
    نوشته ها:
    2
    تشکر شده:
    0
    محل سکونت:
    Shahin Shahr
    با سلام، من عضو جدید هستم...
    من می خوام روی یک Image متن بنویسم، برای این کار از Textout استفاده کردم
    ولی روی image یک مربع سیاه نمایش داده می شه...:blink:
    لطفا منو راهنمایی کنید چطور فونت اونو تنظیم کنم؟
  2. NewAge

    NewAge کاربر تازه وارد

    تاریخ عضویت:
    ‏29 می 2007
    نوشته ها:
    9
    تشکر شده:
    0
    محل سکونت:
    ً

    دوست من اين مشکل ارتباطي به تنظيم فونت نداره.

    تنها نکته مهم اين مسئله اينه که شما بايد اين کار (Image.Canvas.TextOut) را در پراسيژر Paint انجام بدهيد.(هر گاه نياز به Paint کردن صفحه باشد، اين پراسيژر صدا زده ميشود):lol:​

    کد:
    procedure Paint; override;
    .
    .
    .
    procedure TForm1.Paint;
    begin
      inherited;
      Image1.Canvas.Font.Style := [fsBold]+[fsItalic];
      Image1.Canvas.TextOut(0, 0, 'salam');
    end;
    
    فکر نميکنم ديگه مشکلي وجود داشته باشه!:)

این صفحه را با دیگران به اشتراک بگذارید


بک لینک