| احمد العراقي معلومات المنتدى |
| إنضم إلينا : |
28-10-2016 |
| آخر زيارة |
30-01-2026, 01:41 PM |
| إجمالي المشاركات : |
51 (0.01 مشاركات في اليوم الواحد | 0.1 في المئة من إجمالي المشاركات)
(إيجاد مشاركات العضو)
|
| اجمالي المواضيع : |
26 (0.01 مواضيع في اليوم | 0.25 في المئه من اجمالي المواضيع)
(إيجاد مواضيع العضو)
|
| فترة البقاء متصل : |
2 أيام, 8 ساعات, 14 دقائق |
| الأعضاء المحالين: |
1
|
|
1 (0 0.01 per day | 12874 percent of total 0.01)
( — )
|
|
18 (0.01 0.14 per day | 12906 percent of total 0.14)
( — )
|
|
|
|
|
|
|
| RE: التصفية حسب التحديد في dbgrid |
01-03-2020, 06:59 PM |
1 |
|
|
| التصفية حسب التحديد في dbgrid |
منتديات دلفي للعرب التعليمية
سؤال و جواب حول دلفي
|
|
|
S.FATEH كتب : (01-03-2020, 04:36 PM)
--
السلام عليكم
عدل عليها بما يناسبك
dmt.client هي الـ DataSet الخاصة بك.
dbgClients هي DBGrid الخاصة بك.
PHP كود :
--
procedure TfrmListClient.ToolButton1Click(Sender: TObject);
var
I: Integer;
FilterStr, FieldName: string;
begin
FieldName := dmt.Client.Fields[0].FieldName;
FilterStr := FieldName + ' = -1';
for I := 0 to dbgClients.SelectedRows.Count - 1 do
begin
dmt.Client.GotoBookmark(dbgClients.SelectedRows[i]);
FilterStr := FilterStr +' or '+ FieldName + ' = ' + dmt.Client.Fields[0].AsString;
end;
dmt.Client.Filter := FilterStr;
dmt.Client.Filtered := True;
end;
--
شكرا اخي العزيز غاية الشكر و كل من قام بالرد على سؤالي حقا هذا المنتى رائع , اشكرم جميعا ,نعم هذا هو الكود الذي يعمل بالصورة التي كنت احتاجها مرة اخرى اشكرم جميعا
--
|
|
