El uso del
with, gusto los colores, por que alguno no le guste usar el
with o le resulte complicado su uso, no es para eliminarlo, en mis proyectos uso el
with en todo y, nunca he tenido ningún problema referente a el, incluso con el debug, eje.
Código Delphi
[-]...
begin
with TfrmClientes.Create(Self) do
begin
ShowModal;
Free;
end;
end;
Otro:
Código Delphi
[-]...
var
frmC: TfrmClientes;
begin
frmC := TfrmClientes.Create(Self);
with frmC do
ShowModal;
FreeAndNil(frmC);
end;
Otro mas:
Código Delphi
[-]...
begin
with Edit1, Label1 do
Text := Caption;
end;
Si no sabes como utilizar el
with o te confunde, pues, evita su uso, es una herramienta bastante util al menos para mí, no veo que se deba suprimir, si lo que se pretende es evolucionar su sintaxis, estoy totalmente de acuerdo, añadir
with as ?? y el
?? sea el objeto, perfecto, pero de ahí a quitarlo, no veo ningún avance sino un perjuicio, si hacemos lo mismo con este último ej. seria asi.
Código Delphi
[-]...
begin
with Edit1 as E1, Label1 as L1 do
begin
E1.Font.Color := clBlue;
L1.Font.Color := clRed;
E1.Text := L1.Caption;
end;
end;
En este caso puedo hacer dentro del mismo
with as ??, poner el color en ambos objetos, sin el uso de
with as ??, sólo seria para el Label1, ya que es el último objeto que ha entrado en el
with y, como ambos tienen el
Font, la prioridad es del
Label1.
Código Delphi
[-]...
begin
with Edit1, Label1 do
begin
Font.Color := clRed;
Text := Caption;
end;
end;
de lo contrario tendria que hacer dos
with, eje.
Código Delphi
[-]...
begin
with Edit1 do
begin
Font.Color := clBlue;
with Label1 do
begin
Font.Color := clRed;
Text := Caption;
end;
end;
end;
Que esto es confuso, según para quién, el que esta acostumbrado a utilizarlo, no veo ninguna confusión en el.
Si el
with as ?? evoluciona de esta manera, perfecto, pero que no sea obligatorio usar el
with as ?? y que se pueda utilizar como uno quiera,
with sólo o con
with as ??.
Un saludo.
p.d.: Espero haber contribuido a la no expulsión del
with y si a su evolución.