+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : ترتيب اعناصر فلي ليست فيو (/showthread.php?tid=5378)
ترتيب اعناصر فلي ليست فيو - Anew - 09-07-2013
السلام عليم
اخوان بارك لله بيكم
كيف يتم ترتيب العناصر في الليست فيو
حسب الاسم و حسب الحجم ...لخ
و باك الله بالجيع
ترتيب اعناصر فلي ليست فيو - الياس الدويرة - 09-07-2013
استعملت في هذا الكود StringGrid1
كود :
Var petit, i, j : Integer;
Str: String;
Begin
For i := 1 to StringGrid1.RowCount -1 Do
Begin
petit := i;
For j := i to StringGrid1.RowCount -1 Do
Begin
If StringGrid1.Cells[1,j] > StringGrid1.Cells[1,petit]
then petit := j;
End;
Str := StringGrid1.Cells[1,i]; //
StringGrid1.Cells[1,i] := StringGrid1.Cells[1,petit];
StringGrid1.Cells[1,petit] := Str;
End;
End;