'with do' question

[laggyluk]

Is there a way to do that? :

with TLabel.create(nil) do begin
  ...
  someList.Add(this TLabel?);
end;

other than of course

L:=tlabel.create
with L do begin
  ...
  someList.Add(L)
end