close

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

01.png

02.png

03.png

04.png

05.png

06.png

07.png

08.png

arrow
arrow
    創作者介紹
    創作者 廖啟甫 NolonLiao 的頭像
    廖啟甫 NolonLiao

    廖啟甫 (Nolon Liao) 部落格

    廖啟甫 NolonLiao 發表在 痞客邦 留言(0) 人氣()