示範滾動刷新

Name: 示範滾動刷新
Author: Nolan Liao

By: Nolan Liao

Use Delphi 13.0 to develop ListView to scroll and refresh to automatically add the information below.

▶

Features & Capabilities

This is for Delphi tutorial purposes only. Installation is not recommended for non-Delphi developers. Please watch the YouTube video for instructions. Thank you.

Supports the latest Android version 16.
Recompiled with: Embarcadero RAD Studio 13.0 Version 37.0.57242.3601 (Android 64+32).
Only supported: 6/7/8/9/10/11/12/13/14/15/16 (Note: Version 5 is not supported).

Using Delphi 10.2 Tokyo, develop a ListView with scrolling and automatically adding data below.
This demonstrates dynamically selecting data from a SQLite database, displaying it in a ListView, and automatically refreshing and adding data below when scrolling to the end.

Test phone: LG Nexus 5X
Mobile environment: Android 6.0.1
Development environment: RAD Studio 10.2.1 Tokyo Version 25.0.27659.1188
Operating system: Windows 10 Professional (64-bit)

SQLite database:

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. Product ID

YouTube:
https://www.youtube.com/channel/UCdqhXsMD1Vyvp2769FPKCog
Blog:
https://nolanliao1965.pixnet.net/blog
https://nolanliao1965.blogspot.com
Facebook:
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

Privacy Policy:
https://nolanliao1965.pixnet.net/blog/post/356911132