Unterschied zwischen Cast bei verschieben von Komponente zur Laufzeit

[RedOne]

Hallo miteinander

Einen kürzeren Titel für diesen Beitrag ist mir nicht eingefallen...
Ich habe zwei verschiedene Verhaltensweisen für den von mir aus gleichen Code... könnt ihr mir den Unterschied erklären?

Ich verschiebe den Code anhand dieses Beispieles:
http://www.swissdelphicenter.ch/de/showcode.php?id=429

Die Prozedur sieht halboriginal folgend aus (ich verschiebe ein Control nur auf der Y-Achse):

Delphi-Quellcode:

procedure ControlMouseMove(Sender: TObject; Shift: TShiftState; X,Y: Integer);
begin
  if FDragging then begin
    with Sender as TControl do
    begin
      Top  := Y - FDownY + Top;
    end;
  end;
end;

Funktioniert einwandfrei. Nun habe ich die "with"-Verschachtelung entfernt, da mir diese grundsätzlich unsymphatisch sind

Delphi-Quellcode:

procedure ControlMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
var
  ct: TControl;
begin
  if FDragging then begin
    ct:= Sender as TControl;
    ct.Top:= Y - FDownY + Top;
    // --ODER--
    TControl( Sender ).Top:= Y - FDownY + Top;
  end;
end;

Das Ergebnis: Verschiebe ich das Control wird es während dem verschieben nicht oder nur flackernd angezeigt und ist am schluss an einem anderen Ort als es sein sollte...

Worin liegt hier der unterschied zwischen dem "with-cast" und den anderen beiden?

Vielen Dank!
RedOne