Autor Téma: FireDAC - Firebird - Přihlášený uživatel a jeho role  (Přečteno 2378 krát)

Offline chaloup

  • Mladík
  • **
  • Příspěvků: 97
  • Karma: 11
    • Verze Delphi: Delphi 10.2
Excellent
Rated 1 time
zdar,

nevíte někdo jak z TFDConnection vydolovat, jaký je přihlášený uživatel a role?
Použitá databáze je FirebirdSQL.
Zjistil jsem, že se to dá vyparsovat z ConnectionString, ale zdá se mi to dost kostrbatý, ten driver to musí mít někde uložený...
Nevíte někdo jak na to?

P.

Offline Radek Červinka

  • Administrátoři
  • Padawan
  • *****
  • Příspěvků: 2222
  • Karma: 98
    • Verze Delphi: D5,D2007, DXE, DXE2 + 2 poslední (Tokyo)
    • O Delphi v češtině
Re:FireDAC - Firebird - Přihlášený uživatel a jeho role
« Odpověď #1 kdy: 12-01-2015, 15:05:52 »
Asi myslis
TFDConnection.Params.Values['User_name'] a TFDConnection.Params.Values['RoleName'].
To prvni pouzivam ale s SQL Serverem, druhe viz
http://docwiki.embarcadero.com/RADStudio/XE6/en/Connect_to_Firebird_%28FireDAC%29
Embarcadero MVP - Czech republic

Offline chaloup

  • Mladík
  • **
  • Příspěvků: 97
  • Karma: 11
    • Verze Delphi: Delphi 10.2
Re:FireDAC - Firebird - Přihlášený uživatel a jeho role
« Odpověď #2 kdy: 12-01-2015, 16:18:42 »
No když použiješ TFDConnection.ConnectionDefName='něco' a přihlašovací údaje se ti načtou z FDConnectionDefs.ini
tak v TFDConnection.Params je jen jeden parametr a to ConnectionDef='něco' což je odkaz na sekci v FDConnectionDefs.ini
ale to co z toho FDConnectionDefs.ini načte tam samozřejmě není... to je vidět pouze v ConnectionString

Offline Delfin

  • Padawan
  • ******
  • Příspěvků: 1621
  • Karma: 65
  • SW konzultant
    • Verze Delphi: 2009, Tokyo
Re:FireDAC - Firebird - Přihlášený uživatel a jeho role
« Odpověď #3 kdy: 19-02-2019, 07:11:25 »
Excellent
Rated 1 time
Vim, zase jsem vytahnul stare tema... Ale k odpovedi; pri pristupu pres vlastnost Values[] se cte hodnota paru z parametru docasne definice (viz. connection definition kinds), ne z realne definice pripojeni jenz bude nasledne pouzita (jenz pripadne pouzije parametry definice docasne).

Dana uloha se da (za predpokladu, ze je connection objekt nadefinovan k pripojeni k FB driveru; kontrola v kodu neni) resit pristupem k fyzicke definici pripojeni, napr.:

Kód: Delphi [Vybrat]
  1. uses
  2.   FireDAC.Phys.FBDef;
  3.  
  4. procedure TForm1.Button1Click(Sender: TObject);
  5. var
  6.   UserName: string;
  7.   RoleName: string;
  8.   FBParams: TFDPhysFBConnectionDefParams;
  9. begin
  10.   FBParams := TFDPhysFBConnectionDefParams(FDConnection1.Params);
  11.   UserName := FBParams.UserName;
  12.   RoleName := FBParams.RoleName;
  13.   ...
  14. end;
I'm a soldier, so don't panic! I know the underground! I like WTFPL license! No more Google, go duck, go!

Offline chaloup

  • Mladík
  • **
  • Příspěvků: 97
  • Karma: 11
    • Verze Delphi: Delphi 10.2
Re:FireDAC - Firebird - Přihlášený uživatel a jeho role
« Odpověď #4 kdy: 20-02-2019, 10:53:48 »
Excellent
Rated 2 times
Fakt to tvoje řešení funguje. Dík.

