OP Üye
Teşekkür Sayısı: 0
98 mesaj
Kayıt Tarihi:Kayıt: Mar 2008
Uses Registry;
var
freg: Tregistry;
begin
fReg:= TRegistry.Create;
fReg.OpenKey('\Software\ODBC\ODBC.INI\Yasin', True);
fReg.WriteString('Database', 'test');
fReg.WriteString('Description', 'My Sql Driver');
fReg.WriteString('Driver', 'C:\WINDOWS\System32\myodbc3.dll');
fReg.WriteString('Option', '3');
fReg.WriteString('Password',' ');
fReg.WriteString('Port', '3366');
fReg.WriteString('Server', 'localhost');
fReg.WriteString('User', 'root');
fReg.OpenKey('\Software\ODBC\ODBC.INI\ODBC Data Sources', True);
fReg.WriteString('Yasin', 'My Sql Driver');
fReg.CloseKey;
fReg.Free;
end;