السلام عليم
لغة البرمجة = دلفي 7
قاعدة البيانات =paradox
لدي جدول اسمه Client به code_c,Nom,prenom,age
code_c=index alphbetique
في الطباعة كتبت
كود :
Form2.Query1.SQL.Clear;
Form2.Query1.SQL.Add('select *');
Form2.Query1.SQL.Add('from Client');
Form2.Query1.SQL.Add('where Client.Code_c='+ edit1.text);
Form2.Query1.Active:=true;
Form2.QuickRep1.Preview;
إذا كان code_c=numerique
تنجح العملية
لكن إذاكان code_c=alphanemerique
لا تنجح العملية
بارك الله فيكم
وعليكم السلام و رحمة الله
جرب
كود :
Form2.Query1.SQL.Add('where Client.Code_c='''+ edit1.text+'');
بالتوفيق
السلام عليكم
أنا أنصحك بإستعمال les parametre
كود :
form2.query1.close
form2.query1.sql.clear
form2.query1.sql.add('select * from client whre code_c=:code_c')
form2.query1.parambyname('code_c').value:=edit1.text
form2.query1.open;
form2.quickrep1.preview
بالتوفيق أمنى أن أكون قد أفدتك
السلام عليكم
بارك الله فيكم
جربت نفس الشئ لم تنجح
[COLOR="black"]السلام عليكم
جرب Filter و Filtered زمن التشغيل لاكتشاف موضع الخلل
بالتوفيق.[/COLOR]
kimou23 كتب :السلام عليكم
أنا أنصحك بإستعمال les parametre
كود :
form2.query1.close
form2.query1.sql.clear
form2.query1.sql.add('select * from client where code_c=:code_c')
form2.query1.parambyname('code_c').value:=edit1.text
form2.query1.open;
form2.quickrep1.preview
بالتوفيق أمنى أن أكون قد أفدتك
بارك الله فيكم لقد نجح الكود
السلام عليكم
أضفت للجدول client
date_vente
عندما يشتري الزبون اليوم شئ ما (27/03/2012)
علما أنه اشترى أمس وأول أمس ...........
في الطباعة حبيت اطبع مااشتراه فقط اليوم أو ماشتراه الأمس فقط
يعني الطباعة مرتبطة (ِcode_c,date_vente)
استعملت الكود التالي
كود :
form2.query1.close
form2.query1.sql.clear
form2.query1.sql.add('select * from client where code_c=:code_c and date_vent=:date_vent')
form2.query1.parambyname('code_c').value:=edit1.text
form2.query1.parambyname('date_vente').value:=datetimepicker1.date;
form2.query1.open;
form2.quickrep1.preview
بارك الله فيكم
شكرا وبارك الله فيكم على المعلومات القيمة