SQLITE und PACK Problem
Verfasst: 08.12.2012 20:19
Hallo zusammen.
Ich habe ein Problem, wenn ich Text mit PB packe und dann in SQLITE Datenbank in ein BLOB Feld speicher, wird beim
Auslesen des Textes nur der Anfang verstümmelt:
Orginal: Es werden alle....
Nach dem Auslesen: Ä ùþùn alle....
der Text wird auch 2 Byte grösser!
Eigentlich kann man da nicht viel falsch machen!
Vielleicht hat ja jemand einen Tipp für mich.
Reinhard
Ich habe ein Problem, wenn ich Text mit PB packe und dann in SQLITE Datenbank in ein BLOB Feld speicher, wird beim
Auslesen des Textes nur der Anfang verstümmelt:
Orginal: Es werden alle....
Nach dem Auslesen: Ä ùþùn alle....
der Text wird auch 2 Byte grösser!
Code: Alles auswählen
size = DatabaseColumnSize(0, 171)
If size > 0
*mem = AllocateMemory(size)
If *mem
If GetDatabaseBlob(0, 171, *mem, size)
If CreateFile(1, "LOGTEMP.PACK")
WriteData(1, *mem, size)
CloseFile(1)
FreeMemory(*mem)
OpenPack("LOGTEMP.PACK")
*mem = NextPackFile()
size = PackFileSize()
ClosePack()
CreateFile(1, "LOGTEMP"+Str(daten)+".DAT")
WriteData(1, *mem, size)
CloseFile(1)
Vielleicht hat ja jemand einen Tipp für mich.
Reinhard