7. Oktober 2010 10:34
blobTbl.Artikelnr := 'asdtest';
blobTbl.Blobfeld.IMPORT('C:\test\c.xml');
IF blobTbl.INSERT() THEN MESSAGE('Insert funzt!');
Instream := OutStream;
7. Oktober 2010 22:35
8. Oktober 2010 08:57
//INSERT TO BLOB
FileFile.OPEN('C:\test\c.xml');
FileFile.CREATEINSTREAM(FileInStream);
blobTbl.Artikelnr := 'asdtest';
blobTbl.Blobfeld.CREATEOUTSTREAM(BlobOutStream);
COPYSTREAM(BlobOutStream, FileInStream);
blobTbl.INSERT();
//INSERT TO XML
FileFile.CREATE('C:\Users\x.x\Desktop\test\ctest.xml');
FileFile.CREATEOUTSTREAM(FileOutStream);
IF blobTbl.FIND('-') THEN MESSAGE('FINDFIRST FUNZT!');
blobTbl.Blobfeld.CREATEINSTREAM(BlobInStream);
IF COPYSTREAM(FileOutStream, BlobInStream) THEN MESSAGE('Copy Stream funzt');
FileFile.CLOSE;
8. Oktober 2010 10:04
8. Oktober 2010 11:03
8. Oktober 2010 13:38
8. Oktober 2010 13:53
8. Oktober 2010 21:40