Jump to content

Conectar banco de dados por um arquivo ini


andersonrsbezerra

Recommended Posts

The file name is the application name plus ".ini", and its content is something like..

...

[database]

connectionString=SQLOLEDB.1;User ID=sa;Initial Catalog="database";Data Source=127.0.0.1,1433;Password=blahblehblih

 

 

 

Then i do something like this...

 

...

interface

...

type
  TUniMainModule = class(TUniGUIMainModule)
    ADOConn: TADOConnection;
    procedure UniGUIMainModuleCreate(Sender: TObject);

    ...
  end;

Implementation

...

Uses IniFiles, ...;

...

procedure TUniMainModule.UniGUIMainModuleCreate(Sender: TObject);
begin
    with TMemIniFile.Create(changeFileExt( paramStr(0) , '.conf' )) do begin
        AdoConn.close;
        AdoConn.connectionString    := ReadString('database','connectionString','');
        free;
    end;

    try
         ADOConn.open;
    ...

    end;
end;
 

 

Good luck

Link to comment
Share on other sites

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now
×
×
  • Create New...