示範滾動刷新

單純 Delphi 教學使用，不是 Delphi 開發人員不建議安裝，相關操作說明請先觀看 YouTube 影片，謝謝。

支援最新 Android 14 版本。

重新編譯：Embarcadero RAD Studio 12.1 Version 29.0.51961.7529。(Android 64+32)

只有支援： 6/7/8/9/10/11/12/13/14 (注意：不支援 5 版本)。

使用 Delphi 10.2 Tokyo 開發 ListView 滾動刷新自動添加下方資料。

示範從 SQLite 資料庫動態選取資料，以 ListView 方式呈顯資料，並在滾動至最末端時，自動刷新添加下方資料內容。

測試手機：LG Nexus 5X

手機環境：Android 6.0.1

開發環境：RAD Studio 10.2.1 Tokyo Version 25.0.27659.1188

作業系統：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

https://www.facebook.com/groups/1903734576514424/

Google+：

https://plus.google.com/114820935539769287269/posts

https://plus.google.com/u/0/communities/114911314106887760525

SlideShare：

http://www.slideshare.net/NolanLiao1965/

隱私權政策：

https://nolanliao1965.pixnet.net/blog/post/356835736-privacypolicy