31-07-2017, 09:32 AM
جرب هذا
كود :
ADODataSet1.CommandText :=
'select [EmployeeID],LastName,FirstName,Title,City from Employees where '
+ ListeChampTxt.Items[ListeChampTxt.ItemIndex] +'=' + QuotedStr(TxtCherche.text) +
' order by ' + ListTrie.Items[ListTrie.ItemIndex] + TxtTrie;
رَبَّنَا اغْفِرْ لِي وَلِوَالِدَيَّ وَلِلْمُؤْمِنِينَ يَوْمَ يَقُومُ الْحِسَابُ