Thread: Scrolling list of frames
View Single Post
08-19-22, 12:28 AM   #8
Walkerbo
A Cobalt Mageweaver
 
Walkerbo's Avatar
AddOn Author - Click to view addons
Join Date: Oct 2010
Posts: 233
Hi Fizzlemizz

Sorry, here is the code;
Lua Code:
  1. local function updateAchievementList() -- debug -- move to function section once working
  2.     FauxScrollFrame_Update(
  3.         IronManInterfaceScrollFrame,
  4.         #IronManCompleatedAchievements,
  5.         NumberList.scrollButtonNumber,
  6.         NumberList.scrollFrameRowHeight
  7.     )
  8.     for index = 1, NumberList.scrollButtonNumber do
  9.         local offset = index + FauxScrollFrame_GetOffset(IronManInterfaceScrollFrame)
  10.         local frame = IronManInterfaceScrollFrame.frames[index]
  11.         frame.index = offset
  12.         if offset <= #IronManCompleatedAchievements then
  13.             frametexture:SetTexture(IronManCompleatedAchievements[offset].icon)
  14.             frametitleTextBoxtext:SetText(IronManCompleatedAchievements[offset].title)
  15.             frameNameTextBoxtext:SetText(IronManCompleatedAchievements[offset].char)
  16.             frameDateTextBoxtext:SetText(IronManCompleatedAchievements[offset].date)
  17.             frame:Show()
  18.         else
  19.             frame:Hide()
  20.         end
  21.     end
  22. end
  23.  
  24. local IronManInterfaceScrollParent =
  25.     CreateFrame("Frame", "IronManInterfaceScrollParent", IronManInterfaceFrame, "HelpFrameContainerFrameTemplate")
  26. IronManInterfaceScrollParent:SetSize(NumberList.scrollParentWidth, NumberList.scrollParentHeight)
  27. IronManInterfaceScrollParent:SetPoint(
  28.     "TOP",
  29.     IronManInterfaceFrame,
  30.     "TOP",
  31.     NumberList.scrollParentGapX,
  32.     NumberList.scrollParentTopGap
  33. )
  34.  
  35. local IronManInterfaceScrollFrame =
  36.     CreateFrame("ScrollFrame", "IronManInterfaceScrollFrame", IronManInterfaceScrollParent, "FauxScrollFrameTemplate")
  37. IronManInterfaceScrollFrame:SetPoint("TOPLEFT", 0, -8)
  38. IronManInterfaceScrollFrame:SetPoint("BOTTOMRIGHT", -30, 8)
  39. IronManInterfaceScrollFrame:SetScript(
  40.     "OnVerticalScroll",
  41.     function(self, offset)
  42.         FauxScrollFrame_OnVerticalScroll(self, offset, NumberList.scrollFrameRowHeight, updateAchievementList)
  43.     end
  44. )
  45.  
  46. IronManInterfaceScrollFrame.frames = {}
  47. for index = 1, NumberList.scrollFrameNumberOfFrames do
  48.     IronManInterfaceScrollFrame.frames[index] =
  49.         CreateFrame("Frame", "IMISF" .. index, IronManInterfaceScrollParent, "HelpFrameContainerFrameTemplate")
  50.     local frame = IronManInterfaceScrollFrame.frames[index]
  51.     frame:SetSize(NumberList.scrollFrameRowWidth, NumberList.scrollFrameRowHeight)
  52.     frame:SetPoint("TOPLEFT", 5, -(index - 1) * NumberList.scrollFrameRowHeight - 5)
  53.  
  54.     frame.texture = frame:CreateTexture("frametexture")
  55.     frametexture:SetScale(NumberList.iconAchievementTextureScale)
  56.     frametexture:SetPoint("LEFT")
  57.  
  58.     frame.titleTextBox = CreateFrame("Frame", "frametitleTextBox", frame, "HelpFrameContainerFrameTemplate")
  59.     frametitleTextBox:SetSize(NumberList.scrollAchievementTextBoxWidth, NumberList.scrollAchievementTextBoxHeight)
  60.     frametitleTextBox:SetPoint("TOPRIGHT")
  61.  
  62.     frametitleTextBox.text = frametitleTextBox:CreateFontString("frametitleTextBoxtext")
  63.     frametitleTextBoxtext:SetAllPoints(frametitleTextBox)
  64.     frametitleTextBoxtext:SetFontObject(FontList.rulesFont)
  65.  
  66.     frameNameTextBox = CreateFrame("Frame", "frameNameTextBox", frame, "HelpFrameContainerFrameTemplate")
  67.     frameNameTextBox:SetSize(NumberList.scrollAchievementTextBoxWidth, NumberList.scrollAchievementTextBoxHeight)
  68.     frameNameTextBox:SetPoint("RIGHT")
  69.  
  70.     frameNameTextBox.text = frameNameTextBox:CreateFontString("frameNameTextBoxtext")
  71.     frameNameTextBoxtext:SetAllPoints(frameNameTextBox)
  72.     frameNameTextBoxtext:SetFontObject(FontList.rulesFont)
  73.  
  74.     frameDateTextBox = CreateFrame("Frame", "frameDateTextBox", frame, "HelpFrameContainerFrameTemplate")
  75.     frameDateTextBox:SetSize(NumberList.scrollAchievementTextBoxWidth, NumberList.scrollAchievementTextBoxHeight)
  76.     frameDateTextBox:SetPoint("BOTTOMRIGHT")
  77.  
  78.     frameDateTextBox.text = frameDateTextBox:CreateFontString("frameDateTextBoxtext")
  79.     frameDateTextBoxtext:SetAllPoints(frameDateTextBox)
  80.     frameDateTextBoxtext:SetFontObject(FontList.rulesFont)
  81. end
__________________
"As someone once told me, frames are just special types of tables, and tables are special types of pointers."
Fizzlemizz
  Reply With Quote