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

Comparing ibx/trunk/fbintf/testsuite/Test12.pas (file contents):
Revision 401 by tony, Mon Jan 10 10:13:17 2022 UTC vs.
Revision 402 by tony, Mon Aug 1 10:07:24 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