廖啟甫 (Nolon Liao) 部落格

獲得『FMX Express』轉推『ListView 滾動刷新』推文 感謝

FMX Express (@FMXExpress)
https://twitter.com/FMXExpress

FMX Express - Delphi Firemonkey Android IOS
https://www.facebook.com/fmxexpress/

RAD Studio 10 Seattle - Delphi ListView 滾動刷新功能
https://www.youtube.com/watch?v=xXAPSOPrsQE

YouTube：
https://youtu.be/xXAPSOPrsQE

Google Play 商店：
https://play.google.com/store/apps/details?id=com.NolanLiao1965.ScrollDownRefresh

測試手機：LG Nexus 5X
手機環境：Android 6.0.1
開發環境：RAD Studio 10 Seattle 23.0.21418.4207 Update 1
作業系統：Windows 10 專業版 (64 位元)

SQLite 資料庫：

CREATE TABLE [Categories] (
[CategoryID] VARCHAR(30) NOT NULL,
[CategoryName] VARCHAR(30) NOT NULL,
CONSTRAINT [Categories_Index] PRIMARY KEY ([CategoryID]));

CREATE TABLE [Products] (
[ProductID] VARCHAR(30) NOT NULL,
[ProductName] VARCHAR(30) NOT NULL,
[UnitPrice] INTEGER NOT NULL,
[Photo] BLOB NOT NULL,
[Description] VARCHAR(30),
CONSTRAINT [Products_Index] PRIMARY KEY ([ProductID]));

CREATE TABLE [MenuList] (
[CategoryID] VARCHAR(30) NOT NULL,
[ProductID] VARCHAR(30) NOT NULL,
CONSTRAINT [Categories_Index] PRIMARY KEY ([CategoryID], [ProductID]));

SELECT
A.CategoryID, A.ProductID, B.CategoryName,
C.ProductName, C.UnitPrice, C.Photo, C.Description
FROM MenuList A, Categories B, Products C
WHERE
(A.CategoryID = B.CategoryID) AND
(A.ProductID = C.ProductID)
ORDER BY A.CategoryID, A.ProductID