كتابة جملة أو كلمة على الفورم

من طرف **salme** السبت يناير 21, 2017 5:03 pm

الكود:: procedure TForm1.Button1Click(Sender: TObject); begin Form1.Canvas.Font.Name := 'Arial'; Form1.Canvas.Font.Charset := ARABIC_CHARSET; Form1.Canvas.Font.Size := 10; Form1.Canvas.Font.Style := [fsBold]; Form1.Canvas.TextOut(10, 5, 'بسم الله الرحمن الرحيم'); end

المصدر دلفي تعليم
delph.forumalgerie.net