علة كبيرة في دلفي

دلفي، Update2 خارج، اذهب بسرعة!

حشرة:

الرمز هو كما يلي:

الإجراء TForm1.Button1Click(Sender: TObject);

فار

سلاسل :TStringList؛

يبدأ

إذا لم يتم تعيينه (سلاسل) ثم

يبدأ

السلاسل :=TSTringList.Create;

// ShowMessage('sfdasfd'); إذا أضفت هذه الجملة أو تلك فلن تكون هناك مشكلة، وإلا هاها.

نهاية؛

strings.free;

السلاسل := لا شيء؛

نهاية؛