Notenlängen berechnung

[EWeiss]

Zitat von DeddyH:

Emil, das hat er schon, schau mal einen Post höher

Jup war schneller als ich schreiben konnte.
Ich denke er spricht vom Block "Zeit Signatur"

kann nur hiermit dienen..

Delphi-Quellcode:

  // Zeit Signatur
  Bytes[30] := 0;   // delta Zeit
  Bytes[31] := 255; // FF (Meta Befehl)
  Bytes[32] := 88;  // Zeit Signatur Befehl
  Bytes[33] := 4;   // 4 bytes
  Bytes[34] := 4;   // Zähler
  // Nenner (2 = 1/4, 3 = 1/8, 4 = 1/16, etc.)
  Bytes[35] := SmallNoteData[SmallNDSelected].Nenner;
  Bytes[36] := 24;  // ?
  // 8 = 32 Note in 1/4 Note;
  Bytes[37] := SmallNoteData[SmallNDSelected].Value;

Aber das ist mein Schreiber muss mal sehn wo ich die bytes im Reader abrufen kann.
müßten dann die ersten 4 bytes sein.
Werd ich dann in meinem Writer auch noch addieren müssen.
War ja vorher alles fest auf 4/4 ausgelegt.

gruss