wenn du "left :=" oder "top :=" aufrufst wird intern nix anderes gemacht als "Setbounds" aufgerufen.
Das heißt bei dir wird intern 2 mal setbounds aufgerufen. Ändere es am besten so ab
Delphi-Quellcode:
if Sender is TmrPRLabel then
begin
if Maus and (((Sender as TmrPRLabel).Top <> x) or ((Sender as TmrPRLabel).Left <> y)) then
begin
(Sender as TmrPRLabel).SetBounds(x,y,(Sender as TmrPRLabel).width, (Sender as TmrPRLabel).height);
end;
end;