| Class TSQLSession (unit MSSQL) |
TObject
| Constructors |
constructor Create;| Functions |
procedure Commit;
destructor Destroy;
procedure DoLogin;
procedure DoLogoff;
function GetDeviceDatafile(const Device : String) : String;
function GetPDatabase : PChar;
function GetPHost : PChar;
procedure Rollback;
procedure SetLoginTime(Seconds : Integer);
procedure StartTransaction;
function GetDatabase : String;
function GetDatabases : TStringList;
function GetDevices : TStringList;
function GetHost : String;
function GetIndex(Tables : String) : TStringList;
function GetPassword : String;
function GetTables : TStringList;
function GetUsername : String;
function GetUsers : TStringList;
procedure SetActive(Data : Boolean);
procedure SetDatabase(Data : String);
procedure SetHost(Data : String);
procedure SetPassword(Data : String);
procedure SetUsername(Data : String);
procedure ShowError(Error : Integer; Msg : String);| Properties |
property Active : Boolean
property Database : String
property Databases : TStringList
property Devices : TStringList
property Handle : PDBPROCESS
property Host : String
property Index : TStringList
property Login : PLOGINREC
property Password : String
property Tables : TStringList
property Username : String
property Users : TStringList| Events |
| Variables |
fActive : Boolean;
fDatabase : TSQLData;
fDatabases : TStringList;
fDevices : TStringList;
fHandle : PDBPROCESS;
fHost : TSQLData;
fIndex : TStringList;
fLogin : PLOGINREC;
fPassword : TSQLData;
fTables : TStringList;
fUserList : TStringList;
fUsername : TSQLData;| Constructors |
constructor Create;| Functions |
procedure Commit;
destructor Destroy;
procedure DoLogin;
procedure DoLogoff;Lese jetzt alle Tabellen aus, die in der Datenbank vorhanden *) (* sind.
function GetDeviceDatafile(const Device : String) : String;
function GetPDatabase : PChar;
function GetPHost : PChar;
procedure Rollback;
procedure SetLoginTime(Seconds : Integer);
procedure StartTransaction;
function GetDatabase : String;
function GetDatabases : TStringList;
function GetDevices : TStringList;
function GetHost : String;
function GetIndex(Tables : String) : TStringList;
function GetPassword : String;
function GetTables : TStringList;
function GetUsername : String;
function GetUsers : TStringList;
procedure SetActive(Data : Boolean);
procedure SetDatabase(Data : String);
procedure SetHost(Data : String);
procedure SetPassword(Data : String);
procedure SetUsername(Data : String);
procedure ShowError(Error : Integer; Msg : String);TSQLSession --------------------------------------------------------
| Properties |
property Active : Boolean
property Database : String
property Databases : TStringList
property Devices : TStringList
property Handle : PDBPROCESS
property Host : String
property Index : TStringList
property Login : PLOGINREC
property Password : String
property Tables : TStringList
property Username : String
property Users : TStringList| Events |
| Variables |
fActive : Boolean;
fDatabase : TSQLData;
fDatabases : TStringList;
fDevices : TStringList;
fHandle : PDBPROCESS;
fHost : TSQLData;
fIndex : TStringList;
fLogin : PLOGINREC;
fPassword : TSQLData;
fTables : TStringList;
fUserList : TStringList;
fUsername : TSQLData;