玻璃城市

摘要： DataSnap服务器从xe2升级到xe5环境下，能够正常编译，但运行后会报错，如下图： 处理参考： http://blogs.embarcadero.com/pawelglowacki/2013/01/10/39958 其实就是说，在服务器的uses中增加对一个单元的引用： uses …, IPPeerServer; 重新编译后运行正常。 xe5在对工程进行编译时，应... 阅读全文

摘要： MSSQL中提供了一个功能，能够分块读取Blob字段中的数据，写了一个存储过程代码如下：CREATE PROCEDURE PRO_GET_FILE_DATA @PKG_ID INT, @VER VARCHAR(50), @START INT, @COUNT INT AS BEGIN --定义指针变量，必须为varbinary(16) DECLARE @ptrval varbinary(16); --定义指针指向 SELECT @ptrval = TEXTPTR(FILE_DATA) FROM T_SYS_PKG_FILE WHERE PKG_ID = @PKG_ID //获... 阅读全文

摘要： 以下内容是根据Delphi的帮助文件进行试验的，主要测试Android下的消息提醒。 首先建立一个空白的Android工程，然后在窗体中加入一个TNotificationCenter控件，如下图： 再在uses中引用文件，如下：uses FMX.Platform;窗体上控件放置如下图：发送消息的代码如下：procedure TForm2.Button2Click(Sender: TObject... 阅读全文

摘要： 我觉得Delphi最强大的的功能之一就是开发数据库三层应用的DataSnap，在Android上的实现，首先是完成服务器的设计：（1）利用向导完成DataSnap服务器的框架，如下图：由于是实验，所以选择VCL程序，如果是实际应用，建议Service程序我习惯使用TCP/IP作为通讯协议，简单且速度快，Sample Methods是演示和测试用缺省211端口使用TDSServerModule作为数据服务提供主体，非常方便变更为Service应用服务（2）设置服务器数据在TDSServerModule中设置数据，为简便起见，采用BDE引擎的DBDEMOS下animals.dbf数据库，有文字也有 阅读全文

摘要： Delphi XE5 下TEdit控件有个属性：KeyboardType，如下图： 该属性决定了当焦点进入TEdit时，系统弹出的输入窗体，按照其帮助文件说明，不同取值的输入窗体不同，如下图： 根据不同需要选择，也可以在运行期改变取值，通过放置一个TPopupBox控件来进行设置，设计界面如下： 代码如下： procedure TfrmKeyboard.PopupBox1... 阅读全文

摘要： delphi xe5 编译的程序在启动时会有短暂的黑屏出现，这个现象产生是因为启动首个activity时会加载一些初始化数据，整个时间大约在2~3秒，如何处理？网上有些资料，这里主要参考和整理了CSDN论坛上第42#liaobo的回复。第一步：建立2个文件：loading.png 和 styles.xml，其中loading.png 是启动时替代黑屏的图片，styles.xml是对背景图片的定义，其内容为： 特别需要注意的是：（1）Delphi中代码是大小写不敏感的，所以Delphi程序员一般在写程序时不太注意大小写。而在Java下大小写是敏感的，在styles.xml定义中“loading. 阅读全文

摘要： Delphi XE5下，TMainMenu和TPopupMenu不可用，那么如何支持Android的菜单呢？ 查看了一些资料，不得要领，只是摸索着先模拟一下吧。 首先在窗体上放置一个TPanel，在其上放置一个TListBox充当菜单项，对每一个Item的OnClick事件编写具体的动作。如下图： 由于要模拟菜单键，所以Panel放置在左下角，且设置Anchors属性为[akLeft,a... 阅读全文

摘要： 今天尝试了TTabControl的使用。在很多Android的app中，首次启动时都使用选项卡模式进行产品介绍，用户通过向左滑动，改变选项卡。在xe5下这项工作由TTabControl控件完成，如下图： 1、TTabControl外观 TTabControl的外观由属性TabPosition控制，可选项包括： tpTop 选项tab在控件上方 tpBottom... 阅读全文

摘要： Android程序开发必然用到按钮，在XE5下，按钮的一个比较重要的属性就是StyleLookup，预置了一系列常用的图标，如下图： 另外2个常用属性就是： GroupName和IsPressed：一组按钮取一个相同的GroupName，控制其中只能有一个被按下 按钮的分布一般有几种形式： 1、自由摆放，也就是在Form上自由放置； 2、放置在TGridLayout控件中，由T... 阅读全文

摘要： 在Delphi中窗体与窗体之间的交互与调用非常简单，在FMX中这个优势得到了充分体现，先建立一个主窗体和一个需要调用的窗体： 在主窗体上放的按钮事件如下： … private { Private declarations } //定义私有窗体对象 Ffrm: TfrmOtherFMX; … procedure TfrmMainFMX.But... 阅读全文