- 博客(91)
- 资源 (8)
- 收藏
- 关注
RSS订阅原创 Android 关闭硬件加速功能
关闭某一个控件的硬件加速功能findViewById(R.id.btn).setLayerType(View.LAYER_TYPE_SOFTWARE,null);关闭一个Activity的硬件加速功能AndroidManifest.xml中<activity android:name=".MainActivity" android:hardwareAccelera...
2019-09-19 09:44:53
774
原创 Fragment 动态加载例子
activity_main.xml<?xml version="1.0" encoding="utf-8"?><LinearLayout xmlns:android="http://schemas.android.com/apk/res/android" xmlns:app="http://schemas.android.com/apk/res-auto" ...
2019-09-17 23:29:19
263
原创 Android menu icon 不显示
<?xml version="1.0" encoding="utf-8"?><menu xmlns:android="http://schemas.android.com/apk/res/android"> <item android:id="@+id/navigation_home" android:icon="@dra...
2019-09-16 14:41:57
1206
原创 eclipse中编译时enum出现cannot be resolved to a type错误
eclipse中编译时enum出现cannot be resolved to a type错误eclipse中编译时enum出现cannot be resolved to a type错误通常是因为eclise使用的jdk版本的问题。。。默认是使用的是jdk1.5应该去选择成jdk1.6或者更高的版本。项目右键->properties->Java Compiler-&g...
2019-09-08 07:29:51
750
原创 Eclipse项目导入到Android Studio中如何操作？
时隔多年后又重新开始写代码，已不是那时的Android了。Android Studio 是个好工具，在学习的过程中遇到了不少的问题，想导入以前的代码重新学习一下。总结了一点小经验分享出来。1、先用eclipse 导出为 gradle 工程2、修改以下几处build.gradle修改：后面标星号的地方buildscript { repositories { go...
2019-08-29 21:51:35
483
原创 非常好的IOS ，IPHONE 游戏源码，值得下载学习收藏先
无意中在网上发现的，记录一下。http://qiannao.com/ls/zhaoguyilang/61911f16/
2013-04-27 17:21:54
1297
原创 通知栏自定义安装提示
private void showNotifyInstall() { NotificationManager manager = (NotificationManager) getSystemService(Context.NOTIFICATION_SERVICE); Notification notify = new Notifi
2012-12-24 10:46:42
616
原创 当前时间加五分钟
function AddMinute(var aDateTime: TDateTime): String;var n,y,r,x,f,m,hm : word;begin //当前时间加五分钟 aDateTime:=aDateTime+strtodatetime(00:05:00); DecodeDateTime(adateTime,n,y,r,x,f,m,hm); AddMinute
2009-02-19 14:58:00
1776
原创 OraQuery 显示所有记录行
OraQuery.FetchAll := TRUE;默认情况下 为FALSE。FetchRows 是分页的行数 它需要 FetchAll 为FALSE才管用。
2008-04-09 13:58:00
1576
1
原创 安装完JDK后无法编译JAVA程序出现java.lang.NoClassDefFoundError错误提示
在安装完Jbuilder2005后也出现这样的情况原因是因为：没有设置 CLASSPATH java 找不到类解决方法：进入"系统属性--高级--环境变量", 新建环境变量名为CLASSPATH, 值为 ".;C:/JDK1.5/lib/dt.jar;C:/JDK1.5/jre/lib/rt.jar"
2008-03-25 15:44:00
1284
原创 RichEdit读取Xls文件，保留表格样式
CxGrid 导出 Exceluses cxGridExportLink;ExportGridToExcel(c: emp.xls,self.cxgrd1);RichEdit读取Xls文件，保留表格样式uses Clipbrd,ComObj;procedure TForm3.btn1Click(Sender: TObject);var xls:variant; begin ur
2007-09-18 09:41:00
1732
转载 Format 用法
Format 是一个很常用, 却又似乎很烦的方法, 本人试图对这个方法的帮助进行一些翻译 , 让它有一个完整的概貌, 以供大家查询之用: 首先看它的声明: function Format (const Format: string; const Args: Array of const): string; overload; 事实上 Format 方法有两个种形式, 另外一种是三个参数的, 主要区
2007-09-17 10:30:00
937
原创 RxRichEdit高级操作
unit InsertRichEditUnit;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, RichEdit, UHISRichEd;type TEditStreamCallBack = function(dwCookie: Lon
2007-09-14 13:20:00
3217
原创 sql 带序号
CREATE TABLE [dbo].[auto] ( [id] int NULL, [name] char(10) COLLATE Chinese_PRC_CI_AS NULL, [age] int NULL)ON [PRIMARY]GOINSERT INTO [auto] ([id], [name], [age])VALUES (11, a, 12)GOINSERT INTO
2007-08-31 14:26:00
1288
原创 CxGrid ,自动行号
unit Unit3;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataStorage, cxEdit, DB, cxD
2007-08-09 12:55:00
3131
1
原创 RichEdit
{*******************************************************}{ }{ Delphi VCL Extensions (RX) }{
2007-08-09 10:09:00
6513
原创 计算列的另类用法
--计算列的另类用法CREATE TABLE t2 (a int, b int, c int, x float, y AS CASE x WHEN 0 THEN a WHEN 1 THEN b ELSE c END)INSERT INTO [t2] ([a], [b], [c], [x])VALUES (1, 2, 3,
2007-08-01 11:31:00
862
原创 cxGrid 最佳列宽
cxGridcolumn.ApplyBestFit(); 做一个循环为调用每个列的 ApplyBestFit 方法。
2007-07-17 17:29:00
4857
1
原创 cxGrid中每一行记录前都有一个CheckBox的方法
1.双击 Clientdateset，添加一个新的字段check ， 类型为 BOOLEAN ，Field Type=fkInternalCalc ReadOnly = False2.在cxGrid 中添加所有的字段，设定check 字段的Properties为 CheckBox . ReadOnly = False;NullStyle = nssUnchecked
2007-07-16 21:26:00
3087
1
转载 SQL交叉报表的实现
CREATE TABLE [Test] ([id] [int] IDENTITY (1, 1) NOT NULL ,[name] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL ,[subject] [nvarchar] (50) COLLATE Chinese_PRC_CI_AS NULL ,[Source] [numeric](18, 0) NUL
2007-07-08 10:32:00
3579
原创 获得机器名称
function GetComputerName : String;var pcComputer : PChar; dwCSize : DWORD;begin dwCSize := MAX_COMPUTERNAME_LENGTH + 1; GetMem( pcComputer, dwCSize ); try if Windows.GetComputerName( pcCom
2007-07-02 11:18:00
792
原创 独立编号表，生成编号
create table tb_no( Name char(2) primary key , --编号种类的名称 Head nvarchar(10) not null default , --编号的前缀 CurrentNO int not null default 0, --当前的编号 BHLen int n
2007-06-20 22:46:00
933
原创 PowerDesigner11生成SQL脚本时自动带备注信息
要为每一个表设定它的Owner为dbo这样在生成脚本的时候就会自动将每个字段的备注信息导入到SQLServer中字段的描述当中了。在实际的开发工作中看起来也方便。
2007-06-10 21:43:00
1603
转载 PowerDesigner11中批量根据对象的name生成comment的脚本
PowerDesigner11中批量根据对象的name生成comment的脚本******************************************************************************* File: name2comment.vbs* Purpose: Database generation cannot use object
2007-06-10 21:35:00
817
原创 用于在TComboBox中存储编号的小过程
用于在TComboBox中存储编号的小过程D5procedure jzlLoadStrData(CBB: TComboBox; const S: string; CDS: TClientDataSet);var pID : PChar; sID : string; sName : string;begin if (not CDS.Active) then exit; C
2007-06-05 22:10:00
724
原创 不登录网站也能查看邮件数量的方法
不登录网站也能查看邮件数量的方法：以163为例在DOS窗口下输入：telnet pop3.163.com 110 回车user myusername 回车pass 输入邮箱密码 回车list 回车此时会列出每一封邮件的大小RETR 邮件索引号 回车用于在DOS下查看指定邮件的内容STAT 回车将显示邮箱中邮件的总数和总的邮件大小DELE 邮件索引号 回车将会从邮件服务器上
2007-06-05 21:54:00
1279
原创 一个递归小函数，用于组合树控件的文本
一个递归小函数，用于组合树控件的文本 function GetText(node : TTreeNode) : string; var i,iLeve : integer; s,sp : string; begin if Assigned(node) then begin s := node.text; if Assigned(node.Paren
2007-06-05 21:45:00
675
原创 用于处理树的一个存储过程
一个用于树的存储过程create proc TS_P008 @in_deptid varchar(23), @in_len intAS-- 查询部门-- jzl-- 2006-12-15-- @in_deptid 当前节点的编号 第一次调用时为空-- @in_len 当前节点的编号的长度加2 if len(@in_deptid) =0 begin select b.dep
2007-06-05 21:43:00
748
原创 Delphi 与网页结合的开发程序主界面
用Delphi 做程序的主框架。利用页面做导航窗口，那么如何才让Delphi来响应页面中的单击操作呢？其实很简单1.在主程序中加一个TWebBrowser组件 用它来显示页面2.在BeforeNavigate2事件中处理响应操作 例如： If Pos(varex:0101, URL)>0 Then begin //执行一些操作 SendMessage(frmMain.Han
2007-03-07 14:44:00
4974
1
转载 系统环境变量的设置Delphi函数
uses TRegistry; function SetGlobalEnvironment(const Name, Value: string; const User: Boolean = True): Boolean; resourcestring REG_MACHINE_LOCATION = Syst
2007-03-02 17:34:00
1573
转载 系统环境变量的设置Delphi函数
uses TRegistry; function SetGlobalEnvironment(const Name, Value: string; const User: Boolean = True): Boolean; resourcestring REG_MACHINE_LOCATION = Syst
2007-03-02 17:33:00
1761
原创 用DELPHI设置文件的属性
用DELPHI设置文件的属性1. 在interface下的uses中引用filectrl单元2. 首先取文件属性 var attr : integer; filename : string; begin filename := myfile; attr :
2007-03-02 17:32:00
3730
原创 加载页面时自动打开另一个新页面的并同时打开一个exe程序
打开新页面 function OPENNEW(){ window.open("path.jsp", "win2"); }执行exe //当加载页面时，就自动打开聊天程序 jzl 2007-2-26 try{ String username =(String)session.getAttribute("user_name"); String passwd = request.
2007-02-28 11:46:00
3709
原创 控制只运行一份程序的另一个方法
将以下代码加到 工程文件中 即 .dpr 文件中const iAtom=you exe name; //如jzlVAR Mutex:THandle;begin Mutex:=CreateMutex(NIL,True,you exe name); IF GetLastError begin Application.Initialize; Applicati
2007-02-28 11:26:00
794
转载 窗体不出现在任务栏上
uses ShellApi; procedure TForm1.FormCreate(Sender: TObject); begin SetWindowLong(Application.Handle, GWL_EXSTYLE, WS_EX_TOOLWINDOW); end;
2007-02-27 09:56:00
860
原创 jsp 得到当前的路径
String strAbsPath=application.getRealPath(""); strAbsPath = strAbsPath + "//"; strAbsPath = strAbsPath.replaceAll("////","////////"); out.print("alert("+strAbsPath+");");%>
2007-02-26 17:53:00
1334
原创 java操作外部程序
//用JAVA调用外部应用程序 //当加载页面时，就自动打开聊天程序 jzl 2007-2-26 try{ String username =(String)session.getAttribute("user_name"); String passwd = request.getParameter("password"); String strAbsPath=application.
2007-02-26 17:49:00
795
原创 在IE关闭时，转到一个页面中，执行一些操作，然后关闭IE.
在IE关闭时，转到一个页面中，执行一些操作，然后关闭IE.脚本代码如下： window.onunload = functionHandler; function functionHandler() { location.href = "ExistsSystem.jsp"; 转到同目录中的另一个文件 //confirm(start); 弹出对话框，测试用的。 w
2007-01-26 16:39:00
847
转载 实现控件的移动，改变大小（DELPHI实现）
实现控件的移动，改变大小（DELPHI实现）主要使用Perform方法 function Perform(Msg: Cardinal; WParam, LParam: Longint): Longint; 只要能够使用类似于win32API的函数SendMessage()，本方法同样可在其他环境里应用。用Delphi实现首先，建立一个应用程序，在一个窗体里加入一个Panel1，保存为m
2007-01-16 13:59:00
3950
1
symbian 请取手机 IMSI的小工具代码
2011-11-08
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人