Delphi, Update2 foi lançado, vá rápido!
erro:
O código é o seguinte:
Procedimento TForm1.Button1Click(Remetente: TObject);
var
strings:TStringList;
começar
se não for atribuído (strings), então
começar
strings :=TStringList.Create;
// ShowMessage('sfdasfd'); Se você adicionar esta ou aquela frase, não terá problema, caso contrário, haha.
fim;
strings.free;
cadeias de caracteres := nulo;
fim;