Falcon
Yönetici
Kod:
function OnShow()
-- HTTP GET isteği yap
local url = "https://jsonplaceholder.typicode.com/posts" -- Örnek API adresi
local response = Internet.DownloadToString(url)
if response == nil or response == "" then
Dialog.Message("Hata", "Veri alınamadı.")
return
end
-- Basitçe, JSON verisini satırlara ayır (örnek amaçlı)
-- Daha iyi parse etmek için JSON parser kütüphanesi eklenebilir
local lines = {}
for line in response:gmatch("[^\r\n]+") do
table.insert(lines, line)
end
-- ListBox'ı temizle
ListBox.Clear("ListBox1")
-- Satırları ListBox'a ekle
for i, line in ipairs(lines) do
ListBox.AddItem("ListBox1", line)
end
end