5 |
|
VerticalOffset = 395 |
6 |
|
Width = 730 |
7 |
|
object IBDatabase1: TIBDatabase |
8 |
< |
Connected = False |
8 |
> |
Connected = True |
9 |
|
AfterConnect = IBDatabase1AfterConnect |
10 |
|
AfterDisconnect = IBDatabase1AfterDisconnect |
11 |
|
BeforeDisconnect = IBDatabase1BeforeDisconnect |
46 |
|
SQL.Strings = ( |
47 |
|
'' |
48 |
|
) |
49 |
+ |
Scrollable = False |
50 |
|
Transaction = CurrentTransaction |
51 |
|
Left = 152 |
52 |
|
Top = 208 |
977 |
|
'Select A.SEC$ADMIN From SEC$USERS A' |
978 |
|
'Where SEC$USER_NAME = CURRENT_USER' |
979 |
|
) |
980 |
+ |
Scrollable = False |
981 |
|
Transaction = CurrentTransaction |
982 |
|
Left = 424 |
983 |
|
Top = 496 |