String aus BLOb "extrahieren"

[freakTAB]

Nach langer Zeit hab ich wieder ein Problem :

Ich habe zwei unterschiedliche Records in BLOb Felder abgespeichert, die per Stream ausgelesen werden können.
In diesen Strukturen existiert je ein String, nur liegen die an unterschiedlich Stellen (also Offsets) im jeweiligen Record.

Ich möchte nun eine Funktion programmieren welche beide Strings auslesen kann, je nach Parameterübergabe - Achtung! ich setze hierfür Delphi 4 ein.

Wären die beiden Strings an gleicher Stelle hätte ich schon nen Ansatz, aber so?

Vielen Dank im Vorraus.

[freakTAB]

Problem gelöst : mit TStream.Seek(Offset,Startpunkt) kommt man an jede beliebe Stelle im Blob, muss jetzt nur den Offset jedesmal angeben (ausrechnen)