Nemůžu si pomoct, ale ty se asi musíš hodně nudit  :D :D

Offline Jirka

  • Mladík
  • **
  • Příspěvků: 83
  • Karma: 8
    • Verze Delphi: XE2
Re:FireDAC - Firebird - Přihlášený uživatel a jeho role
« Odpověď #5 kdy: 23-02-2019, 13:30:22 »
Excellent
Rated 1 time
Nemůžu si pomoct, ale ty se asi musíš hodně nudit  :D :D

Buďme rádi že ho tady máme ...
Připomíná mi to doby Petra Voneše (amatérského programátora)
 

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 3903
  • Karma: 35
    • Verze Delphi: XE7 professional
Re:FireDAC - Firebird - Přihlášený uživatel a jeho role
« Odpověď #6 kdy: 23-02-2019, 13:56:54 »
Veď aj sme ;)  A veľmi :-*
Len ho neberte vážne, že niečo v budúcnosti urobí ;D Na to už nemá čas ::)
Delphi XE7, FireBird
Expert na kladenie nejasne formulovaných otázok.

Offline pf1957

  • Padawan
  • ******
  • Příspěvků: 2429
  • Karma: 130
    • Verze Delphi: D2007, XE3, DX10
Re:FireDAC - Firebird - Přihlášený uživatel a jeho role
« Odpověď #7 kdy: 23-02-2019, 16:13:49 »
Připomíná mi to doby Petra Voneše (amatérského programátora)
Jenomze nez jsem PV presvedcil, ze si ma poridit zivnostensky list a jit normalne podnikat, tak v te ere chodil do SPT Telecom (nebo jak se ty telekomunisti jmenovali) a tam nemel do ceho pichnout, tak tim ubijel cas  :-)

Offline Jirka

  • Mladík
  • **
  • Příspěvků: 83
  • Karma: 8
    • Verze Delphi: XE2
Re:FireDAC - Firebird - Přihlášený uživatel a jeho role
« Odpověď #8 kdy: 23-02-2019, 16:47:52 »
Připomíná mi to doby Petra Voneše (amatérského programátora)
Jenomze nez jsem PV presvedcil, ze si ma poridit zivnostensky list a jit normalne podnikat, tak v te ere chodil do SPT Telecom (nebo jak se ty telekomunisti jmenovali) a tam nemel do ceho pichnout, tak tim ubijel cas  :-)

A copak dělá teď ..  ?

Offline pf1957

  • Padawan
  • ******
  • Příspěvků: 2429
  • Karma: 130
    • Verze Delphi: D2007, XE3, DX10
Re:FireDAC - Firebird - Přihlášený uživatel a jeho role
« Odpověď #9 kdy: 23-02-2019, 19:49:55 »
A copak dělá teď ..  ?
Programuje jako freelancer, ale v .NETu a prevazne server side, mam dojem ze i neco skoli

Offline Delfin

  • Padawan
  • ******
  • Příspěvků: 1621
  • Karma: 65
  • SW konzultant
    • Verze Delphi: 2009, Tokyo
Re:FireDAC - Firebird - Přihlášený uživatel a jeho role
« Odpověď #10 kdy: 24-02-2019, 23:33:07 »
Veď aj sme ;)  A veľmi :-*
Len ho neberte vážne, že niečo v budúcnosti urobí ;D Na to už nemá čas ::)

K tem slibum. Mrzi me to, ale neni motivace. Momentalne resim pomerne specifikacne narocne projekty v C++. Toto forum je pro me takovy nostalgicky oddech. V budoucnu chystam vyvoj vlastniho napadu mobilni aplikace (nejspis Xamarin, nativne se mi ji nechce lamat a takove FMX je pro dane ucely nepouzitelne).

