اريد عمل updat لكمية السلعة المخزنة عند القيام بعملية بيع .برنامج دلفي تسيير مخزن !

[hamza101110]

السلام عليكم 
عندي مشكلة و ما عرفت كيف احلها 
انا الان اعمل على برنامج صغير لتسيير مخزن .
قمت بانشاء قاعدة بيانات اكسس و ربطتها مع الدلفي 
عندي جدول خاص بالمخزن يحتوي على (رقم السلعة - اسم السلعة - الكمية المخزنة - السعر).
الجدول الثاني يحتوي على الفاتورة   (رقم الفاتورة -تاريخ الفاتورة -واسم العميل - و رقم السلعة - و الكمية المباعة) .وكل فاتورة بها سلع معينة راح تخرج من المخزن .
اريد ان احدث كمية السلعة المتواجدة في المخزن يعني كلما اقوم بعملية بيع اعود لجدول المخزن اجد الكمية نقصت .
كيف اربط الكمية بين المخزنة في المخزن و الكمية المباعة في الفاتورة ,  
مثلا كمية السلعة 1 .في المخزن هي 50 . انا قمت بعملية بيع و وضعت الكمية 20 .عندما اعود للمخزن اجدها نفقصت و اصبحت 30.
يمكن باستعلام sql و update او مش عارف المهم هل من افكار او حلول ..
وشكرااا 
[img][/img][img=500x500][/img]

[onexite]

الكمية متعلقة بفواتير الدخول والخروج
الكمية الحالية = مجموع فواتير الدخول للمادة - مجموع فواتير الخروج لهذه المادة

[لؤي]

السلام عليكم
مثال توضيحي:

كود :

// open the table ADOTable1.Open;  // Mode = dsBrowse // Enter in Edit mode ADOTable1.Edit;   //Mode = dsEdit // Change field values ADOTAble1.FieldByName('Qut').AsInteger := ADOTAble1.FieldByName('Qut').AsInteger-20; ... // Try to save try  ADOTable1.Post; except  // Capture the error  // Show Message  //... end;

[محمد عبد العزيز]

http://delphi4arab.net/forum/showthread.php?tid=2230