اختصاص دادن یک دیتا سورس به DBImage در هنگام ساخت آن

[mohsen_solhjoo]

دوستان سلام
خواهش می کنم یکی کمکم کنه

من 4 تا Query دارم که دیتا سورس هاشون ( sLine1, sLine2,sLine3,sLine4 ) اسمهای مشخصدارند
میخوام با حلقه، DBImage هایی که ساختم رو به این دیتا سورس ها به ترتیب اختصاص بدم
رهنمایی کنید چجوری
کد برنامه: ( اونجایی که نام دیتا سورس رو باید بدم چطور باید string رو به DataSource تبدیل کنم؟؟؟؟؟؟؟؟؟؟؟؟؟



var
i:Integer;
DBImage:TDBImage;
begin
for i:=1 to 4 do
begin
// make DBImage ----------------

DBImage:=TDBImage.Create(Owner);
with DBImage do
begin
Parent:=Panel1;
BorderStyle:=bsNone;
Ctl3D:=false;
DataField:='Photo';
//for j:=0 to DM.ComponentCount-1 do
//if DM.Components[j].Name='SLine'+IntToStr(i) then
DataSource:=????????????????????;
Height:=100;
Width:=180;
Left:=840;
Stretch:=true;

end;//make


end;//for