TMIDIPlayerComp

[EWeiss]

Die aktuelle Textposition ermittle ich (OpenGL) über das Elapsed Event also zu welcher zeit der Text geschrieben wird.
Die Procedure

procedure TForm1.MidiPlayerGotLyrics(Track: Integer; Event: PMidiEvent);

liefert mir den korrekten String zurück ein zusätzliches addieren in einer TList innerhalb der Mainform
wäre also in dem Fall doppelt gemoppelt da der Komplette text vorher schon in einer TList addiert wird.

Bei OpenGL habe ich kein problem den Text auszugeben (finden) da er wie schon gesagt über Elapsed ermittelt wird.
Hingegen im Memo/Richedit finde ich einfach nicht den Ansatz wie ich das hier realisieren soll.

gruss