dann eher so:
Delphi-Quellcode:
procedure TForm1.ListBox1MouseMove...;
begin
if ActiveControl <> ListBox1 then
LastFocus := ActiveControl;
end;
denn bis ListBox1MouseUp aufgerufen wurde, hatte sich vorher mal die Maus über der ListBox befunden/bewegt und LastFocus wäre demnach ListBox1