e7: EDV-Opas vor! Endlich wieder Arbeit *gg*

Beitrag lesen

Hi,

OK. Also vielen dank für das Interesse erst mal. Das Programm speichert Formulardaten in Feldern mit bestimmter Zeichenlänge in Dateien.

typisch Basic, das bietet so was von Haus aus

Gerade habe ich festgestellt, wenn ich die Zahl 55555.55 auf 66666.66 ändere unterscheiden sich die beiden .Dat Dateien nur in diesen Zeichen "63C554" und "AAB965".

Kann ich nachvollziehen, das kommt hin, hier in VB:

  
Option Explicit  
Private Declare Sub CopyMemory Lib "kernel32" Alias _  
    "RtlMoveMemory" (Destination As Any, Source As _  
    Any, ByVal Length As Long)  
  
Private Sub Form_Load()  
Dim B As Byte, C As Long  
B = &H63  
CopyMemory ByVal VarPtr(C) + 0, B, 1  
B = &HC5  
CopyMemory ByVal VarPtr(C) + 1, B, 1  
B = &H54  
CopyMemory ByVal VarPtr(C) + 2, B, 1  
Me.Caption = C  
End Sub  

Hier wird für das 63C554 als Zahl deine 555555 ausgegeben

E7