Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Nutzen von Binärdaten [VB6]
Autor: VBStein
Datum: 18.08.08 11:31
Hai, du speicherst einfach die Long in eine Datei. Das repräsentiert sich als eine Zahl. Dabei kann man auch wieder Speicher sparen, wenn man die Long als Hexstring speichert, zB: &Hffaa etc. In einer Integer-Zahl sind die Bits von rechts nach links nummeriert. Das äußerste rechte Bit ist 0. Dann von rechts nach links: 2^0 = 1. Bit 2^1 = 2. Bit 2^2 = 3. Bit 2^3 = 4. Bit usw Als Beispiel speichere ich einen String, der eine Long-Integer repräsentiert, dessen 4. und 6. Bit gesetzt wurden: Dim n As LONG 'Setzen der Bits n = n OR 2^3 n = n OR 2^5 'Speichern des Werts in eine beliebige Datei (anhängen) Dim f As Integer f = FreeFile Open "MyFile.DAT" For Append As #f Print #f, n Close #f Umgekehrt: Lesen aus der Datei: Dim a As String Open "MyFile.DAT" For Binary AS #f Input #f, a Close #f n = Val(a) If (n AND 2^3) Then ...

Nutzen von Binärdaten [VB6]	936	ryg	18.08.08 09:58
Re: Nutzen von Binärdaten [VB6]	632	VBStein	18.08.08 10:37
Re: Nutzen von Binärdaten [VB6]	608	ryg	18.08.08 10:42
Re: Nutzen von Binärdaten [VB6]	658	VBStein	18.08.08 11:31
Re: Nutzen von Binärdaten [VB6]	758	icetea123	18.08.08 14:11
Re: Nutzen von Binärdaten [VB6]	632	VBStein	18.08.08 18:23
Re: Nutzen von Binärdaten [VB6]	582	icetea123	18.08.08 19:19

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