+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيف يمكن إدخال تسجيلة جديده؟ (/showthread.php?tid=7176)
كيف يمكن إدخال تسجيلة جديده؟ - ALG2009 - 29-08-2015
السلام عليكم
كما هو معروف أن عمليه الإدخال تتم عن طريق هذا الامر Insert
كود :
procedure TForm3.btn1Click(Sender: TObject);
begin
DataModule4.tbl1.Insert;
end;
endوالكود يعمل جيدا وأغلب الشروحات تكتفي بهذا الأمر للإدخال
المشكلة التي أقع فيها هو عند غلق البرنامج وفتحه اجد الحقول ليست فارغة بل مكثوب فيها أول تسجيله في الجدول وعند الكتابه عليها يتم الكتابه فوقها وافقد تلك النسجيلة
من المفروض عند الضغط على زر insert تأتي الحقول فارغه لإتخال تسجيلة جديده فلماذا دائما تتغير اول تسجيلة
وهل كل الشروحات خاظئه في شرح عملية الإدخال؟
كيف يمكن إدخال تسجيلة جديده؟ - phpbb3 - 29-08-2015
كود :
Table1.Insert;
Table1.FieldByName('FieldName').Text := 'Value';
Table1.Post;كيف يمكن إدخال تسجيلة جديده؟ - bassem_43 - 29-08-2015
وعليكم السلام
انا استعمل هده الطريقة المبين في الدرس الموجود في الرابط اسفله ولا اجد اي مشكل معها كما انها تجنبك كتابةالكثير من الاكواد
كود :
http://www.mediafire.com/download/14fx4h4ph7k9c8z/adotable_controls.rar#1كيف يمكن إدخال تسجيلة جديده؟ - ALG2009 - 29-08-2015
بارك الله فيكما وجزاكم الله خير
يبدو أن الدلفي بدأ يأخذ كل وقتي :d
كيف يمكن إدخال تسجيلة جديده؟ - ALG2009 - 29-08-2015
bassem_43 كتب :وعليكم السلام
انا استعمل هده الطريقة المبين في الدرس الموجود في الرابط اسفله ولا اجد اي مشكل معها كما انها تجنبك كتابةالكثير من الاكواد
بالتوفيقكود :http://www.mediafire.com/download/14fx4h4ph7k9c8z/adotable_controls.rar#1
يعني append وحدها لا تكفي فهي تذهب بالمؤشر إلى أخر الجدول في مكان فارغ أي آخر تعليمه
بمعنى إذا كان عندي زر به الإدخال فقط يكون الكود كالتالي
كود :
procedure TForm3.btn1Click(Sender: TObject);
begin
DataModule4.tbl1.Append
DataModule4.tbl1.Insert;
end;
endأو هكذا
كود :
[align=left][CODE]procedure TForm3.btn1Click(Sender: TObject);
begin
DataModule4.tbl1.Append
DataModule4.tbl1.post;
end;
endأظن أن كلاهما صحيح أليس كذلك مع أني أرى بأنه لا يوجد فرق بين post و Insert
كيف يمكن إدخال تسجيلة جديده؟ - ALG2009 - 29-08-2015
phpbb3 كتب :كود :Table1.Insert; Table1.FieldByName('FieldName').Text := 'Value'; Table1.Post;
أظن أنه عند غلق البرنامج وفتحه سيكتب فوق التسجيلة يبقى نفس المشكل الوقت متأخر سأجرب غدا إن شاء الله
مع أني متأكد بأنه نفس المشكلة إن لم تكت هناك append
ولكن الذي حيرني كيف جميع الشروحات تكتب Insert فقط دون Append
هل يعمل عندهم الكود ؟
كيف يمكن إدخال تسجيلة جديده؟ - phpbb3 - 29-08-2015
يا اخي قمت بعمل برنامج مخزون تجاري وجاري العمل عليه منذ سنتين
وانا استخدم Post; لارسال البيانات وتعمل بشكل ممتاز وبدون مشاكل
وسأقوم في الايام القادمه بوضع نسخه تجريبيه في هذا المنتدى ليستفيد الاعضاء الكرام