استاذ 911 كثر الف خيرك ما قصرت و الله و اتعبتك معي فعلا ارجو المسامحة فضلا.المشكلة لما قلت لك في مشتركتي السابقة بشرط عدم تغيير سير المشروع لاني كنت مجرب ان المشكلة كلتها في الفورم الافتتاحي رقم 1 كمثال.جرب الاكواد التي بملفك ستجد انو لا يمكن تغيير السكاين من الفورم3.يعني لو كتبت هاذ الكود بالفورم1 ستكون الامور تمام بكل المشروع ولو 100 فورم سياخذون شكل السكاين بالفورم1 لكن اذا كتبت هذا الكود بالفورم1 لا تشتغل الكومبو تغيير السكاين لو وضعتة بأية فورم الا اذا مسحت هذا الكود
و لو مسحت هذا الكود راح يطلع الفورم 1 الافتتاحي بدون شكل سكاين ورتح تشتغل كومبو التغيير بصورة عادية.بارك الله فيك اخي
كود :
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim skn As New Sunisoft.IrisSkin.SkinEngine
skn.SerialNumber = "kUb2DF5pvGF3X9dKPFvIdkXQ0sE8LkAVp9fMme9wCnjZ+ArdRVlxKw=="
skn.SkinFile = Application.StartupPath & "\Midsummer.ssk"
skn.AddForm(Me)
End Sub
