Delphi und meine wenigkeit mögen sich bald nicht mehr.
Wie aknn es sein das ein wert von 0 ausgegeben wird obwohl ersichtlich
dieser einen von 62 hat ?
Delphi-Quellcode:
if FileInfo.MIDINotes[IntI, byte(FileInfo.MIDINotes[IntA])].NoteNo = 0 then
Grid[IntI - 1, IntA] := -1;
IntI = 1 und IntA = 0
Result:= 60; // Richtig
IntI = 1 und IntA = 1
Result:= 0 ???
Man kann sehr deutlich sehen das hier der wert 62 steht.
Wichtig!
Auf das angehängte Bild schauen.
gruss