159 |
|
FHiddenPassword: string; |
160 |
|
FIBLoaded: Boolean; |
161 |
|
FOnLogin: TIBDatabaseLoginEvent; |
162 |
+ |
FSQLHourGlass: Boolean; |
163 |
|
FTraceFlags: TTraceFlags; |
164 |
|
FDBSQLDialect: Integer; |
165 |
|
FSQLDialect: Integer; |
263 |
|
write SetDefaultTransaction; |
264 |
|
property IdleTimer: Integer read GetIdleTimer write SetIdleTimer; |
265 |
|
property SQLDialect : Integer read GetSQLDialect write SetSQLDialect default 3; |
266 |
+ |
property SQLHourGlass: Boolean read FSQLHourGlass write FSQLHourGlass default true; |
267 |
|
property DBSQLDialect : Integer read FDBSQLDialect; |
268 |
|
property TraceFlags: TTraceFlags read FTraceFlags write FTraceFlags; |
269 |
|
property AfterConnect; |
452 |
|
FTransactions := TList.Create; |
453 |
|
FDBName := ''; |
454 |
|
FDBParams := TStringList.Create; |
455 |
+ |
FSQLHourGlass := true; |
456 |
|
{$ifdef UNIX} |
457 |
|
if csDesigning in ComponentState then |
458 |
|
FDBParams.Add('lc_ctype=UTF-8'); |