Zitat von
himitsu:
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
Bin mir jetzt auch nicht sicher, aber wenn MouseMove Eintritt, hat in diesem Moment doch ein anderes Steuerelement den Focus. Dieses wird in LastFocus gespeichert un nach MouseUp wieder übergeben.
Ok, vielleicht ist ja auch falsch.