Application name
Posted: Fri 05 Nov 2004 12:36
On my BeforeConnect event I would like to set in ApplicationName property more information such as UserName, CustomerID, Version of an Application:
This is na Example:
procedure TDm.bazaBeforeConnect(Sender: TObject);
begin
PreveriGeslo(iDajPodStavniceStr('POS_TIP'));
baza.Params.Values['HostName'] := BazaServer;
baza.Params.Values['DataBase'] := BazaIme;
baza.Params.Values['User_Name'] := BazaUser;
baza.Params.Values['Password'] := BazaGeslo;
baza.Params.Values['Application Name'] := Copy('/' + Verzija + '/SlCent/' + gsPOS_SIF + '/' + UserName, 1, 30);
end;
This example didn' t work, can anybody help me!
I develop in delphi 6 and using the latest dbx driver!
Thans for Help
This is na Example:
procedure TDm.bazaBeforeConnect(Sender: TObject);
begin
PreveriGeslo(iDajPodStavniceStr('POS_TIP'));
baza.Params.Values['HostName'] := BazaServer;
baza.Params.Values['DataBase'] := BazaIme;
baza.Params.Values['User_Name'] := BazaUser;
baza.Params.Values['Password'] := BazaGeslo;
baza.Params.Values['Application Name'] := Copy('/' + Verzija + '/SlCent/' + gsPOS_SIF + '/' + UserName, 1, 30);
end;
This example didn' t work, can anybody help me!
I develop in delphi 6 and using the latest dbx driver!
Thans for Help