Resim listeleme

[Dostk]

Selam; Ürün resimlerinin olduğu, db den resim yolu göstererek resimleri şerit şeklinde (yan yana) listelemek için ne kullana bilirim? resim sayısı 1 ile 30 adet arasında olacak.
Örnek: sahibinden veya gitti gidiyor

[SimaWB]

TGridPanel, TFlowPanel, TDbCtrlGrid, Virtual Treeview, TPanel ve üzerinde TImage, DevExpress yada TMS'nin gridleri...
Tamamen sizin tasarımınıza kalmış bir durum.

[Dostk]

sorum sanırım yanlış anlaşıldı, resimleri nasıl listeleyecen listview mantığında

[masteryoda]

(29-07-2017, Saat: 00:49)Dostk Adlı Kullanıcıdan Alıntı: sorum sanırım yanlış anlaşıldı, resimleri nasıl listeleyecen listview mantığında

Biraz daha açarmısınız sadece göstermesi yeterli oluyormu oluyorsa sayın @SimaWB nin belirtiği nesneleri kullanarak gösterebilirsiniz.

[Dostk]

db de bir arabanın 20 adet resmi var, bu resimleri soldan sağa doğru tek sıra halinde listelemek istiyorum.

Örnek: db deki kayıtları listviewe çekerken, yukarıdan aşağıya doğru tüm kayıtlar listeleniyorsa aynı durum resimler içinde geçerli olacak.
Tecrübesizliğimi mazur görün (TGridPanel, TFlowPanel, TDbCtrlGrid, Virtual Treeview, TPanel ve üzerinde TImage, DevExpress yada TMS'nin ) bunların hangisine db resimleri listeleye bilirim?

Not: dbde resim yok sadece resimlerin bulunduğu klasörün yolu var.

[masteryoda]

uses a jpeg ekle
sonra forma birtane flowpanel
örnek kod

procedure TForm1.Button1Click(Sender: TObject);
var
 Resim: TImage;
 i: Integer;
begin
 for i := 0 to 9 do
 begin
   Resim := TImage.Create(Self);
   Resim.Parent := FlowPanel1;
   Resim.Height := 150;
   Resim.Width := 150;
   Resim.Picture.LoadFromFile(ExtractFilePath(ParamStr(0))+'\resim\resim'+IntToStr(i)+'.jpg');
   Resim.Stretch:=True;
 end;
end;

[Dostk]

(29-07-2017, Saat: 11:39)masteryoda Adlı Kullanıcıdan Alıntı: uses a jpeg ekle
sonra forma birtane flowpanel
örnek kod

procedure TForm1.Button1Click(Sender: TObject);
var
 Resim: TImage;
 i: Integer;
begin
 for i := 0 to 9 do
 begin
   Resim := TImage.Create(Self);
   Resim.Parent := FlowPanel1;
   Resim.Height := 150;
   Resim.Width := 150;
   Resim.Picture.LoadFromFile(ExtractFilePath(ParamStr(0))+'\resim\resim'+IntToStr(i)+'.jpg');
   Resim.Stretch:=True;
 end;
end;

Hocam elinize sağlık, ben durumu bu şekilde düşünmemiştim. 

Fakat bu şekilde bana çok sıkıntı çıkartır. resimleri listview gibi bir şeye listelemem lazım çünkü seçmiş olduğum resim ile ilgili işlemler yapmam gerekecek,
örnek: silme, update veya daha büyük gösterme.

[masteryoda]

Timage in tag propertiesine primary değerinizi verirseniz bu tag değerine göre kayıt getirme v.s işlemleri yapabilirsiniz diye düşünüyorum
buraya da bakabilirsiniz http://www.delphican.com/layout-view-hak...zuldu.html

[yhackup]

Ben benzeri bir çalışma yapmıştım işinizi görürse eğer

http://www.delphican.com/fotograf-goruntuleyici.html

[Tuğrul HELVACI]

Bu tarz isteklere örnek kod ile yanıt vermemenizi rica ediyorum arkadaşlar. Örnek kod paylaşımı (bu tarz durumlarda) yararlı değil, zararlı olacaktır. Arkadaşımıza hangi sınıfları kullanabileceği hususunda bilgi verilmiş. Bundan sonraki aşama, arkadaşın araştırması, denemesi ve sonuca ulaşmaya çalışmasıdır. Herhangi bir sıkıntı yaşar ise, yazdığı kodlar üzerinden yardımda bulunmaya devam edilebilir.

Şu anda yapılan, sadece Kopyala/Yapıştır kodlamaya teşvik olur.