---
title: "Förinställda variabler och inställningar"
type: "forum-thread"
url: "https://www.webforum.nu/amne/dotnet/43594-förinställda-variabler-och-inställningar"
topic: ".NET"
topic_url: "https://www.webforum.nu/amne/dotnet"
author: "prey"
published: "2002-05-13T06:42:25.000Z"
updated: "2002-05-13T19:44:03.000Z"
replies: 4
views: 259
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/dotnet/43594-förinställda-variabler-och-inställningar"
---

# Förinställda variabler och inställningar

## #1 — prey, 2002-05-13T06:42Z

Är det någon som har ett bra förslag på hur man kan låta
användaren ändra värden i mitt program, för att sedan spara
dessa så att de NYA värdena är valda/inskrivna när programmet
öppnas på nytt?

Permalänk: https://www.webforum.nu/p/43594

## #2 — UlfT, 2002-05-13T07:43Z

Spara värdena i registret. Kolla funktioner som GetSetting och SaveSetting tex.

Permalänk: https://www.webforum.nu/p/672403

## #3 — aleborg, 2002-05-13T07:43Z

ini fil?

```
Public Declare Function GetPrivateProfileString Lib "kernel32" _
        Alias "GetPrivateProfileStringA" (ByVal lpApplicationName _
        As String, ByVal lpKeyName As Any, ByVal lpDefault As String, _
        ByVal lpReturnedString As String, ByVal nSize As Long, _
        ByVal lpFileName As String) As Long

Private DatorNamn As String

Public Sub Form_Load()
    Dim dnamn As Long
    Dim sKeyValue As String
    Dim fsIniPath

    
    fsIniPath = App.Path & "\wsm.ini"
    sKeyValue = Space(255)

    
    dnamn = GetPrivateProfileString("Sektion", "variabelnamn", "", sKeyValue, Len(sKeyValue), fsIniPath)
    minVariabel = Replace(RTrim(sKeyValue), Chr(0), "")

End Sub
```

Är inte säker men jag tror att Public Declare Funktionen ska ligga i en modul

För att skriva:

```
Public Declare Function WritePrivateProfileString Lib "kernel32" _
        Alias "WritePrivateProfileStringA" (ByVal lpApplicationName _
        As String, ByVal lpKeyName As Any, ByVal lpString As Any, _
        ByVal lpFileName As String) As Long

Private Sub cmdOK_Click()
Dim fsIniPath
Dim strDatn As String

strDatn = Trim(txtNamn.Text)

Call WritePrivateProfileString("Sektion", "variabelnamn", strDatn , fsIniPath)

    Unload Me
End Sub
```

Permalänk: https://www.webforum.nu/p/672404

## #4 — UlfT, 2002-05-13T09:16Z

Om man absolut vill inkludera externa funktioner, kan man lika gärna använda diverse Reg\*-funktioner, som RegQueryValueEx, RegSetValueEx, RegCreateKeyEx, RegOpenKeyEx, etc. Alla finns i hjälpdokumentationen. De ger ytterliggare möjligheter att komma åt registret.

Permalänk: https://www.webforum.nu/p/672435

## #5 — prey, 2002-05-13T19:44Z

Tack för hjälpen, ska testa med en gång  :birp

Permalänk: https://www.webforum.nu/p/672767

---

Tråden på webben: https://www.webforum.nu/amne/dotnet/43594-förinställda-variabler-och-inställningar