Çalışma zamanı Dinamik Image nesnesi oluşturma

[deface]

Selamın Aleyküm;

Kardeşlerim bir sorum olacaktı.Şimdi client server mantığıyla bir Chat hazırladım (Multi Chat) bağlanan bilgisayarların ekran görüntülerini alabiliyorum ancak ben bunları bir thumbnail şeklinde bütün bilgisayarların ekran görüntülerini aynı anda nasıl formd gösteririm?
Bağlantı anında bu görüntüleri server a gönderiyorum ama server tarafında işler biraz karışıyor.Kaçtane bilgisayar bağlı ise form üzerinde o bilgisayarların ekranları görünsün.
Bunu açılacak formda bağlantı sayısına göre formda TImage nesnesi oluşturarak nasıl yapabilirim fikri olan varmıdır?

Örneğin

Kod: Tümünü seç

if baglantissayisi=i then
TImage(create)

gibi ama nasıl? hiç çalışmamıştım bu şekilde.

Hayırlı akşamlar...

[mkysoft]

boş bir forma isteniğiniz nesneyi ekleyiniz, daha sonra formun kodlarına bakınız (formun boş yerine sağ tıklayıp view source). Bu kodları kullnarak nasıl create edildiğini görebilirsiniz.

[deface]

@Mkysoft öncelikle cevabın için teşekkür ederim.Ancak runtime sürecinde nesneyi oluşturma konusunda sıkıntım yok.Nesneyi nasıl oluşturacağımı biliyorum.benim sorunum bağlantı sayısı kadar nesneyi nasıl aynı anda oluşturacağım.Hadi bağlantı sayısını listview yada listbox gibi kutuların items sayısına göre aldım diyelim
Örnek;
3 aktif bağlantı var bende ;

Kod: Tümünü seç

for i:=0 to activeconnections[i] -1 do

ile tüm bağlananlara

Kod: Tümünü seç

"sendtext"

ile

Kod: Tümünü seç

"ekrangonder"

komutunu gönderdim.
Ve bağlantı numarasınıda kullanıcı adına göre mesela

Kod: Tümünü seç

copy(receivetext,1,5);//ahmet

gibi bir metodla ayıkladım.İşte bundan sonra

Kod: Tümünü seç

TImage(create)

yi bağlantı sayısına nasıl ilişkilendiricem?
Yani 3 keremi create komutu yollacağım yoksa farklı bir yol varmı? değişkene atayıp değişken sayısı kadar component oluşturmak(Runtime)

Sorun bu...Umarım açıklayıcı olmuşumdur.İyi çalışmalar.

[qamyoncu]

Kod: Tümünü seç

var
Img: array of TImage;
i: Integer;
begin
SetLength(Img,baglantissayisi) //değişkenden üstte bahsetmişsin diye bu değişkeni kullandım. anladın sen
for i:=0 to baglantissayisi-1 do
begin
Img[i]:=TImage.Create(...);
end;
end;

Hatta bu img dizi değişkenlerine yordamlar bile ekleyebiliriz daha önce forumda konuşuldu

TImage nesnelerini formlarda görmek için Parent özelliği de atanmalı tabii.

[qamyoncu]

unutmadan; Img nesnesini global olarak kullanırsın tabi şimdi, free falan etmek lazım bu şekilde Create işlemlerinden önce.