- 博客(28)
- 资源 (4)
- 收藏
- 关注
RSS订阅原创 contenteditable="true" 恢复光标位置
当一个div设置为 contenteditable="true"的时候，点击文本内容后，改变节点后，恢复光标位置
2020-03-14 13:23:09
2068
原创 cocos2d-x 自建动画管理器AnimationManager的方法和使用
第一步：首先定义一个单例的父类。#ifndef _SINGLETON_H#define _SINGLETON_Htemplate class Singleton{public: //获取类的唯一实例 static inline T* instance(); //释放类的唯一实例 void release();protected: Singleton(void){} ~
2013-02-21 14:55:06
2779
3
原创 delphi 中如何实现使用代理ip和端口打开一个网页
<br />var s: string;begin with IdHTTP1.ProxyParams do begin ProxyServer := '192.168.0.1'; //代理地址 ProxyPort := 808; //代理端口 ProxyUsername := '';//你的用户名 ProxyPassword := '';//你的密码 end; s :=IdHTTP1.Get('http://www.126.com'); Sho
2010-09-10 01:04:00
2673
原创 Delphi listview add数据为什么不在最后一行
<br />今天写程序发现在使用 listview 控件，中添加数据的时候，数据不是在最后一行的，很是不明白。<br />添加数据的代码如下<br /> item := MainForm.lv_ULnow.Items.Add; item.Caption := MainForm.lv_UpLoadList.Items[0].Caption; // caption 文件名 item.SubItems.Add('0'); // 【0】进度 item.SubItems.Add('0')
2010-09-09 18:36:00
2156
原创 Delphi 中如何发送一个窗体上的按钮，按下消息
<br />SendMessage(hwnd, WM_LBUTTONDOWN, Null, Null);//其中hwnd为按钮的句柄，可以用EnumChildWindows的方法得到SendMessage(hwnd, WM_LBUTTONUP, Null, Null);//一定要随后发一个WM_LBUTTONUP的消息，否则按钮只下去，不起来^_<br />上面是论坛里的方法，这个不仅能够模拟自己程序的按钮点击，还能通过查找窗体模拟别的程序的按钮点击事件。<br /> <br />当我们只想模拟
2010-09-09 02:17:00
4702
原创 Delphi中ActionList组件, Action 事件的自由调用方法
<br />首先添加一个Actionlist 控件，双击控件添加事件，之后添加代码<br /> <br />procedure TMainForm.AutoIE_AddKeyWordsExecute(Sender: TObject);begin if OpenTextFileDialog1.Execute then Thread_AutoIE.AddKWFormTXT(OpenTextFileDialog1.FileName);end;<br /> <br />之后调用的时候只需要在
2010-09-08 14:09:00
5311
原创 Delphi中提示“尚未调用CoInitialize错误”的解决方法
您的位置：主页 >> 程序设计 >> Delphi中提示“尚未调用CoInitialize错误”的解决方法 <br /><br /><br />在调用dll的时候，如果调用 IE控件 ，ado 控件 则有可能出现上述错误，解决方法很简单。<br /> <br />首先要添加引用uses ActiveX<br />然后再出现问题的函数或过程最前端，添加CoInitialize(nil);<br />最后一句添加CoUninitialize;<br />问题就可以解决了。<br /> <br
2010-09-07 20:12:00
12313
3
原创 Delphi 文件操作
先上个例子 procedure TForm1.Button1Click(Sender: TObject); //写文件var wText: TextFile;begin AssignFile(wText, 'ip.txt'); Rewrite(wText);//创建文件，或者使用ReSet打开文件 Writeln(wText, richedit1.text); CloseFile(wText);end;procedure TForm1.Button2
2010-09-04 14:21:00
701
原创 Delphi文件操作函数
文件是同一种类型元素的有序集合，是内存与外设之间传输数据的渠道。文件的本质是一个数据流，所有的文件实际上是一串二进制序列。 文件管理包括： 1、文件操作。 2、目录操作。 3、驱动器操作。 1、常见文件操作函数和过程。 1.1、AssignFile过程 作用：将一个外部文件的文件名与一个File类型的变量关联，并对变量进行初始化。 原型：procedure AssignFile
2010-09-03 20:23:00
2786
1
转载 delphi 对ini操作
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton; Button2: TButton; Button3: TButton; Button4: TButton;
2010-08-30 15:11:00
689
原创 delphi listview 中实现的隔行颜色
<br />在 listview 的 OncustomDrawSubitem 事件中添加如下代码，即可实现listview的隔行颜色<br />procedure TForm1.ListView1CustomDrawSubItem(Sender: TCustomListView; Item: TListItem; SubItem: Integer; State: TCustomDrawState; var DefaultDraw: Boolean);begin case SubIte
2010-08-26 16:20:00
4518
原创 Delphi listview 让焦点始终在新输出的焦点上，并自动滚动
<br />有时候我们需要将一个listview 作为一个状态栏，将软件运行的信息输出到这个listview 中，<br />这就要求自动滚动一下。<br /> <br />在listview 的 onchange 事件中加入代码<br />procedure TMainForm.lv_ULinfoChange(Sender: TObject; Item: TListItem; Change: TItemChange);beginif Change in [ctText] then be
2010-08-25 23:31:00
4794
转载 Delphi form的show和showmodel有什么区别？
<br />1.showmodel是在没有关闭当前Form时不可关闭前面打开的Form，show就可以了 <br /> <br />2.这就是模式窗体和非模式窗体的区别了，使用Show的窗体显示非模式窗体，在该窗体关闭之前你仍然可以访问其他窗体，但你无法知道非模式窗体何时会被撤销；而使用ShowModel显示模式窗体，在该窗体关闭之前你无法访问其他窗体，但你可以选择时机对模式窗体进行撤销；
2010-08-22 00:36:00
3339
转载 Delphi中ActionList组件在菜单编制中的应用
Delphi的VCL提供有MainNenu、PopupMenu、Button、BitBtn、SpeedButton等组件来帮助我们设计菜单功能。这些组件的使用方式非常简单，因而使得菜单的设计也变的很简单。MainMenu组件是主要的下拉式菜单，大部份的窗口程序菜单都是使用这个对象来完成的。它的优点是设计方式简单，符合标准，不占画面空间。缺点是必须一层一层地进入子功能选项，无法一次看到所有功能选项，而且在尚无选择任何功能之前，窗口内空无一物，不甚美观。Delphi还提供了PopupMenu
2010-08-11 21:05:00
2429
原创 idhttp post 上传或下载时显示进度条
<br />通过 idhttp 带进度条上传演示一下，下载和上传原理差不多，说明一下下面例子中的的idhttp 是动态创建的 <br /><br />第一步：添加一个StatusBar或者gauge 进度条，这2个都可以。我用的是 statusbar ，因为这个好看，属性保持默认就可。<br />第二步：获取上传进度需要填写idhttp中的onwork，onworkbegin，onworkend，由于idhttp是动态创建的所以需要覆盖一下。<br />在主窗体类中添加如下几个公有函数（函数名可
2010-08-03 14:20:00
4087
转载 何用Delphi调用IE打开网页
<br />//调用相应程序打开uses ShellAPI;procedure TForm1.Button1Click(Sender: TObject);begin//用IE打开ShellExecute(Handle, 'open', 'IExplore.EXE', 'about:blank', nil, SW_SHOWNORMAL);//用火狐打开ShellExecute(Handle, 'open', 'firefox.exe', 'about:blank', nil, SW
2010-06-08 01:30:00
8198
转载 移动互联中CS架构要着重考虑的几点
<br />一、想清楚到底要做BS还是做CS<br /> 做CS架构的缺点很明显，研发成本太高，因为手机平台实在太多了。SYMBIAN，WINDOWS MOBILE，MTK，用C/C++的主要就三个了，然后再加上JAVA。客户端程序开发测试的工作量是很大的。到了项目后期，一旦需求变动或增加新功能，维护量那是嗷嗷的爽。<br /> 但是CS架构的优点也和它的缺点一样明显。首先是我认为CS架构才能真正发挥出手机“移动”的特点来；其次，做CS架构的软件才不容易受到门户网站、互联
2010-06-07 14:32:00
1106
转载 基于Carbide.c++的Symbian开发环境搭建
<br /> 一、Symbian OS简介<br /> Symbian OS是一个专为移动设备而定制的操作系统。在全球智能手机操作系统的市场份额中，处于领先地位，现在该系统主要应用在Nokia的智能手机上。<br /> Symbian OS系统按照人机界面交互大致分为Series60、Series80、Series90、UIQ。对应的Nokia的手机产品线则分为Series40 (底端，非智能平台)、Series60(中端，逐步代替Series40)、Series80(高端)。<
2010-06-07 14:16:00
574
转载 jsp调用dll动态链接库
<br />注：本文介绍Jsp中调用Dll动态链接库文件的方法，摘编自CSDN 炼狱的专栏<br />我的环境:<br />--------<br />1. java编译器:eclipse 3.0.2<br />2. web服务器: tomcat 4.1.24<br />3. C编译器: VC6.0<br />4. 操作系统: win2k<br />5. java源文件目录: d:/study/src<br />6. java编译后的class文件目录: d:/study
2010-06-07 13:21:00
3526
1
转载 APP入门：搭建Symbian开发环境
在开始学习 SYMBIAN 开发之前先搭建开发环境和工具。<br /><br />本文以用 Carbide C/C++ 1.2 ;Series 60 2nd FP3;ActivePerl-5.6.1.635-MSWin32-x86.msi;jdk-1_5_08-windows-i586-p.exe为例进行分析。<br /><br />安装顺序<br /><br />Series 60 2nd FP3 －》ActivePerl-5.6.1.635-MSWin32-x86.msi－》jdk-1_5_08
2010-06-07 12:40:00
499
原创 Delphi 让Edit控件只能输入数字
<br />在Edit控件的事件中找到OnKeyPress事件，当Edit控件中输入数据时触发<br /> <br /><br />在OnKeyPress事件处理代码中写入<br />procedure TForm3.Edit2KeyPress(Sender: TObject; var Key: Char);var c: integer;begin // 加入代码让edit1只能输入数字 if Key = '.' then begin for c := 1 to L
2010-06-03 23:59:00
3165
2
原创 1. 标准库string类型
出自 ：《C++ Primer中文版(第4版)》《C++程序设计》使用的编译环境是vs 2005 ，速度有点慢，但比vc++ 6.0 没事老假死好多了。先上个例子：//例 2.8 // 演示使用string对象及初始化的例子#include#includeusing namespace std;//void main(){
2010-05-29 01:48:00
564
原创 Delphi IDhttp 获取Cookie
获取post，或者get返回的cookie，除了过滤返回的字符串之外，最简单的方法是使用idhttp的CookieManager属性比如获得IDhttp返回的全部Cookieif idhttp1.CookieManager.CookieCollection.Count > 0 then for i := 0 to idhttp1.CookieManager.CookieColle
2010-05-28 13:47:00
7200
原创 Delphi StringGrid隐藏表格中的一列
在stringgrid中要隐藏表格中的一列，有人说是stringgrid1.Columns[n].Visible:=false; 但经过试验没有Columns这个属性，所以也只能使用另一种方法StringGrid1.ColWidths[13]:=0; 但这个方法中也有一个不好的地方，将多列的宽度设置成0后，在每行的最后会多出一个灰色区域
2010-05-28 00:08:00
4901
4
原创 在注册表中添加启动，并将指定文件复制到system下
#include #include int main(void) { char regname[]="Software//Microsoft//Windows//CurrentVersion//Run"; HKEY hkResult; int ret=RegOpenKey(//打开一个现有的注册表项 HKEY_LOCAL_MACHINE,//一个已打开项的句柄，或指一个标准项名 regnam
2009-12-24 22:11:00
1042
转载 win32 api 注册表类
一、问题的提出 Windows 已由原来的 16 位 windows 3.x 升级为现今我们使用的 32 位 windows 95/97/98 以其 Windows NT ，用户不仅在使用上应逐步适应，对于程序开发人员来说在编程技术 上也应紧跟操作系统的技术发展，就如同 在 Linux 操作系统下， X
2009-12-17 23:56:00
850
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人