Cita:
Empezado por Al González
Con las variables in-line, nos encaminamos a una políticamente sana extinción del With:
Código Delphi [-] Var OKButton := GetMySpecialForm.FindComponent ('btnOK');
If OKButton <> Nil Then
Begin
TButton (OKButton).Click;
OKButton.Enabled := System.False;
End;
End;
En todo caso, podríamos incluir una nueva palabra reservada de uso similar (pero seguro) al del With, como por ejemplo Using:
Código Delphi [-] Using GetMySpecialForm.FindComponent ('btnOK') Do
If It <> Nil Then Begin
TButton (It).Click;
It.Enabled := System.False;
End;
End;
Un abrazo propuesto.
Al González.
|
De acuerdo con esta, una variante mejorada (creo yo) al "Ditto mark" que proponias en otros foros...