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 315 by tony, Thu Feb 25 11:56:36 2021 UTC vs.
Revision 341 by tony, Wed Jul 7 13:11:53 2021 UTC

# Line 109 | Line 109 | begin
109      ByName('BlobData').AsString := 'Some German Special Characters like ÖÄÜöäüß';
110      ByName('BlobData2').AsBlob := Attachment.CreateBlob(Transaction,'TestData','BlobData').SetString('Some German Special Characters like ÖÄÜöäüß');
111      ByName('InClear').AsString := #$01'Test'#$0D#$C3;
112    ByName('FixedWidth').AsString := 'É';
112    end;
113    Statement.Execute;
114   end;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines