با سلام
دوست عزیز جناب delphi-7 تو کلید parameters اون سه گزینه رو از نوع DWORD ایجاد کن همین هر سه تا که مد نظرته تو PARAMETERS ایجاد میشه
LOAD
'AutoShareServer
Reg3.ValueName = "AutoShareServer"
If Check10.Value = 1 Then
Reg3.Data = 0
Reg3.SetValue
Else
Reg3.DeleteValue
End If
'SHOW HIDEN FILE
Reg4.ValueName = "CheckedValue"
If Check11.Value = 1 Then
Reg4.Data = 1
Reg4.SetValue
Else
Reg4.DeleteValue
End If
'AutoShareWks
Reg3.ValueName = "AutoShareWks"
If Check12.Value = 1 Then
Reg3.Data = 0
Reg3.SetValue
Else
Reg3.DeleteValue
End If
برای رویداد کلیک
'AutoShareServer
Reg3.ValueName = "AutoShareServer"
If Reg3.GetValue <> "" Then
Check10.Value = 1
End If
'SHOW HIDEN FILE
Reg4.ValueName = "CheckedValue"
If Reg4.GetValue <> "" Then
Check11.Value = 1
End If
'AutoShareWks
Reg3.ValueName = "AutoShareWks"
If Reg3.GetValue <> "" Then
Check12.Value = 1
End If