- 博客(154)
- 资源 (4)
- 收藏
- 关注
RSS订阅原创 delphi7调用delphi xe dll 心得
最近由于项目需要上传文件到阿里OSS，参考OSS API用DELPHI XE写了一个DLL给delphi7的工程调用。最初传入中文，打印日志老是乱码。
2021-01-17 21:13:45
655
1
原创 ideal HTTP Status 404 – Not Found
今天把myeclipse的项目导入到ideal里面，一切都弄完了，启动也成功了，如下：[2019-06-01 03:15:30,206] Artifact Lottery:war exploded: Artifact is deployed successfully[2019-06-01 03:15:30,206] Artifact Lottery:war exploded: Deploy ...
2019-06-01 15:34:00
5139
原创 spring boot项目访问时报错： application has no explicit mapping for /error, so you are seeing this as ...
可能的原因是使用了@Controller，请使用RestController即可
2019-01-07 15:49:11
921
原创 Intellij IDEA springboot 找不到或无法加载主类
与其它不同的回答。如果调整过包名，也有可能出现此问题。调整过包名时.idea/workspace.xml里面配置没有相应的更新，也会出现此问题。请检查该文件进行修正即可...
2019-01-07 14:47:46
7834
3
转载 java.lang.NoClassDefFoundError: com/alibaba/fastjson/JSONArray 解决方法
前几天在项目使用到Json格式数据，于是把使用Json需要用到的包都引到了工程里面，程序写好后运行时，发现后台报java.lang.NoClassDefFoundError: net/sf/json/JSONArray 的错误，开始以为相应的jar包引入有问题，检查后发现所有的包都已经引入了，怎么还会出现这个问题呢? 原来我使用的是myeclipse+tomcat 环境，因该项目已经部署过，使...
2018-06-03 14:57:29
26154
7
原创 query.recordcount 总是为-1 解决方法
query.Last;query.RecordCount ;query.first;即可以得到记录数
2017-11-01 08:15:38
673
原创 ORA-01460: 转换请求无法实现或不合理
通过参数化方式插入BLOB字段出现此错误，SQL写法：begin insert into ...... commit;end;对于增加或修改BLOB字段时，不能用begin commit end的方式。
2017-03-09 12:48:33
1823
原创 delphi 出现update failed
记录集：TQuery开发工具：DELPHI5出现问题情景：修改-->保存-->删除，就会出现update failed的问题。问题分析：tUpdateSQL中的ModifySQL语句没有按关键字更新，即where中包含了修改的字段，而修改时这些条件没有禁止可用，即允许修改了。修正方法：按关键更新或where条件中字段禁止修改
2016-05-17 10:50:30
1655
原创 不能设置类range的columnwidth属性 解决方法
生成excel的时候提示：不能设类Range的Columnwidth属性。可能是因为设置Columnwidth的值过大或过小，本人在做程序时遇到因Query字段值设置过大，在比较DBGRID宽度与字段宽度取最大值时，发现值比较值大，就会出现这种错误。直销系统时发生。DELPHI 5
2016-05-12 15:50:18
13041
1
原创 MSDAORA.1与OraOLEDB.Oracle一些使用经验
A：provider=MSDAORA.1B：provider=OraOLEDB.Oracle.1TADOConnection使用这两种连接方式时MSDAORA.1无法捕获ora-01427，而OraOLEDB.Oracle.1却可以。MSDAORA.1可心共享同一个连接(在多线程中使用)，OraOLEDB.Oracle.1会出现【对象被打开】
2015-05-29 09:58:49
10275
原创 ORA-01003: no statement parsed
环境：delphi 5、BDE、oracle10delphi里面用tStoreProc调用存储过程出现ORA-01003: no statement parsed。解决方法：tStoreProc.StoredProcName赋值的存储过程名一定要大写，参数名与存储过程里面定义的要一样。在DELPHI里面一定要大写，其它开发环境没有测试过。
2014-10-24 17:21:37
11389
转载 Delphi 中的MD5实现方法（转）
在Delphi自带的Indy控件中其实是提供了MD2,MD4,MD5对象的，我们可以直接使用它们来完成MD5的签名算法。而不需要再去找其它的DLL或是Pas了。在Uses单元中引用 IdHashMessageDigest,IdGlobal, IdHash 单元，再写如下代码即可以达到MD5的实现。示例代码procedure TForm1.Button1Click(Sende
2013-11-14 19:26:06
1296
原创 indy10安装方法
首先要卸载Delphi7中的Indy9. 卸载方法如下：1、进入D7的目录，双击Borland Delphi7.msi。2、在弹出的对话框中选“Modify”。3、然后点“Next”，在接下来的对话框中，找到Indy，点“Do Not Install”。之后一路“Next”,最后完成，就卸载成功了。 安装:1、把下列路径加入Delphi的Library Pathi
2012-09-11 23:08:18
6091
原创 tuxedo编译常见错误
1 Unable to initialize public key subsystem 更换:IPCKEY2 tmloadcf cannot run on a non-master node 解决方法：ubbsimple 文件中将改为你的机器名，在windows下使用echo %computername% 显示机器名，在unix下使用 uname -n 。注意在windows 下,通过h
2012-09-07 10:42:13
3310
原创 关于删除文件夹 RemoveDir
RemoveDir只能删除该目录下没有文件，也没有下级目录。网上找的一函数，有文件有下级目录都可以删除function DelDirectory(const ADirectory :string):Boolean;var fo :TSHFILEOPSTRUCT;begin FillChar(fo, SizeOf(fo), 0); with fo do beg
2012-08-10 21:50:29
3647
原创 关于DELPHI中出现'BOF或EOF'中有一个是“真”，或者当前的记录已被删除,
据所用D5 D7版本,D5存在此问题,D7不存在此问题解决方法:不用更新Ado，是Ado的bug，可以通过先关闭ado的记录集后关闭ado解决if (adoQuery1.active) then begin adoquery1.recordset.close; adoQuery1.Close ; end;
2012-06-19 14:25:31
6500
4
转载 ASP 不能更新,数据库或对象为只读
Microsoft JET Database Engine (Ox80040E09)不能更新,数据库或对象为只读 解决方法检查是否将网站所在目录对 EveryOne 用户打开所有权限。具体方法是：打开 “ 我的电脑 ”---- 找到网站所在文件夹 ---- 在其上点右键 ---- 选 “ 属性 ”----- 切换到 “ 安全性 ” 选项卡，在这里给 EveryOne 用户所有权限。
2012-06-11 22:17:03
621
原创 TQuery的cannot modify a read-only dataset解决方法
方法一:1 RequestLive设置为True2 添加TUpdateSQL,填写相关的SQL语句3 TQuery的SQL语句可按需要读取部分字段或全部 方法二:1 RequestLive设置为True2 TQuery的SQL语句为select * from Table
2012-06-08 14:15:19
7521
转载 ORA-01000: maximum open cursors exceeded 超出打开游标的最大数的原因和解决方案
错误类型：ORA-01000: maximum open cursors exceeded 超出打开游标的最大数、 原因分析：Java代码的时候，createStatement和prepareStatement都应该要放在循环外面，而且使用了这些Statment后，及时关闭。最好是在执行了一次executeQuery、executeUpdate等之后，如果不需要使用结果集（ResultS
2012-05-22 08:34:44
1164
转载 SQLServer如何释放内存
http://wenku.baidu.com/view/79e0397a168884868762d6f9.html
2012-05-21 22:29:53
1570
原创 DLL调试方法
一、DLL调试方法： (1)、 打开DLL所在的工程，选择run->parameters,在Host Application中选择调用DLL的EXE文件。单击【OK】 (2)、按ctrl+alt+m打开modules,右键Add Module选择EXE调用的DLL所在路径，运行DLL的工程，按ctrl+alt+m，选择DLL，右键单击Reload Symbol Table,在DLL
2012-04-26 08:43:21
819
转载 webbrowser delphi 事件详解
基础说明：方法：GoBack 后退，使你在当前历史列表中后退一项，Alt + ←GoForward 前进，使你在当前历史列表中前进一项，Alt + →GoHome 主页，连接用户默认的主页GoSearch 搜索，连接用户默认的搜索页面Navigate 连接到指定的URLRefresh 刷新当前页面，F5Refresh2 同上，只是可以指定刷新级别，所指定的刷新级
2012-03-15 10:25:26
2685
转载 Delphi中对时间操作大全
看一看在delphi中用于描述时间的几种数据结构，对时间的操作，其实就是对这些结构的操作。 TDateTime类型： Delphi中最常用的表示日期时间的数据类型TDateTime类型，和普通的整形数一样，你可以给日期定义一个日期型变量以便在程序中进行操作。TdateTime类型实质上是一个Double型的数，在Delphi中是这样定义TdateTime类型： type TDate
2012-03-14 14:46:22
9588
原创 delphi冒泡算法
for i:=9 downto 0 do for j:=0 to i do begin times := times + 1; if LArray[j] > LArray[i] then begin temp := LArray[i]; LArray[i] := LArray[j];
2012-03-08 22:58:53
1256
转载 delphi和c#的MD5加密(32位)
c#代码:System.Web.Security.FormsAuthentication.HashPasswordForStoringInConfigFile(string ,”MD5″);delphi代码:{*_* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *Author
2012-03-02 23:01:10
3328
转载 给TListBox 增加水平滚动条的方法
给TListBox 发送一个LB_SetHorizontalExtent消息就行了。下面是源代码： SendMessage(ListBox1.Handle,LB_SetHorizontalExtent,5000, longint(0)); 方法来自：http://topic.csdn.net/t/20001028/14/36933.html
2012-03-01 09:03:59
987
翻译 解决SQL2OOO/2005查询不区分大小写的方法
在查询段名后面加collate Chinese_PRC_CS_AS_WS， 如下面select * from person where name collate Chinese_PRC_CS_AS_WS like '%NA%'
2012-02-18 17:40:34
433
转载 清理SQL Server数据库日志的两种方法
1、打开查询分析器，输入命令DUMP TRANSACTION 数据库名 WITH NO_LOG2、再打开企业管理器--右键你要压缩的数据库--所有任务--收缩数据库--收缩文件--选择日志文件--在收缩方式里选择收缩至: ,这里会给出一个允许收缩到的最小M数,直接输入这个数,确定就可以了。来自：http://www.weste.net/2008/3-9/11021390749.ht
2012-02-17 17:29:06
521
转载 SQLSERVER服务手工启动 批处理文件
@echo off echo 开启SQLSERVER服务按1 echo 关闭SQLSERVER服务按2 echo 开启ORACLE服务按3 echo 关闭ORACLE服务按4 set /p ans= if %ans%==1 goto sts if %ans%==2 goto ovs if %ans%==3 goto sto if %ans%==4 g
2012-02-16 23:09:40
1027
转载 EhLib V5.2.84 安装方法
安装方法:(1)在C:/Program Files/Borland/Delphi7下, 新建目录Ehlib(2)将Common和Delphi7中的目录的文件拷贝到上面的这个目录中(3)在Tools->Environment Options->Library->Library Path 中添加这个目录.(4)编译四个dpk文件:EhLib70.Dpk,
2012-02-13 13:27:42
4415
原创 asp连接SQL数据库语句
Set conn = Server.CreateObject("ADODB.Connection") conn.Open "Driver={SQL SERVER};UID=sa;PWD=895278;Server=(local);Database=testPage" %>
2012-01-15 15:56:50
500
原创 jquery操作iframe中的HTML 在IE6、Mozilla Firefox 正常
以下为ASP的大概内容：无标题文档 function getIframeDom(id){ return window.document.getElementById(id).contentDocument||window.document.getElementById(id).contentWindow.document; } $(d
2012-01-15 10:41:12
889
翻译 Invalidate, Repaint, Update, Refresh区别
Refresh和Repaint是一样的,它只是简单地调用了Repaint. Update会导致整个窗口(对于没有窗口的TGraphicControl来说,就是它的父控件的窗口)立即处理WM_PAINT消息,即重画应该画的部分. Invalidate使控件所在窗口的控件客户区域(对于TWinControl来说就是它的客户区域,对于TGraphicControl来说就是它的父控件的窗口在它的区
2011-12-07 22:32:23
1903
翻译 消息处理的次序
整个消息处理的次序hook-->application.OnMessage-->wndproc-->Dispatch( message 定义的procedure ) -->defaulthandler
2011-12-06 13:03:25
413
转载 idhttp下载函数
procedure DownloadFile(const AIDHttp :TIdHTTP; AURL, AFileName :string; AResume :Boolean);varLFileStream :TFileStream;beginif FileExists(AFileName) thenLFileStream := TFileStream.Create(AFil
2011-11-29 23:15:20
547
转载 PHP常用正则表达式汇总
1. 平时做网站经常要用正则表达式，下面是一些讲解和例子，仅供大家参考和修改使用： 2. "^\d+$" //非负整数（正整数 + 0） 3. "^[0-9]*[1-9][0-9]*$" //正整数 4. "^((-\d+)|(0+))$" //非正整数（负整数 + 0） 5. "^-[0-9]*[1-9][0-9]*$" //负整数 6. "^-?\d+$" /
2011-11-27 23:01:16
395
delphi 7实现AES 128位加解密
2022-10-30
类似百度谷歌搜索的下拉列表DLL
2011-11-23
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人