ViewVC Help
View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing
root/public/ibx/branches/udr/testsuite/Test12.pas
(Generate patch)

Comparing ibx/branches/udr/testsuite/Test12.pas (file contents):
Revision 395 by tony, Mon Jan 10 10:08:03 2022 UTC vs.
Revision 396 by tony, Thu Feb 17 11:57:23 2022 UTC

# Line 155 | Line 155 | begin
155    DPB := FirebirdAPI.AllocateDPB;
156    DPB.Add(isc_dpb_user_name).setAsString(Owner.GetUserName);
157    DPB.Add(isc_dpb_password).setAsString(Owner.GetPassword);
158  DPB.Add(isc_dpb_set_db_SQL_dialect).setAsByte(SQLDialect);
158    Attachment := FirebirdAPI.OpenDatabase(Owner.GetNewDatabaseName,DPB);
159    QueryDatabase(Attachment);
160    Attachment.Disconnect;
# Line 166 | Line 165 | begin
165    DPB.Add(isc_dpb_user_name).setAsString(Owner.GetUserName);
166    DPB.Add(isc_dpb_password).setAsString(Owner.GetPassword);
167    DPB.Add(isc_dpb_lc_ctype).setAsString('WIN1252');
169  DPB.Add(isc_dpb_set_db_SQL_dialect).setAsByte(SQLDialect);
168    Attachment := FirebirdAPI.OpenDatabase(Owner.GetNewDatabaseName,DPB);
169    QueryDatabase(Attachment);
170  

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines