| # | 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 | + | writeln(Outfile,'Show Param Values'); |
| 114 | + | ParamInfo(Statement.SQLParams); |
| 115 | Statement.Execute; | |
| 116 | end; | |
| 117 | ||
| # | Line 0 | Line 1 | |
|---|---|---|
| 1 | + | native |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |