المشاركات : 67
المواضيع 34
:
: 0
الإنتساب : Jul 2013
في برنامجي استعمل quickrp
هدا الكود اضيف به TQRShape
كود :
shp:=TQRShape.Create(nil);
shp.Parent:=imprelvm.QuickRep1;
shp.Top:=toptrav-26;
shp.Height:=44;
shp.Width:=1;
shp.Left:=20;
اضافة GRAS
المشاركات : 119
المواضيع 0
:
: 0
الإنتساب : Sep 2012
السلام عليكم...
لا أعرف ما هو الـ GRAS ؟؟
و لكن يمكنك تلوين الـ TQRShape عن طريق الخاصية Brush و الخاصيتين التابعتين لها (Styel و Color):
كود :
shp.Brush.Style := bsSolid; // ربما لا تحتاج هذا السطر لأنه الافتراضي
shp.Brush.Color := clSilver; // أو أي لون تريده
نرجو الاستفادة و السلام.
