# | Line 110 | Line 110 | begin | |
---|---|---|
110 | ByName('BlobData2').AsBlob := Attachment.CreateBlob(Transaction,'TestData','BlobData').SetString('Some German Special Characters like ÖÄÜöäüß'); | |
111 | ByName('InClear').AsString := #$01'Test'#$0D#$C3; | |
112 | end; | |
113 | + | writeln(Outfile,'Show Param Values'); |
114 | + | ParamInfo(Statement.SQLParams); |
115 | Statement.Execute; | |
116 | end; | |
117 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |