大家好，好多朋友来信咨询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\

下载链接：https://pan.baidu.com/s/1I0kQRPwRBrA_FRwyZavF3A?pwd=vusf
提取码：vusf

+---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

当前暂无评论 »