Hi Harry,
ich konnte das so nicht kompilieren ...
Delphi-Quellcode:
var
oDef: IFDStanConnectionDef;
oParams: TFDPhysMySQLConnectionDefParams;
// MSSQL connection params (Anm: umbenannt in MySQL)
const
cNameConnDef = '
MYSQL_Connection';
// <- Nur zum schnellen Testen hier rein geschoben
begin
// Adding new persistent connection to fdconnectiondefs.ini
FDManager.ConnectionDefs.AddConnectionDef;
oDef := FDManager.ConnectionDefs.AddConnectionDef;
oDef.
Name := cNameConnDef;
oParams := TFDPhysMySQLConnectionDefParams(oDef.Params);
// <- TFDPhysMSSQLConnectionDefParams, oder TFDPhysMySQLConnectionDefParams?
oParams.DriverID := '
MYSQL';
// <- Semikolon vergessen?
oParams.Database := '
Test';
oParams.UserName := '
root';
oParams.Password := '
XXXX';
oParams.Server := '
192.168.175.38';
//oParams.OSAuthent := false; // <- Kein Plan, kennt er nicht
//oParams.MARS := false; // <- Kein Plan, kennt er nicht
oDef.MarkPersistent;
oDef.Apply;
end;
... so schon ...
MfG
Incocnito