Registriert seit: 27. Nov 2005
Ort: Geldern
229 Beiträge
Delphi 7 Enterprise
|
Re: Speicherleck ?
29. Dez 2005, 12:15
Zitat von jim_raynor:
MMh. Vielleicht solltest du den alten Channel auch wieder freigeben. Da gabs auch irgendeine BASS-Funktion für, aber da ich keine Anleitung zur Hand habe, weiss ich nicht welche das ist Musst einfach mal schauen.
Jepp, genau das war es:
Delphi-Quellcode:
procedure Tmediaplayer_frm.media_scroll_txt_run;
begin
begin
Channel := Bass_StreamCreateFile(false, PChar(playlist.Strings[currentsong]), 0, 0, Bass_Stream_Decode);
media_scroll_txt.Speed:= 20;
Lauftext:= TAGS_Read(channel, '%ARTI'+ ' ---- '+'%TITL');
Application.ProcessMessages;
media_scroll_txt.Text:=(Lauftext);
BASS_StreamFree(Channel);
end;
end;
Jetzt klappts auch mit der "Nachbarin" !
|
|
Zitat
|