simple registry editor

Category:

Registry

Type:

Applications

Difficulty:

Beginning

Author:

Anonymous

Version Compatibility: Visual Basic 6

More information:

very simple registry editor with help in 2 difrent langvage i only tryed in vb6 but i think that it will work in vb5 and vb net.

Instructions: Copy the declarations and code below and paste directly into your VB project.

Declarations:
'Program made by Akul (Luka Kusulja) 'you will need: 'command1 (command button) 'command2 (command button) 'command3 (command button) 'text1 (text box) ' ' ako ima tko iz hrvatske neka mi se javi pa da pricamo 'if you have some trouble contact me 'akul11@vip.hr

Code:

Private Sub Command1_Click()
'SaveSetting "ime direktorija", "ime od poddirektorija", "ime komponente", "vrijednost"
'SaveSetting "name of folder", "name of subfolder", "name of component", "value"
 SaveSetting "Akul", "Akul", "what", Text1.Text
End Sub
Private Sub Command2_Click()
' gdje da se stavi (label1.caption) = GetSetting("ime direktorija", "ime od poddirektorija", "ime komponente", "pocetna vrijednost")
' where to put the value (label1.caption) = GetSetting("name of folder", "name of subfolder", "name of component", "default value")
 a$ = GetSetting("Akul", "Akul", "what", "0")
  MsgBox a$
End Sub
Private Sub Command3_Click()
'DeleteSetting "ime direktorija", "ime od poddirektorija", "ime komponente"
'DeleteSetting "name of folder", "name of subfolder", "name of component"
 DeleteSetting "akul", "akul", "what"
End Sub
Private Sub Form_Load()
'sets the captions of the buttons and text box
 Command1.Caption = "WRITE - PISI"
 Command2.Caption = "READ - CITAJ"
 Command3.Caption = "DELETE - IZBRISI"
 Text1.Text = "VALUE - VRIJEDNOST"
End Sub