Hier habe ich nochmal ein Bsp. wie ich es bei mir (
SQL über ZConnection) gemacht habe...
Delphi-Quellcode:
//Konstanten die aus einer INI eingelesen werden---------------------------------
const
INICONNECTIONDATA = 'RemoteConnection';
INI_VAL_HOSTNAME = 'Hostname';
INI_VAL_PORT = 'Port';
INI_VAL_USER = 'User';
INI_VAL_PASSWORD = 'Password';
INI_VAL_DATABASE = 'Database';
INI_VAL_TABLENAME = 'Tablename';
INI_VAL_PROTOCOL = 'Protocol';
//Einlesen aus der INI-----------------------------------------------------------
with IniFile do
begin
HostRem.Text := ReadString(INICONNECTIONDATA, INI_VAL_HOSTNAME, '');
PortRem.Text := ReadString(INICONNECTIONDATA, INI_VAL_PORT, '');
UserRem.Text := ReadString(INICONNECTIONDATA, INI_VAL_USER, '');
PassRem.Text := ReadString(INICONNECTIONDATA, INI_VAL_PASSWORD, '');
DBRem.Text := ReadString(INICONNECTIONDATA, INI_VAL_DATABASE, '');
DBDRRem.Text := ReadString(INICONNECTIONDATA, INI_VAL_PROTOCOL, '');
end;
IniFile.Free;
//Beim Click auf den Connect-Button----------------------------------------------
begin
with ZConnection1 do
begin
DisConnect;
end;
begin
HostName := Trim(HostRem.Text);
Port := StrToInt(Trim(PortRem.Text));
User := Trim(UserRem.Text);
Password := Trim(PassRem.Text);
Database := Trim(DBRem.Text);
Protocol := Trim(DBDRRem.Text);
Connect;
end;
end;
Im Anhang siehst du woher ich den HostName, Port, Password etc habe...
Mfg, Steve