Vyvo mnoha aplikaci se presouva do zemi jako je Indie a to se mi dvakrat nelibi. Vice bezhlave napsaneho kodu nedela dobrou aplikaci.
« Poslední změna: 24-02-2019, 23:35:31 od Delfin »
I'm a soldier, so don't panic! I know the underground! I like WTFPL license! No more Google, go duck, go!

Offline Stanislav Hruška

  • Padawan
  • ******
  • Příspěvků: 3903
  • Karma: 35
    • Verze Delphi: XE7 professional
Re:FireDAC - Firebird - Přihlášený uživatel a jeho role
« Odpověď #11 kdy: 25-02-2019, 08:48:33 »
OT: čítal som konštatovanie nejakého človeka znalého veci. A ten sa vyjadril, že viac ako polovica indických programátorov nevie programovať.
Delphi XE7, FireBird
Expert na kladenie nejasne formulovaných otázok.

Offline Delfin

  • Padawan
  • ******
  • Příspěvků: 1621
  • Karma: 65
  • SW konzultant
    • Verze Delphi: 2009, Tokyo
Re:FireDAC - Firebird - Přihlášený uživatel a jeho role
« Odpověď #12 kdy: 25-02-2019, 10:02:54 »
OT: čítal som konštatovanie nejakého človeka znalého veci. A ten sa vyjadril, že viac ako polovica indických programátorov nevie programovať.

Bohuzel jsou jich plne freelance portaly. Od mobil pres web po desktop. Uvadi, ze umi vse a to hrube pod cenou protoze pro ne je jeden dolar nebo euro hromada penez. Bohuzel tim zabiraji nabidky a kvalita trpi. Pritom i jen v sousedni Cine by se dal pro stejnou praci sehnat vetsinou mnohem kvalitnejsi jedinec. Zvlastni trend.
I'm a soldier, so don't panic! I know the underground! I like WTFPL license! No more Google, go duck, go!

Offline Radek Červinka

  • Administrátoři
  • Padawan
  • *****
  • Příspěvků: 2222
  • Karma: 98
    • Verze Delphi: D5,D2007, DXE, DXE2 + 2 poslední (Tokyo)
    • O Delphi v češtině
Re:FireDAC - Firebird - Přihlášený uživatel a jeho role
« Odpověď #13 kdy: 25-02-2019, 10:35:50 »
OT: čítal som konštatovanie nejakého človeka znalého veci. A ten sa vyjadril, že viac ako polovica indických programátorov nevie programovať.

Bohuzel jsou jich plne freelance portaly. Od mobil pres web po desktop. Uvadi, ze umi vse a to hrube pod cenou protoze pro ne je jeden dolar nebo euro hromada penez. Bohuzel tim zabiraji nabidky a kvalita trpi. Pritom i jen v sousedni Cine by se dal pro stejnou praci sehnat vetsinou mnohem kvalitnejsi jedinec. Zvlastni trend.

Tak jim nekonkuruj a najdi si jinou oblast, viz Blue ocean strategie.
Embarcadero MVP - Czech republic

Offline Delfin

  • Padawan
  • ******
  • Příspěvků: 1621
  • Karma: 65
  • SW konzultant
    • Verze Delphi: 2009, Tokyo
Re:FireDAC - Firebird - Přihlášený uživatel a jeho role
« Odpověď #14 kdy: 25-02-2019, 10:38:09 »
Tak jim nekonkuruj a najdi si jinou oblast, viz Blue ocean strategie.

To ani nejde. Za cenu co bych musel jako konkurent nabizet nema smysl ani dychat. A strategii jsem si uz davno vybral, ruce pryc od Delphi.
« Poslední změna: 25-02-2019, 10:42:32 od Delfin »
I'm a soldier, so don't panic! I know the underground! I like WTFPL license! No more Google, go duck, go!

 

S rychlou odpovědí můžete používat BB kódy a emotikony jako v běžném okně pro odpověď, ale daleko rychleji.

Jméno: E-mail:
Ověření:
Kolik je šest plus čtyři (slovem):