Sobre el uso del
casting o
moldeado de tipos sucede que no es una operación tan rápida de ejecutar, así que si vas a hacer varias operaciones con ese objeto moleado, es mejor utilizar el
with, tal como dices:
with (sender as tform1).Canvas do
begin
MoveTo (3, 3);
LineTo (8, 9);
Rectangle ( ...);
...
end;
Otra forma de
moldear tipos es así:
with TForm1(sender) do ...
y para asegurarte siempre de que no metes la pata y que el objeto que moldeas es realmente de dicho tipo, puedes utilizar el operador
is:
Código:
if Sender is TForm then
with (Sender as TForm1) do ...