21-01-2016, 04:55 PM
استعملت هذا الكود
procedure TForm1.Button4Click(Sender: TObject);
begin
Enabled := False; // Form Blackout works if TsSkinProvider.DisabledBlendValue is not 255
SelectSkin(sSkinManager1);
Enabled := True;
end;
كيف اثبت skin معين عند اختيارة بحيث عند فتح البرنامج مرة اخرى يظهر الفورم بهذا الskin
procedure TForm1.Button4Click(Sender: TObject);
begin
Enabled := False; // Form Blackout works if TsSkinProvider.DisabledBlendValue is not 255
SelectSkin(sSkinManager1);
Enabled := True;
end;
كيف اثبت skin معين عند اختيارة بحيث عند فتح البرنامج مرة اخرى يظهر الفورم بهذا الskin

