لدي المكونات التالية
FDConnection1
FDTable1
Datasourece1
DBGrid1
في الحدث dbgridonTitleClick كيف ترتيب البيانات
جربت هذا الكود
يتم الترتيب في الضغطة الأولى لكن عند اعادة الترتيب تظهر رسالة الخطأ التالية
FDConnection1
FDTable1
Datasourece1
DBGrid1
في الحدث dbgridonTitleClick كيف ترتيب البيانات
جربت هذا الكود
كود :
procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin
if FDTable1.IndexFieldNames = column.Field.FieldName then
FDTable1.IndexFieldNames := column.Field.FieldName +' DESC'
else
FDTable1.IndexFieldNames := column.Field.FieldName;
end;
L'objet [<عنوان الخانة>DESC] est introuvable