文章转载自新浪博客
大家好，好多朋友来信咨询Delphi和C++Builder的移动开发、DataSnap架构等问题，希望能有Demo代码学习。其实Delphi和C++Builder本身自带有很多示例代码，已经覆盖了大部分Delphi和C++Builder开发工具的特性和技术。对于开发各种特定的应用，还是需要去在特定方向钻研该方面的技术的，不要指望一套Demo代码就可以代替自己的学习。
为了方便各位 Delphi 和 C++Builder开发者，有针对性的查找RAD Studio自带的示例代码，从而更快更有针对性的学习对应的功能。我整理了大部分的Demo程序，还有一些因为没有设备或者没有对应的环境，没有写明注释内容。对于FireDAC支持多种数据库的特性的demo，也请有需要的朋友自行查看Demo代码。而至于有朋友问如何连接Oracle等，则自带的FireDAC的简单的Demo都有选择链接服务器的。
大家可以用Ctrl+F搜索对应的内容。
程序的默认路径为下面
C:\Users\Public\Documents\Embarcadero\Studio\17.0\Samples\Object Pascal
±–Database 数据库方面的内容
| ±–CloudAPI 云API，windows Azure和Amazon的云数据库的访问等，国内可能都没法用
| | ±–CloudAPITest
| | —CloudExplorer
| ±–EMS 英巴开发工具中的私有云服务器（或中间件服务器），所有需要的外围支持都有了，只需要用户写自己的REST的服务内容，然后象插件一样，插入EMS服务器就可以了。需要单独收费，按用户数。
| | ±–CustomLogin
| | ±–FireDACResource
| | —NotesResource
| ±–FireDAC
| | ±–Bin 辅助目录，帮助生成Demo数据库
| | ±–DB 多种数据库的数据、元数据和SQL等
| | | ±–Data
| | | ±–Meta
| | | —SQL
| | ±–Samples 示例代码
| | | ±–AddOn
| | | | ±–SQLiteIniFile 使用TFDSQLiteIniFile在SQLite数据库上面实现INI文件类似的操作，包括普通数据类型和BLOB类型
| | | | | —Demo
| | | | | —data
| | | | —VSE 将XML的结构和内容转化为表
| | | ±–Comp Layer
| | | | ±–TFDBatchMove 将text类型的数据复制到表，或者数据集里面的sql数据到表等批量操作，可以使用BatchMove特性来提高性能
| | | | ±–TFDConnection
| | | | | ±–ConnectionDefs 连接定义方法，在程序运行时创建、从INI文件读取等
| | | | | ±–DLL_Sharing 通过DLL方式共享连接
| | | | | ±–GetFieldNames 取得连接数据库的表以及表的字段
| | | | | ±–InfoReport 取得FireDAC连接的详细信息，便于诊断
| | | | | ±–Pooling 将连接改为连接池，采用多线程访问数据连接
| | | | | —Transactions 事务的提交和回滚
| | | | ±–TFDEventAlerter 事件处理，不是所有数据库都支持事件
| | | | ±–TFDGUIxLoginDialog 数据库连接时候显示用户名和密码相关
| | | | ±–TFDLocalSQL
| | | | | ±–InMemDB 使用FDLocalSQL引擎支持的MemTable内存表，本质上就是用SQLite引擎
| | | | | ±–MegaFMX 通过使用LocalSQL，可以将多种不同来源的数据，放到内存表中，然后再执行混合SQL
| | | | | —xDBMS 使用LocalSQL将多种数据来源的表数据存入LocalSQL引擎，然后写SQL调用，与上面的例子类似
| | | | ±–TFDMemTable
| | | | | ±–CachedUpdates 使用MemTable进行缓存对记录的修改，或应用更新
| | | | | ±–CloneCursor 克隆一个MemTable，并可以通过SetRange来限制显示范围
| | | | | ±–IncFetching_MSSQL 将多块同构数据加载到同一个内存表中
| | | | | ±–Main 一个综合性的MemTable的应用
| | | | | ±–MasterDetail 主从结构使用MemTable和DataSource实现的方法
| | | | | —NestedDataSet 使用内存表创建TDataSet数据类型字段，实现在一行数据中嵌套另外的一个多行的数据集
| | | | ±–TFDMetaInfoQuery 一个综合性的取得元数据的程序，包含表、包、存储过程、字段索引等
| | | | ±–TFDQuery
| | | | | ±–Aggregates 不需要写其他语句，直接使用Aggregates特性在数据集上面计算聚合函数
| | | | | ±–Blobs 使用CreateBlobStream和TBlobField读取BLOB字段
| | | | | ±–BlobStreams 直接使用流作为insert的参数的例子
| | | | | ±–CachedUpdates
| | | | | | ±–Centralized使用SchemaAdapter对多个表格的更新集中管理
| | | | | | —OnUpdateRecord 使用OnUpdateRecord事件更新记录
| | | | | ±–ExecSQL
| | | | | | ±–ArrayDML 用数组的方式批量操作数据
| | | | | | ±–Async 异步执行SQL，前台可以干别的，使用AfterOpen实现
| | | | | | ±–Batch 批量数据处理可以用Array特性
| | | | | | —BatchErrorHandling 批量处理中间可能出错误，捕捉到错误后，进行相应的处理，然后继续执行剩余的SQL
| | | | | ±–Filter 使用Filter属性的各种方法
| | | | | ±–Indices 使用已有的Index排序
| | | | | ±–Macros 对于不支持参数的SQL，可以采用Macro的方式替换对应的内容
| | | | | —MasterDetail 基本的主从结构的表，直接使用SQL的参数
| | | | ±–TFDSchemaAdapter
| | | | | —MemTable利用MemTable和SchemaAdapter来决定更新哪些内容，与上面的例子同理
| | | | ±–TFDScript
| | | | | ±–Console 使用Console界面执行SQL命令
| | | | | ±–GUI 图形界面的SQL脚本执行程序
| | | | | —Main 图形界面的执行SQL的总览例子程序
| | | | ±–TFDStoredProc
| | | | | ±–Oracl_NextRecordSet 使用存储过程的例子
| | | | | —Oracl_UpdateSQL
| | | | ±–TFDTableAdapter
| | | | | —Main 使用FDCommand支持TableAdapter的例子
| | | | —TFDUpdateSQL
| | | | —Main 使用FDUpdateSQL缓存更新
| | | ±–DApt Layer
| | | | ±–Autoinc fields 主从结构、自增字段的数据添加的例子
| | | | ±–Commands
| | | | ±–GettingStarted
| | | | ±–MappingColumns
| | | | —Oracl_StoredProc
| | | ±–DatS Layer
| | | | ±–AddRelation 使用DatSManager创建表格结构和关系的例子
| | | | ±–AddTableAndConstr
| | | | ±–AggregatesInView
| | | | ±–AutoInc
| | | | ±–CalcColumnSimple
| | | | ±–CalcColumnWithFuncs
| | | | ±–ChildRelations
| | | | ±–CompareRows
| | | | ±–CreateRows
| | | | ±–CreateTable
| | | | ±–CreateView
| | | | ±–GetChanges
| | | | ±–MasterDetail
| | | | ±–MasterDetAutoInc
| | | | ±–Mechanisms
| | | | ±–RowFilter
| | | | ±–SchemaAcceptChanges
| | | | ±–SearchingInView
| | | | —TableUpdates
| | | ±–DBMS Specific 这对每种数据库的特性的例子
| | | | ±–InterBase
| | | | ±–MongoDB
| | | | ±–MSSQL
| | | | ±–Oracle
| | | | ±–PostgreSQL
| | | | —SQLite
| | | ±–Getting Started 针对每种数据库的基本特性的综合例子
| | | | ±–Firebird
| | | | ±–InterBase
| | | | ±–MSAccess
| | | | ±–MSSQL
| | | | ±–MySQL
| | | | —SQLite
| | | ±–Getting Started FMX 针对移动端SQLite数据库的例子
| | | | —SQLite_Desktop
| | | ±–Moni Layer
| | | | ±–Clients
| | | | —Main
| | | ±–Phys Layer
| | | | ±–IFDPhysCommand
| | | | | ±–Async
| | | | | ±–Batch
| | | | | ±–EscapeFunctions
| | | | | ±–FetchTables
| | | | | —Macros
| | | | ±–IFDPhysConnection
| | | | | ±–CreateConnection
| | | | | ±–Pooling
| | | | | —Transactions
| | | | —IFDPhysMetaInfoCommand
| | | | ±–Indices
| | | | ±–StoredProc
| | | | —Tables
| | | —Stan Layer
| | | —ExprEval 在FireDAC中直接分析并计算算数表达式的例子
| | —Tool
| | ±–Executor
| | | —GUI
| | —reFind 老版本的DB程序，迁移到FireDAC的迁移工具
| | ±–AD2FDMigration AnyDAC迁移到FireDAC
| | ±–BDE2FDMigration BDE迁移到FireDAC
| | ±–DBX2FDMigration DBX迁移到FireDAC
| | —XE72XE8Migration XE7版本迁移到最新版本FireDAC
| ±–IBX
| | ±–Admin
| | ±–GdsDemo
| | ±–IBMastApp
| | —MtsPool
| ±–JSONWriter
| —RESTDemo
±–DataSnap 三层架构DataSnap的例子
| ±–Basic 传统DBX方式的，使用TSQLConnection的DataSnap的例子
| ±–DataSnapMonitor
| ±–EchoToChannel
| ±–FireDAC 使用FireDAC组件的，使用TFDConnection链接并使用TStream方式传输、使用FireDAC控件完成调用的DataSnap的例子
| ±–FireDACJSONReflect 使用FireDAC方式，REST架构并使用JSON传输数据，适合客户端不是delphi编写，但希望使用REST方式解析JSON格式数据的情况。
| ±–FireDAC_DBX 使用DBX的链接方式，但是使用FireDAC的二进制传输方式的DataSnap例子
| —LtWeightCallbacks 使用DataSnap回调的例子
±–LiveBindings
| ±–AdapterBindSource
| ±–bindgridlink
| | ±–fmx
| | —vcl
| ±–bindlink
| | ±–fmx
| | —vcl
| ±–common
| —oneofeach
| —vcl
±–Mobile Snippets 移动设备小程序
| ±–Accelerometer 加速计
| ±–AccessCameraApp 使用摄像头照相的动作的例子
| ±–AndroidIntents Android的不同程序之间的Intent的例子
| | ±–ReceiveIntent
| | —SendIntent
| ±–AudioRecPlay 使用Mic记录声音
| ±–CameraComponent 使用CameraComponent组件的例子
| ±–CameraRoll 访问相机胶卷的动作
| ±–CustomPicker 自定义的Picker，就是ComboBox里面加ListBoxItem的例子
| ±–DatePicker 日期的选择的例子
| ±–DeviceInfo 显示设备的信息
| ±–FireDACSQLite 使用SQLite的增删改查的例子
| ±–FireDAC_IBLite 使用IBLite的数据库的例子
| ±–Gyroscope 使用陀螺仪调整3D模型的例子
| ±–HorizontalScroll 应用THorzScollBox的水平滚动图片的例子
| ±–InteractiveGestures
| | ±–ImageRotation 图片旋转手势的例子
| | ±–ImageZoom 图片放大缩小手势的例子
| | —TapAndHold 点击和保持手势的例子
| ±–Location 获取位置信息的例子
| ±–MessageAlerts 显示Message的例子，有单一消息，还有多段的消息
| ±–Notifications
| | ±–SendCancelNotification
| | —SetResetBadgeNumber
| ±–OrientationSensor 方向传感器的例子（三维指南针）
| ±–PhoneDialer 一个使用TPlatformService获得Sim卡信息并拨打电话的例子，有可能在某些设备上面执行失败，国内设备可能出现不支持PhoneDialer服务的情况
| ±–PlayAudioFile 使用TMediaPlay组件播放mp3的例子
| ±–ShareSheet 使用标准Action来实现拍照和分享的功能
| ±–TabSliding 使用TTabControl实现左右滑动页面的例子，可以根据设备不同显示不同风格
| ±–TimePicker 使用TTimeEdit实现选择时间
| ±–VideoPlayback 使用TMediaPlay播放mp4的例子，包括简单的控制功能
| —WebBrowser 使用WebBrowser控件支持浏览网页等内容
±–Multi-Device Samples
| ±–Cloud 云服务商主要是国外的
| | ±–BaaS
| | —SurfSpot Finder
| ±–Device Sensors and Services
| | ±–AndroidBeaconServiceDemo 使用TBeacon组件，并将TBeacon组件放入到Android服务中，这个例子中也有TNotificationCenter组件的使用
| | ±–AndroidNotificationServiceDemo 将TNotificationCenter组件放到Android的服务中，给程序发送消息的例子。
| | ±–App Analytics 使用TAppAnalytics组件并使用AppAnalytics功能的例子。AppAnalytic可以帮助开发者分析软件的真实使用情况，该功能需要使用EDN账户。
| | ±–App Tethering 通过TTetheringManager和TTetheringAppProfile控件实现非常简单的远程调用类似的功能。同时，TTetheringManager负责链接，TTetheringAppProfile则负责执行远程调用和自动复制远程数据。只需要告诉一下复制方向就可以。并且AppTethering技术支持多设备连接，不是只能在两端之间通讯，这点还没有去实际设备上面验证。
| | | ±–MediaPlayer
| | | | ±–MediaPlayerCommand 这个是控制端
| | | | —MediaPlayerHD 这个相当于服务端，是个播放媒体的例子
| | | —PhotoWall
| | | ±–DesktopWall 这个是桌面端
| | | —Mobile 移动端可以照相，然后通过AppTethering技术的resource发送到桌面端
| | ±–Bluetooth
| | | ±–Beacons
| | | | ±–Beacon Device 使用TBeaconDevice访问Beacon设备
| | | | ±–Beacons Proximity 使用TBeaconManager注册多个Beacon设备，并监视是否进入这些Beacon设备范围的例子
| | | | ±–BLE_BeaconScanner 使用TBluetoothLEManager扫描低功率蓝牙设备的例子
| | | | ±–DemoProximityColors 一个iOS项目，Android下面没有成功
| | | | ±–SensorTag 这个是与特定的低功率蓝牙传感器通讯的例子，和我的Blog里面讲解和iBeacon设备通讯的例子一样
| | | | —Simple Beacon Demo 使用TBeacon组件的简单的例子，不使用BlueToothManager等组件
| | | ±–BLEScanner 低功率蓝牙设备扫描例子，这个例子不限制设备必须为Beacon设备
| | | ±–BlueChat 一个使用蓝牙TBluetoothManager组件，在两个设备之间建立Socket通道，之后收发信息的例子。我记得这个例子对Android设备的版本有要求，太低版本的不支持
| | | ±–Classic Bluetooth Basic app 传统蓝牙基础示例，讲解了如何配对，发现服务，创建Socket之后通讯等
| | | ±–EchoClassic
| | | ±–ExploreDevicesLE 这是一个运行在MacOS上面的低功率蓝牙的发现程序，同样是使用 TBluetoothLEManager ，发现设备，发现服务，发现Characteristic，并实现通讯的例子
| | | ±–HeartRateMonitor 一个低功率蓝牙的心率监测的例子，使用TBluetoothLE组件，访问Characteristic，解析回传数据并显示
| | | ±–ProximityClientServer
| | | —ScanFilterServicesAdvData
| | ±–CapitalIAP 这是个TInAppPurchase的例子，需要内购功能看这里
| | ±–DownloadImage 使用Android后台Intent服务方式，下载图片的例子，国内手机可以无法正常下载
| | ±–DownloadServiceDemo
| | | ±–DownloadImage
| | | —DownloadService
| | ±–FlashLight 一个使用TCameraComponent组件的手电筒的例子
| | ±–LocationDemo 一个使用LocationSensor定位，之后使用WebBrowser控件显示在google地图上面。国内无法运行。
| | ±–Map Type Selector 在iOS下面的地图类型选择的例子
| | ±–Maps 使用TMapView控件的例子，iOS估计可以运行，国内Android应该不行
| | ±–SensorInfo 一个综合性的传感器的例子
| | —Windows 10 Notifications 在Windows10平台通知的例子
| ±–EMS 使用EMS中间件服务的例子，EMS按用户数付费
| ±–Google Glass 使用Google眼睛的例子
| ±–Media
| | ±–MusicPlayer 一个音乐播放器的例子，这个播放器不是使用MediaPlayer控件，而是需要依据不同系统调用各自系统的播放器，相当于是如何写的MediaPlayer控件。同时还有音乐库的查询等。
| | —PhotoEditorDemo 一个图片编辑软件例子，通过标准Action照相、访问相机胶卷和分享图片等功能。同时使用TFilterManager的各种过滤器修改照片。
| ±–Parallel Library 并行计算库的例子
| ±–Physics
| | ±–Box2DHello 使用Boxe2D引擎的Hello程序
| | —TestBed 使用Box2D引擎自带的测试程序
| —User Interface
| ±–ActionsDemo 使用ActionList 建立动作，然后在MainMenu和PopMenu中关联的例子
| ±–Controls 各种移动端UI控件的使用的例子
| ±–ControlsDesktop 各种桌面应用程序的UI控件的使用例子
| ±–CopyPaste 一个使用TPlatformServices的跨平台的CopyPaste的示例程序
| ±–CustomListBox 使用代码自定义ListBox内容的一个例子
| ±–DragAndDrop 使用TPlatformServices里面的拖拽服务，因为都跨平台了
| ±–FireFlow 一个可以显示多张图片翻转效果的例子
| ±–Forms 一个横竖屏转换的例子
| ±–ImageList 一个使用ImageList在各种支持ImageList的控件上的综合应用的例子
| ±–KeyboardToolbar
| ±–KeyboardTypes在Edit控件里面使用各种keyboard的例子
| ±–ListCollections
| ±–ListView 关于自定义ListView的多个Demo程序，从自带的Custom方式到自己写代码的方式
| | ±–CustomAdapter
| | | —data
| | ±–CustomAdapters
| | | ±–CustomAdapter
| | | —drowsyserver
| | | —data
| | ±–ListViewAddThumbAndCaption
| | ±–ListViewCheckList
| | ±–ListViewCustomBottomDetail
| | ±–ListViewMultiDetailAppearance
| | ±–ListViewRatingsAppearance
| | —SimpleListView
| ±–LowLevel3D 使用FIreMonkey 3D特性的示例代码
| ±–ModelViewer 可以查看3D模型的示例程序，可以旋转、缩放
| | ±–FireMonkey
| | ±–Models
| | —Station
| ±–MouseOverHints 支持鼠标在控件上面的时候显示Hint，这是个多个控件的综合例子
| ±–MultiView 使用MultiView控件的例子，展现了Master区域依据不同OS或不同设置的显示方式
| ±–NativeControls 在多种控件的ControlType里面选择Platform时候，则系统会使用原生控件，同时原生控件的特性也被激活，FMX的某些特性可能缺失。当前原生控件仅支持iOS的原生控件
| ±–PlatformScrollBox 控件TPresentedScrollBox的例子，可以水平垂直滚动的区域
| ±–PullToRefresh 下拉就刷新的例子
| ±–ScrollableForm 使用VKAutoShowMode的全局变量，简化了每个输入控件都设置键盘类型的情况。同时这个例子还讲了如何让form适当滚动，避免弹出来的键盘遮挡住输入控件的特性
| ±–SearchContext
| ±–Settings Project 类似系统设置界面的例子，里面用了TabControl作为页面的切换
| ±–ShaderFilters 使用TFilterManager的过滤器和动画效果对图片处理的例子
| ±–TabControlDemo 使用TabControl的综合性的例子
| ±–TabletMasterDetailWithSearch 一个ListView的综合例子，可以显示主从信息
| ±–TabSlideTransition 多页面的Tabcontrol的例子，可以左右滑动翻动页面
| —Windows10NavigationPane
—VCL
±–ActivityIndicator 这是一个windows10风格的indicator的代码
±–App Analytics 使用AppAnalytics的应用分析特性的代码
±–InetWinSockets 一个注册Web.Winsockets组件的包的例子
±–RelativePanel 控件对齐关系的示例
±–SearchBox 一个SearchBox的演示
±–Sensors 针对Win的平板，或者带有传感器的设备的示例
±–SplitView 在Win10风格的新控件TSplitView，和移动端的很类似
±–Taskbar
| ±–MDI 多子窗口时候，在Win7及以上环境的任务条，使用Taskbar控件
| ±–OneForm 一个Taskbar控件的综合例子，实现预览下面显示按钮等
| —VideoPlayer 一个视频播放器的例子，通过Taskbar实现视频预览，按钮实现相应的功能，以及进度等信息
±–ToggleSwitch 这是一个TToggleSwitch 开关控件的各种设置的示例程序
±–tregsvr 注册Com组件的工具
±–Windows 10 Calendar
±–Windows 10 Notifications
—Windows 10 SharingContract
±–Component
—FrameWork