RAD Studio 10 Seattle - Delphi ListView 滾動刷新功能
使用 RAD Studio 10 Seattle 開發 ListView 滾動刷新自動添加下方資料。
示範從 SQLite 資料庫動態選取資料,以 ListView 方式呈顯資料,並在滾動至最末端時,自動刷新添加下方資料內容。
Google Play 商店:
https://play.google.com/store/apps/details?id=com.NolanLiao1965.ScrollDownRefresh
YouTube:
測試手機: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
YouTube:
https://www.youtube.com/channel/UCdqhXsMD1Vyvp2769FPKCog
部落格:
http://nolanliao1965.pixnet.net/blog
http://nolanliao1965.blogspot.tw/
臉書:
https://www.facebook.com/NolanLiao1965
Google+:
https://plus.google.com/114820935539769287269/posts
留言列表