[YARDIM]GridList

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı Cassè

  • Acemi Üye
  • *
    • İleti: 110
: 07 Mayıs 2020, 11:32:25
Merhabalar. Ben GridList'i nasıl daha iyi görünüme getirebiliriz bunu merak ediyorum. Örneğin listenin köşelerini düz yapma vb. Umarım kendimi açıklayabilmişimdir.
 


MTASATURK

[YARDIM]GridList
« : 07 Mayıs 2020, 11:32:25 »

Çevrimdışı KG Night

  • Acemi Üye
  • *
    • İleti: 157
  • Mikripter
Yanıtla #1 : 07 Mayıs 2020, 12:03:09
genelGuiTablo2 = {}

_guiCreateGridList = guiCreateGridList

function guiCreateGridList(x,y,g,u,relative,parent,kenarrenk)
   Ssayi = #Ltablo +1
   
   if not kenarrenk or string.len(kenarrenk) > 6 then
      kenarrenk =  "009900" -- gridlist kenar renk // gridlist outline color
   end
   
   if not Ltablo[Ssayi] then Ltablo[Ssayi] = {} end
   
   if relative  then
      px,pu = guiGetSize(parent,false)
      x,y,g,u = x*px,y*pu,g*px,u*pu
   end
   local relative = false
   
   Ltablo[Ssayi].resim = guiCreateLabel(x,y,g,u, "", relative, parent)
   Ltablo[Ssayi].liste = _guiCreateGridList(-8,-8,g+10, u+10,false, Ltablo[Ssayi].resim)
   
   Ltablo[Ssayi].kenarlar = {
   ortaUst = guiCreateStaticImage(0,0,g,1,resimOlustur("test"), false, Ltablo[Ssayi].resim),
   ortaAlt = guiCreateStaticImage(0,u-1,g,1,resimOlustur("test"), false, Ltablo[Ssayi].resim),
   sol = guiCreateStaticImage(0,0,1,u,resimOlustur("test"), false, Ltablo[Ssayi].resim),
   sag = guiCreateStaticImage(g-1,0,1,u,resimOlustur("test"), false, Ltablo[Ssayi].resim)}
   genelGuiTablo2[Ltablo[Ssayi].liste] = Ltablo[Ssayi].kenarlar
   
   for i,v in pairs(Ltablo[Ssayi].kenarlar) do
      renkVer(v,kenarrenk)
      guiSetProperty(v, "AlwaysOnTop", "True")
      guiSetAlpha(v, 0.4)
   end   
   
   return Ltablo[Ssayi].liste
end
EsEr Agaoğlu