السلام عليكم
if edit1.Text <>'' then
begin
. adotable2.filter := 'nom like '+ quotedstr(edit1.Text+ '*');
. adotable2.filtered := true;
end
else
.adotable2.Filtered := false;
اين يتم التعديل اذا كان نوع الحقل رقمي وليس text
(11-04-2022, 06:08 PM)larbiparadox كتب : [ -> ] (11-04-2022, 03:55 PM)tahar1983 كتب : [ -> ]السلام عليكم
if edit1.Text <>'' then
begin
. adotable2.filter := 'nom like '+ quotedstr(edit1.Text+ '*');
. adotable2.filtered := true;
end
else
.adotable2.Filtered := false;
اين يتم التعديل اذا كان نوع الحقل رقمي وليس text
وعليك السلام
غير like بـ =
وحذف +'*'
if edit3.Text <>'' then
begin
. adotable1.filter := 'iddbas = '+ quotedstr(edit3.Text')
form1. adotable1.filtered := true;
end
else
.adotable1.Filtered := false;
لم يعمل الكود
if edit3.Text <>'' then
begin
. adotable1.filter := 'iddbas = '+ quotedstr(edit3.Text')
form1. adotable1.filtered := true;
end
else
.adotable1.Filtered := false;
(11-04-2022, 06:44 PM)tahar1983 كتب : [ -> ] (11-04-2022, 06:08 PM)larbiparadox كتب : [ -> ] (11-04-2022, 03:55 PM)tahar1983 كتب : [ -> ]السلام عليكم
if edit1.Text <>'' then
begin
. adotable2.filter := 'nom like '+ quotedstr(edit1.Text+ '*');
. adotable2.filtered := true;
end
else
.adotable2.Filtered := false;
اين يتم التعديل اذا كان نوع الحقل رقمي وليس text
وعليك السلام
غير like بـ =
وحذف +'*'
if edit3.Text <>'' then
begin
. adotable1.filter := 'iddbas = '+ quotedstr(edit3.Text')
form1. adotable1.filtered := true;
end
else
.adotable1.Filtered := false;
لم يعمل الكود
if edit3.Text <>'' then
begin
. adotable1.filter := 'iddbas = '+ quotedstr(edit3.Text')
form1. adotable1.filtered := true;
end
else
.adotable1.Filtered := false;
[
attachment=4632]
لا أعلم هذه أخطاء أو تنسيق النص فقط
يرجى وضع مثال بسيط ليتم تصحيحه
لاحاجة ل quotedstr مع الارقام و ان كنت تريد مجال فاستعمل < او ¨>,,
كود :
adotable2.filter := 'nom = '+ edit1.Text
السلام عليكم
إضافة لما ذكره الأخ larbiparadox
للحقل الرقمي قم بحذف quotedstr
---
Ndagor لم أرى ردك
(11-04-2022, 10:55 PM)Lam.Abdeldjalil كتب : [ -> ]السلام عليكم
إضافة لما ذكره الأخ larbiparadox
للحقل الرقمي قم بحذف quotedstr
---
Ndagor لم أرى ردك
ممكن ارفقاق مثال لان التعديل لم ينجح
لقد نجح الامر
شكرا جزيلا لكم
ودمت في خدمة المبتدئين