Delphi, la mise à jour 2 est sortie, allez-y vite !
bogue:
Le code est le suivant :
PRécédure TForm1.Button1Click(Expéditeur : TObject);
var
chaînes :TStringList;
commencer
si ce n'est pas attribué (chaînes), alors
commencer
chaînes :=TStringList.Create;
// ShowMessage('sfdasfd'); Si vous ajoutez telle ou telle phrase, il n'y aura pas de problème, sinon, haha.
fin;
strings.free;
chaînes := nul;
fin;