Hola TiammatMX,
Es exactamente como dicen los compañero, el tratamiento es el mismo en delphi que en CodeTyphon, te pongo un ejemplo, defines una variable en el TForm como
SQLConfig de tipo
record, tambien la puedes definir como una
class.
Código Delphi
[-]...
interface
uses
etc, etc, etc, IniFiles;
type
TSQLConfig = record
Provider: String;
DataSource: String;
InitialCatalog: String;
Port: Integer;
end;
...
var
IniTmp: TIniFile;
begin
IniTmp := TIniFile.Create('C:\PruebasINI\Config.ini');
with IniTmp do
begin
if (not SectionExists('MSSQL.Connection', 'Provider')) then
begin
WriteString('MSSQL.Connection', 'Provider', 'SQLOLEDB');
WirteString('MSSQL.Connection', 'Data Source', 'TuServidorSQL');
WriteString('MSSQL.Connection', 'Initial Catalog', 'TuBaseDeDatos');
WriteInteger('MSSQL.Connection', 'Port', 1433);
end
else begin
SQLConfig.Provider := ReadString('MSSQL.Connection', 'Provider', '');
SQLConfig.DataSource := ReadString('MSSQL.Connection', 'Data Source', '');
SQLConfig.InitialCatalog := ReadString('MSSQL.Connection', 'Initial Catalog', '');
SQLConfig.Port := ReadInteger('MSSQL.Connection', 'Port', 0);
end;
UpdateFileIni;
end;
FreeAndNil(IniTmp);
end;
Esto lo puedes poner en OnCreate del formulario o hacer una función o lo que tu quieras.
Un saludo.