Debugger Krise

[EWeiss]

Ist eh keiner Online...

also hier die records..
Wenn da nichts ist weiss ich auch nicht mehr.

Delphi-Quellcode:

type
  TMIDINote = record
    StartTime: DWORD;    // Start time of note in ticks
    Length: Word;        // Length of note in ticks  (Length / Ticks : 1 => 1/4 note, 2 => 1/2 note...)
    NoteNo: byte;        // Note #
    Instrument: byte;
    Velocity: byte;
  end;

  TMIDIFileInfo = record
    FileSize: Int64;    { File size (bytes) }
    Format: Word;       {0: single-track, 1: multiple tracks, synchronous, 2: multiple tracks, asynchronous}
    Tracks: Word;
    TrackNames: array[1..MaxTracks] of AnsiString;
    TickUnit: Word;     {0: Ticks per quarter note, 1: Ticks per second}
    Ticks: Word;        {Ticks per quarter note or Ticks per second}
    Marker: AnsiString;
    Copyright: AnsiString;
    Channels: byte;
    PlayTime: single;
    NoteCounter: array[1..MaxChannels] of Word;     // The number of note per channel
    DrumChannel: array[1..MaxChannels] of Boolean;  // True if it's a drum channel
    MIDINotes: array[1..MaxChannels] of array of TMIDINote;  // The data of MIDI notes per channel
  end;

Bei IntA = 3 gibt er mir ne note von 60 anstelle von 65..
Und so geht es weiter.
Das kann es doch nicht sein.

gruss