Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: The LargeSeekPointer Class 3.
Autor: VBStein
Datum: 15.09.08 18:02
Diese Klasse verwaltet also öffnen und schließen einer beliebigen Datei und verwaltet deren Dateizeiger (LargeSeekPointer), der hier 64Bit-breit ausgelegt ist. Diese Datei kann demnach sehr sehr viel größer sein, als es VB bisher zu verwalten vermag. Der Dateizeiger kennt dabei allerdings im Gegensatz zum VB-Dateizeiger keine festeingestellte Richtung; er kann beliebig positioniert und Bytes somit an beliebiger Stelle in großer Anzahl ablock ausgelesen werden. Die Anzahl der auszulesenden Bytes ist aber wieder in 32Bit-Integer organisiert um VB verdaulich zu sein. Die Klasse ist nicht threadsafe, da normalerweise das Verschieben des Dateizeigers via Mutex oder zumindest einer Critical Section gesichert werden müsste. Braucht man nicht, da hFile hier ja nur in einer Instanz einer Klasse verwendet wird. Die Klasse kann aber trotzdem mehrfach instantiiert werden! Sogar auf die gleiche Datei mit den Shareflags. Es entsteht dabei ein völlig neuer Filehandle. Die Klasse teilt einem Konsumer vier Events mit: Wann eine Datei korrekt geöffnet werden konnte, wann eine Datei geschlossen wird, bevor der LargeSeekPointer bewegt wird und wenn der LargeSeekPointer bewegt wurde. Hierbei können dann über LGET(n) oder auch SeekAndGet(von, bis, n) direkt Daten ausgelesen werden. Die Klasse prüft nicht auf Dateiende! Es können auch Daten nach Dateiende gelesen werden. Damit der Anwender das weiß, teilt die Klasse die Länge der Datei in einem 64Bit-Wert (LoLong und HiLong) mit. Das Verwenden der Klasse ist easy: Man deklariert eine Objektvariable. Man kopiert den Code einfach in ein neues Klassenmodul und nennt das Modul: clsLargeSeekPtr Private cF As clsLargeSeekPtr Im Code: Set cF = New clsLargeSeekPtr Dann ruft man die Methode: FileOpen auf: cF.FileOpen "C:\MyText.txt", OpenExist jetzt wird ein Event ausgelöst und man erhält in cF.FileHandle einen Wert größer als -1. Dieses Handle ist der WinAPI-Filehandle, nicht verwechseln mit FreeFile! Der Handle kann auch für andere WinAPI-Operationen verwendet werden - sollte aber von der Klasse wieder terminiert werden können. Und schon kann man lesen. Von der ersten Bytepos der Datei an: s = cF.LGET(1000) ' die ersten tausend Bytes. Oder man setzt gleich den Filepointer auf einen Bereich jenseits der Zugriffsmöglichkeiten von VB: cF.LSeek &H1, &H3 'dreifach über dem, was eine Long-Integer hergeben könnte. Und lesen dann wieder 1000 Bytes: s = cF.LGET(1000) - oder in einem Rutsch: s = SeekAndGet(&H1, &H3, 1000) Bei LSeek und SeekAndGet werden Events vor und danach ausgelöst und man erhält den aktuellen Wert des LargeSeekPointers vor und danach. Die Klasse arbeitet mit den WinAPI's sehr sehr schnell. Die restlichen Eigenschafte sind eigentlich selbstredend. Sie teilen etwas über die gerade geöffnete Datei mit.

Sehr grosses Textfile lesen	1.826	tinzu	08.09.08 19:01
Re: Sehr grosses Textfile lesen	1.207	VBStein	08.09.08 19:10
Re: Sehr grosses Textfile lesen	1.206	tinzu	08.09.08 19:16
Re: Sehr grosses Textfile lesen	1.178	icetea123	08.09.08 19:20
Re: Sehr grosses Textfile lesen	1.188	VBStein	08.09.08 20:01
Re: Sehr grosses Textfile lesen	1.144	tinzu	08.09.08 20:31
Re: Sehr grosses Textfile lesen	1.163	VBStein	08.09.08 20:52
Re: Sehr grosses Textfile lesen	1.245	effeff	09.09.08 10:02
Re: Sehr grosses Textfile lesen	1.161	VBStein	09.09.08 23:06
Re: Sehr grosses Textfile lesen	1.162	effeff	10.09.08 09:26
Re: Sehr grosses Textfile lesen	1.109	tinzu	10.09.08 17:12
Re: Sehr grosses Textfile lesen	1.107	VBStein	10.09.08 18:30
Re: Sehr grosses Textfile lesen	1.095	VBStein	10.09.08 20:09
Re: Sehr grosses Textfile lesen	1.135	tinzu	10.09.08 20:24
Re: Sehr grosses Textfile lesen	1.113	VBStein	10.09.08 20:38
Re: Sehr grosses Textfile lesen	1.109	tinzu	10.09.08 20:55
Re: Sehr grosses Textfile lesen	1.089	TheNukeduke	13.09.08 12:16
Re: Sehr grosses Textfile lesen	1.084	tinzu	14.09.08 19:22
Re: Sehr grosses Textfile lesen	1.046	VBStein	14.09.08 22:33
The LargeSeekPointer Class	1.130	VBStein	15.09.08 18:01
Re: The LargeSeekPointer Class 2.	1.121	VBStein	15.09.08 18:02
Re: The LargeSeekPointer Class 3.	1.202	VBStein	15.09.08 18:02
Re: The LargeSeekPointer Class 3.	1.057	tinzu	16.09.08 21:50
Re: The LargeSeekPointer Class 3.	1.073	VBStein	17.09.08 19:28
Re: The LargeSeekPointer Class 3.	1.051	tinzu	17.09.08 20:23
Re: The LargeSeekPointer Class 3.	1.071	VBStein	17.09.08 21:25
Re: The LargeSeekPointer Class 3.	1.040	tinzu	18.09.08 21:06
Re: The LargeSeekPointer Class 3.	1.107	VBStein	18.09.08 21:39
Re: The LargeSeekPointer Class 3.	1.097	tinzu	18.09.08 22:25
Re: The LargeSeekPointer Class 3.	1.102	tinzu	23.09.08 18:23
Re: The LargeSeekPointer Class 3.	1.093	tinzu	23.09.08 18:34
Re: The LargeSeekPointer Class 3.	1.007	VBStein	23.09.08 19:07
Re: Sehr grosses Textfile lesen	1.131	tinzu	23.09.08 18:33

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen