تكرار البيانات في الدلفي

وعليكــم السـلام ورحمة الله وبركاتـه..

هذه فكر على السريع حسب مافهمت

procedure TForm1.Button1Click(Sender: TObject);
 var
	i:integer;
 begin
   Table1.First;
   for i:=0 to ScrollBox1.ControlCount-1 do
   begin
	   if ScrollBox1.Controls.ClassName='TLabel' then
	   begin
		  if ScrollBox1.Controls.Hint='field1' then
			 (ScrollBox1.Controls as Tlabel).Caption := Table1NAME.AsString
		  else
			 (ScrollBox1.Controls as Tlabel).Caption := Table1SIZE.AsString;
		  Table1.Next;
	   end;
   end;

 end;

يمنكنك ان تنشا لبال ديناميكيا

السلام عليكــم ورحمـة الله وبركاتــه

جزاك الله خيرا أخي عبد العالي

لمزيد من التوضيح وضعت مثالك في برنامج. (المرفقات)

فقط تطفلت وغيرت خاصية Tag بدل Hint للتمييز.

وفقك الله

Exm.zip