14. oktober 2002 - 14:29
Der er
11 kommentarer og 1 løsning
dbExpress
Hej Er der nogen der ved hvordan man benytter sig af funktionen TSQLConnection.LoadParamsFromIniFile()? Jeg har lavet en inifil, som ser således ud : Drivername=MySQL Hostname=localhost Database=db ..... ... Den finder filen godt nok, men den indlæser bare ikke værdierne. Er der nogen der ved om den ini fil skal se ud på en bestemt måde??
Annonceindlæg tema
Offentlig digitalisering
Fra effektivisering til digital suverænitet. Hvordan skaber det offentlige en digital fremtid med AI, sikkerhed og kontrol i centrum?
14. oktober 2002 - 14:34
#1
Connection.Params.Values['Database'] := 'MinDB';
14. oktober 2002 - 14:35
#2
har du husket at du ikke må sætte LoadParamsOnConnect til true?
14. oktober 2002 - 14:36
#3
ja, men den skal jo hente værdierne fra en inifile (derfor LoadParamsFromIneFile()!). Det er hvordan ini filen skal se ud
14. oktober 2002 - 14:37
#4
Min start op ser ud som du ser herunder, jeg har en settingsform som heder dlgSettings hvor jeg læser værdierne over i fra DB'en først try iniFil := TIniFile.Create(ExtractFilePath(Application.ExeName) + '\Falco.ini'); with iniFil, dlgSettings do begin leDBName.Text := ReadString('DATABASE', 'Name', 'MinDB' ); leDBHost.Text := ReadString('DATABASE', 'Host', 'localhost'); seDBPort.Value := ReadInteger('DATABASE', 'Port', 3306); leUserName.Text := ReadString('DATABASE', 'User', ''); lePassword.Text := ReadString('DATABASE', 'Pass', ''); seRemotePort.Value := ReadInteger('REMOTE CON', 'Port', 800); rgLanguage.ItemIndex := ReadInteger('LANGUAGE' ,'Language', 0); end; iniFil.Free; if dlgSettings.rgLanguage.ItemIndex = 1 then dlgSettings.LoadLanguage; except ShowMessage(ErrSettings); end; try with DM.SQLConMinDB, dlgSettings do begin Params.Values['Database'] := leDBName.Text; Params.Values['HostName'] := leDBHost.Text; //Port := seDBPort.Value; Params.Values['Password'] := lePassword.Text; Params.Values['User_Name'] := leUserName.Text; Connected := true; end; except on E:Exception do begin ShowMessage(DBErr2+#13+'System error: '+E.Message); //frmFalcoData.Close; end; end; if DM.SQLConMinDB.Connected then try
14. oktober 2002 - 14:37
#5
søg efter dbxconnections.ini og ret i den
14. oktober 2002 - 14:38
#6
jeg mener tag et kopi og brug LoadParamsFromIneFile('.\dbxconnections_kopi.ini');
14. oktober 2002 - 14:40
#7
Params.Values['Database'] := ReadString('DATABASE', 'Name', 'MinDB' )
14. oktober 2002 - 14:40
#8
dkn --> Ja og den finder også filen, men den læser bare ikke værdierne fra filen, så dvs at selvom der i min inifil står : Hostname=localhost så tager den ikke denne værdi. Så spørgsmålet er faktisk om den ini fil skal se ud på en bestemt måde. Med [sections] osv. Har forsøgt delphi hjælpen, men der står intet brugbart i dette tilfælde
14. oktober 2002 - 14:43
#9
prøv med [DATABASE] Name=DinDB Host=Localhost Port=3306 User= Pass=
14. oktober 2002 - 14:51
#10
Super ,dkn, du har lige reddet min dag. Det var bare den der [MySQLConnection] der skulle til. :)
14. oktober 2002 - 14:51
#11
Hvis du bruger dkn's forslag til inifil bliver din syntaks DinSQLConnection.Params.Values['Database'] := ReadString('DATABASE', 'Name', 'DitDBDefaultNavn' );
14. oktober 2002 - 14:53
#12
var så lidt :)
Kurser inden for grundlæggende programmering