[@@أبورائد@@]

السلام عليكم ورحمة الله وبركاته






شاهد هذا المثال

shado1796 كتب :[b]هل يمكنني ان اتحكم بمقاس الهامش؟

shado1796 كتب :اشتغل ,, بس لاحظت لون الهامش انطبع!

[COLOR="#FF0000"]تم تعديل المرفقات لتشمل تغيير الهوامش وعدم طباعة الهامش



[/b][/COLOR]
السلام عليكم ورحمة الله وبركاته

[shado1796]

@@أبورائد@@ كتب :
السلام عليكم ورحمة الله وبركاته






شاهد هذا المثال





السلام عليكم ورحمة الله وبركاته

اشتغل وانحلت مشكلتي مع العلم اني سبق وفتحت مثل هذا الموضوع ولا انحلت ,, الله ثم اصرارك الله يجزاك الف خير ,, بس لاحظت لون الهامش انطبع وراح نص الحبر :p
مو مشكلة نخليه ابيض جزاك الله خير ..

[@@أبورائد@@]

السلام عليكم ورحمة الله وبركاته






لو لاحظت اني نوهت على السطرين تبع الهامش داخل الكود، يعني قم بتعطيلهم أو حذفهم بعد أن تأكد من أن كل شيء تمام
انل وضعتهم حتى تتأكد من أنك لم تخرج من نطاق الطباعة الممكنة





السلام عليكم ورحمة الله وبركاته

[shado1796]

@@أبورائد@@ كتب :
السلام عليكم ورحمة الله وبركاته






لو لاحظت اني نوهت على السطرين تبع الهامش داخل الكود، يعني قم بتعطيلهم أو حذفهم بعد أن تأكد من أن كل شيء تمام
انل وضعتهم حتى تتأكد من أنك لم تخرج من نطاق الطباعة الممكنة





السلام عليكم ورحمة الله وبركاته

نعم اخي لاحظتها .. لكن في شئ محيرني الارقام بعد كلمة a4 هل هي مقاس الهامش ام ماذا ؟ وهل يمكنني اتن اتحكم بمقاس الهامش ؟

[@@أبورائد@@]

shado1796 كتب :

نعم اخي لاحظتها .. لكن في شئ محيرني الارقام بعد كلمة a4 هل هي مقاس الهامش ام ماذا ؟ وهل يمكنني اتن اتحكم بمقاس الهامش ؟

السلام عليكم ورحمة الله وبركاته






يمكنك التحكم بتغيير الهوامش عن طريق PrinterSettings1.DefaultPageSettings.Margins في زر الطباعة

PHP كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        '' زر امرالطباعة
        Dim doc As New Printing.PrintDocument
        AddHandler doc.PrintPage, AddressOf PrintDocument

        Dim PrinterSettings1 As New Printing.PrinterSettings
        PrinterSettings1.DefaultPageSettings.PaperSize = New System.Drawing.Printing.PaperSize("A4", 826.9, 1169.4)
        ''PrinterSettings1.DefaultPageSettings.PaperSize = New System.Drawing.Printing.PaperSize("Letter", 850, 1100)

        '' تحديد الهوامش
        PrinterSettings1.DefaultPageSettings.Margins.Left = 50
        PrinterSettings1.DefaultPageSettings.Margins.Right = 50
        PrinterSettings1.DefaultPageSettings.Margins.Top = 50
        PrinterSettings1.DefaultPageSettings.Margins.Bottom = 50

        doc.PrinterSettings = PrinterSettings1
        doc.DefaultPageSettings.Landscape = True

        Dim Print As New PrintPreviewDialog
        Print.Document = doc
        Print.ShowDialog()

    End Sub 


السلام عليكم ورحمة الله وبركاته

[@@أبورائد@@]

shado1796 كتب :

نعم اخي لاحظتها .. لكن في شئ محيرني الارقام بعد كلمة a4 هل هي مقاس الهامش ام ماذا ؟

السلام عليكم ورحمة الله وبركاته






الارقام بعد كلمة a4 هي مقاس الورقة بالكامل





السلام عليكم ورحمة الله وبركاته

[shado1796]

شكرا لك اخي...