برنامج بسيط لادارة المخزون للادارات العمومية

[onexite]

السلام عليكم

لم اقم بفحص شامل للبرنامج ، سوى نظرة سطحية

اظهار القيم مالية لسهولة قرائتها


سأراسلك على الخاص يوجد خطأ برمجي

  تم اصلاح الخطا الكارثي الاول
ولو تكرمت وافني بباقي الاخطاء
شكرا مجداا

---

انشا الفورم عند الحاجة له فقط و اقوم بنحريره عند الانتهاء

---

هل ممكن مثال على ذلك.

حذف انشاء الفورم من Project1.dpr

PHP كود :

Application.CreateForm(TForm9, Form9); 


استدعاء الفورم

PHP كود :

if not Assigned(Form9) then
    Application.CreateForm(TForm9, Form9);
  form9.Show; 


وبعدها تحرير الفورم

PHP كود :

procedure TForm9.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Action := caFree;
end;

procedure TForm9.FormDestroy(Sender: TObject);
begin
  Form9 := nil;
end;