FMX Vertical Grid - Baskı Önizleme +- Delphi Can (https://www.delphican.com) +-- Forum: Delphi (https://www.delphican.com/forumdisplay.php?fid=3) +--- Forum: Mobil Platform - FireMonkey (FMX) (https://www.delphican.com/forumdisplay.php?fid=7) +--- Konu Başlığı: FMX Vertical Grid (/showthread.php?tid=3628) |
FMX Vertical Grid - pro_imaj - 10-05-2019 Merhaba, Mobil tarafta aşağıdaki resimdeki gibi dikey yada yatay olarak bu şekilde nasıl bir liste oluşturabilirim. Bu konuda hangi bileşenler yada nasıl ilerlemeyi tavsiye edersiniz. Teşekkürler. FMX Vertical Grid - Abdullah ILGAZ - 10-05-2019 Merhaba, Eğer grid gerekliliği yoksa TVertScrollbox ile oluşturacağınız komponenti çalışma anında gerektiği kadar üretip parent olarak scrollbox'a atamasını yapabilirsiniz. Komponent için ön gördüğüm; - TRectangle // dış çerçevenin olduğu ana konteynır olur. StrokeKind solid, $FFE4E5E9, 2px kalınlık - - TRectangle // üst kısım (görsel ve başlık) için beyaz arkaplanlı bölüm, Fill $FFFFFFFF - - - TImage // Align Client, Margin 3-3-3-3 - - - TLabel // Align Bottom, TextAlign center, VerticalAlign center, FontSize 12, WordWrap true - - TRectangle // alt kısım (fiyat ve sepete ekle) için krem-gri bölüm, Fill $FFF5FAFE - - - TLabel // Align Left, MarginLeft 3 - - - TRectangle // XRadius, YRadius 100, Fill $FF00a2b6, HitTest true (Tıklanılabilir) - - - - TImage // beyaz + ikonu, HitTest false Dipnot: Yükseklik kıstaslarını sizin belirlemenizde fayda var. FMX Vertical Grid - engerex - 10-05-2019 Bir inceleyin : http://www.delphican.com/showthread.php?tid=26&pid=1034#pid1034 FMX Vertical Grid - mcuyan - 10-05-2019 Grid Layout da deneyebilirsiniz.. Runtime Column ve row lar oluşturup bunların değerlerini hesaplatmanız lazım.. Biraz matematik çalıştırıcaksınız.. Grid layout nesnesinin içine de rectangle ları yerleştiriceksiniz.. Rectangle lara imaj ve buton yerleştirebilirsiniz.. Cvp: FMX Vertical Grid - TescilsizUzman - 10-05-2019 Merhaba, Tüm mobil uygulamalarda bu tip listelemeler için ListView kullanılır. @Abdullah ILGAZ bey'in önerileri de iyi bir alternatif yöntemdir. Tasarım anı görüntüsü [attachment=606] Çalışma anı görüntüsü var I: Integer; lvItem: TListViewItem; begin ListView1.BeginUpdate; try lvItem := ListView1.Items.Add; lvItem.Data['Text1'] := 'CHUPA CHUPS AROMALI LOLİPOP 29GR'; lvItem.Data['Text3'] := '1,20'; TListItemImage(lvItem.Objects.FindDrawable('Image2')).ImageIndex := 0; TListItemImage(lvItem.Objects.FindDrawable('Image4')).ImageIndex := 2; lvItem := ListView1.Items.Add; lvItem.Data['Text1'] := 'ÇEREZZA MISIR ÇEREZİ SÜPER BOY 112 GR PEYNİR-SOGAN SİNEMA'; lvItem.Data['Text3'] := '4,45'; TListItemImage(lvItem.Objects.FindDrawable('Image2')).ImageIndex := 1; TListItemImage(lvItem.Objects.FindDrawable('Image4')).ImageIndex := 2; finally ListView1.EndUpdate; end; end; Önemli Not: Bu ve benzeri tüm konular Yeni Kaynak Kitabımızda detaylı anlatılmıştı. Kimse okumuyor galiba. Cvp: FMX Vertical Grid - pro_imaj - 10-05-2019 Cevaplar için teşekkürler, Görsel bir şeyler yapmak biraz ufuk'la ilgili sanırım. ListView içerisine edit koyamıyorduk en son hatırladığım kadarıyla bu konuda bir gelişme varmı acaba. @"Fesih ARSLAN" Haklısınız bu aralar kitaba bakamıyorum, telafi edeceğim. Araştırmadan okumadan olmuyor, olmadığıda görülüyor malesef. |