Delphi, la Actualización 2 ya está disponible, ¡ve rápido!
bicho:
El código es el siguiente:
Procedimiento TForm1.Button1Click(Remitente: TObject);
var
cadenas: TStringList;
comenzar
si no está asignado (cadenas), entonces
comenzar
cadenas :=TStringList.Create;
// ShowMessage('sfdasfd'); Si agregas esta o aquella frase, no habrá problema, de lo contrario, jaja.
fin;
cadenas.libres;
cadenas: = nulo;
fin;