示範滾動刷新

Nolan Liao

關於這個應用程式

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

支援最新 Android 16 版本。
重新編譯：Embarcadero RAD Studio 13.0 Version 37.0.57242.3601。(Android 64+32)
只有支援： 6/7/8/9/10/11/12/13/1415/16 (注意：不支援 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
部落格：
https://nolanliao1965.pixnet.net/blog
https://nolanliao1965.blogspot.com
臉書：
https://www.facebook.com/NolanLiao1965
https://www.facebook.com/groups/1903734576514424
Twitter：
https://twitter.com/NolanLiao1965
SlideShare：
https://www.slideshare.net/NolanLiao1965
GitHub：
https://github.com/nolanliao

隱私權政策：
https://nolanliao1965.pixnet.net/blog/post/356911132

新功能

重新編譯：Embarcadero RAD Studio 13.0 Version 37.0.57242.3601。(Android 64+32)
只有支援： 6/7/8/9/10/11/12/13/1415/16 (注意：不支援 5 版本)。