إضافة نص ديناميكي
Contents
[
Hide
]
تتبع كلا الطريقتين هذه الخطوات:
- إنشاء عرض تقديمي.
- إضافة شريحة فارغة.
- إضافة مربع نص.
- تعيين بعض النص.
- كتابة العرض التقديمي.
VSTO
private void AddTextBox()
{
//إنشاء عرض تقديمي
PowerPoint.Presentation pres = Globals.ThisAddIn.Application
.Presentations.Add(Microsoft.Office.Core.MsoTriState.msoFalse);
//الحصول على تخطيط الشريحة الفارغة
PowerPoint.CustomLayout layout = pres.SlideMaster.
CustomLayouts[7];
//إضافة شريحة فارغة
PowerPoint.Slide sld = pres.Slides.AddSlide(1, layout);
//إضافة نص
PowerPoint.Shape shp =sld.Shapes.AddTextbox
(Microsoft.Office.Core.MsoTextOrientation.msoTextOrientationHorizontal,150, 100, 400, 100);
//تعيين نص
PowerPoint.TextRange txtRange = shp.TextFrame.TextRange;
txtRange.Text = "تم إضافة النص ديناميكيًا";
txtRange.Font.Name = "Arial";
txtRange.Font.Bold = Microsoft.Office.Core.MsoTriState.msoTrue;
txtRange.Font.Size = 32;
//كتابة الناتج إلى القرص
pres.SaveAs("outVSTOAddingText.ppt",
PowerPoint.PpSaveAsFileType.ppSaveAsPresentation,
Microsoft.Office.Core.MsoTriState.msoFalse);
}
Aspose.Slides
static void AddTextBox()
{
//إنشاء عرض تقديمي
Presentation pres = new Presentation();
//يتم إضافة شريحة فارغة افتراضيًا عند إنشاء
//عرض تقديمي من الباني الافتراضي
//لذا، لا نحتاج إلى إضافة أي شريحة فارغة
Slide sld = pres.GetSlideByPosition(1);
//الحصول على فهرس الخط لـ Arial
//دائمًا يكون 0 إذا أنشأت عرضًا تقديميًا من
//الباني الافتراضي
int arialFontIndex = 0;
//إضافة مربع نص
//لإضافته، سنقوم أولاً بإضافة مستطيل
Shape shp = sld.Shapes.AddRectangle(1200, 800, 3200, 370);
//إخفاء حدوده
shp.LineFormat.ShowLines = false;
//ثم إضافة إطار نص داخله
TextFrame tf = shp.AddTextFrame("");
//تعيين نص
tf.Text = "تم إضافة النص ديناميكيًا";
Portion port = tf.Paragraphs[0].Portions[0];
port.FontIndex = arialFontIndex;
port.FontBold = true;
port.FontHeight = 32;
//كتابة الناتج إلى القرص
pres.Write("outAspose.ppt");
}