Hallo,
evt so
Delphi-Quellcode:
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
Label1.SetBounds(X+15,Y+15,Label1.Width,Label1.Height);
end;
Wenn Du jetzt aber mit der Maus über ein Control fährst kommt das Label nicht nach.