til kaffe (om ini filer)

Okay - jeg har i min ini-fil (cw.ini) lagt en sti til en database, den sti henter jeg her:

Sub Form_Load
  strDatabaseSti = HentIni  (\"ProgramDefaults\", \"Database\", \"c:\\cw.ini\")
End Sub

Public Function HentIni(txtSection As String,
txtKey As String, txtPath As String) As String
  \' Funktionen henter værdier fra inifil.
  Dim sValue As String
  Dim lSize As Long
  Dim lTemp As Long
  Dim sDefault As String
  sValue = String(256, \" \")
  lSize = Len(sValue)
  lTemp = GetPrivateProfileString(txtSection, txtKey, sDefault, sValue, lSize, txtPath)
  If lTemp <> 0 Then
    HentIni = sValue
  Else
    HentIni = sDefault
  End If
End Function

c:\\cw.ini:
[ProgramDefaults]
Database = c:\\db1.mdb

Håber det hjælper dig - ellers må du sige til

jeg prøver lige at teste...

hvorfor er det ikke muligt at hente med det samme (eks. bare værdi=GetPrivateProfileString(...))??

lSize-parametren skal initialiseres før du kan bruge den, og du skal sørge for at den er større end den længste string i din .ini-fil.

Hvis du /vil/ skrive værdi=GetPrivateProfileString hver gang du skal hente en værdi skal du skrive mere (5 parametre) end hvis du laver en funktion lignende den jeg sendte tidligere (3 parametre). Så for mig er det et spørgsmål om dovenskab :-)