synchronisation via message und bass?

[arnold mueller]

Wusste gar nicht, dass die bass.dll jetzt auch Messages verschickt. Bin aber in Sachen Bass schon länger nicht mehr auf dem Laufenden.

Ich würde es heute so machen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  hs := BASS_ChannelSetSync(sh, BASS_SYNC_END, 0, CallbackChannelSync, Cardinal(self)); 
end;

procedure CallbackChannelSync(handle: HSYNC; channel, data, user: DWORD); stdcall;
var Form1: TForm1;
begin
  Form1 := TForm1(user);
  Form1.SendMessage(Form1.Handle,WM_BASS_EOF,0);
end;

VG
Arno