عرض العناصر الموضوعة على الفورم وعددها

استعرض الموضوع السابق استعرض الموضوع التالي اذهب الى الأسفل

عرض العناصر الموضوعة على الفورم وعددها

مُساهمة  alla23 في الخميس نوفمبر 26, 2015 8:46 pm

بسم الله الرحمن الرحيم

عرض العناصر الموضوعة على الفورم وعددها

الرمز:

procedure TForm1.Button2Click(Sender: TObject);
var
  i: Integer;
begin
 Memo1.Lines.Clear;
 for i := 0 to ComponentCount - 1 do
   Memo1.Lines.Add(Components[i].name);
 Label1.Caption := IntToStr(i);
end

alla23
عضو ذهبي
عضو ذهبي

عدد المساهمات : 66
نقاط : 182
تاريخ التسجيل : 26/05/2013
الموقع : http://delph.forumalgerie.net

http://delph.forumalgerie.net

الرجوع الى أعلى الصفحة اذهب الى الأسفل

استعرض الموضوع السابق استعرض الموضوع التالي الرجوع الى أعلى الصفحة


صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى