随笔分类 -  学习心得

摘要：代码实现如下 阅读全文

摘要：一、首先用TADOConnection连接数据库二、针对具体的操作TADOQurey的命令和调用方法不同1、无返回结果的操作（添加，删除，更新等……）以TADOQurey的一个实例qryMySQL 为例：（1）添加记录 with qryMySQL do begin SQL.Clear; SQL.Add('INSERT INTO user ( ID ,Name ,Sex ,Age) VALUES (NULL , "张三", "女", "16");'); ExecSQL; end;（2）更新记录 SQL.Add('UPDATE "user" SET "Sex" = "男" WHERE "ID" = 阅读全文

摘要：Delphi连接MySQL真麻烦，研究了一天，从网上找了无数文章，下载了无数插件都没解决。最后返璞归真，老老实实用ADO来连接，发现也不是很顺利，但最终还是连接成功了。多少有点心得：ADO各个组件的作用和联系必须清楚，否则设置起来很容易混乱。总结一下用ADO连接MySQL5.1要点：1、需要下载MySQL的ODBC支持，我用的官网mysql-connector-odbc-5.1.7-win32.msi（这个一般没问题，下载安装即可）2、通过ODBC管理建立系统DSN（这个也简单，无非是选择MySQL的ODBC，设置服务器、用户名、密码）3、熟悉ADO控件知道其作用和相互联系。（难点）TADOC 阅读全文

摘要：对于鼠标滑轮,可以提供非常友好的滚动操作,比如我们常常用滑轮滚动来控制滚动条，而编程需要知道的关键的信息一般就是 1.滚动的方向2.滚动的大小通过响应WM_MOUSEWHEEL消息可以得到有用的信息 (short)HIWORD(wParam) 返回一个滚动的大小,一般是120的倍数,正数代表滚动向前,负数代表向后 (short)LOWORD(wParam) 返回当前同时用鼠标键的时候按下了哪些键 要注意的地方是需要定义以下语句，要不该常量WM_MOUSEWHEEL 默认是没定义的, #define _WIN32_WINNT 0x0400 (编译未通过) #define WM_MOUSEWHEE 阅读全文

摘要：1.例如你的 root用户现在没有密码，你希望的密码修改为123456，那么命令是： mysqladmin -u root password 123456 2.如果你的root现在有密码了（123456），那么修改密码为abcdef的命令是： mysqladmin -u root -p password abcdef 注意，命令回车后会问你旧密码，输入旧密码123456之后命令完成，密码修改成... 阅读全文

摘要：学习利用TApplicaiton的OnMessage方法来添加控件的消息响应！unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, ADODB, Grids, DBGrids;type TForm1 = class(TForm) DBGrid1: TDBGrid; ADOTable1: TADOTable; DataSource1: TDataSource; procedure FormCreate(Sender: TObj 阅读全文

摘要：学习用IsChild(WebBrowser1.Handle, Msg.Hwnd)判断鼠标事件是否来自TWebBrowser unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, OleCtrls, SHDocVw, StdCtrls, MSHTML;type TForm1 = class(TForm) WebBrowser1: TWebBrowser; procedure FormCreate(Sender: TObject); p 阅读全文

摘要：1.Delphi控制javascript Delphi读取JavaScript变量num WebBrowser1.OleObject.document.Script.num; Delphi调用JavaScript函数getZoom() WebBrowser1.OleObject.document.Script.getZoom(); 2.JavaScript控制delphi 用delphi定时器监测javascript变量的变化,实现javascript对delphi的控制. 阅读全文

摘要：首先关联文件---------------------------------------------------------------------------- 用来实践的JavaScript----------------------------------------------------------------------------Delphi 调用JavaScript的代码： 阅读全文

摘要：procedure TMainFrom.imgResultMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); var Point:TPoint; begin GetCursorPos(Point);//获取当前鼠标位置 SetCursorPos(Point.X-510,... 阅读全文

摘要：近期制作了FDS的一个建模工具，由于知识有限，做出的效果是2D的。昨天上课的时候看老师画一个长方体，突然想到，为什么不给普通的2D图形加画上几条直线，就能实现2D图形的3D视觉效果呢？于是回来马上做了尝试，果然，效果很好，非常满意。但是把测试程序代码移植到FDS建模工具上的时候出现问题了：Panel没有Canvas属性，也不能说没有，实际上在TPanel的实现源码里有Canvas属性，不过是Pro... 阅读全文

摘要：Delphi常见的运行期Access Violation错误有哪些？如何防止？ 任何软件开发都会遇到这样的情况：你写好程序并测试，然后到处发送，结果用户告诉你它失败了。 你可能考虑用编译指令{$D}编译你的程序——Delphi可以建立一个有助于定位Access Violation错误的源代码的镜像文件。工程选项对话框（Project|Options|Linker &... 阅读全文

摘要：一般是数组或指针错误，今天调试程序时误把数组下限设成10引发了题目所示错误。aModalArray:array[10..10] of TPanel;aModalArray[1]…… 阅读全文

摘要：1、多用数组来存储动态组件，如TButtonArray：Array[1..10] of TButton; ButtonArray：TButtonArray;2、要使得组件能正常显示，最关键的是制定组件的parent属性，如：ButtonArray[index].parent:=self;3、其次要设定组件的大小：ButtonArray[index].width:=100; ButtonArray[... 阅读全文

摘要：今天在FDS建模程序编写时自定义了一组鼠标响应事件，结果总是提示“Unsatisfied forward or external declaration”错误，最终发现是如下原因造成的：类声明部分定义的procedure PanelClick(Sender:Tobjcet),在实现部分需要有类名的全称！[代码] 阅读全文

摘要：帮助文档中对Tcolor的说明如下：If you specify TColor as a specific 4-byte hexadecimal number instead of using the constants defined in the Graphics unit, the low three bytes represent RGB color intensities for blu... 阅读全文

摘要：先前用控制台程序做了个在线刷Kx的小工具，有一个问题就是perform wm_close后IE会报错：恢复当前会话什么的，而且占用资源也不小（主要是IE占资源）。今晚想做一个VCL版的，特别是联系一下TWebBrowser控件等工具。通过对TWebBrowser控件的研究，熟悉了他的几个响应时间，也发觉其有一定的局限性。或许是我没有找到具体的使用方法吧，至少怎样用TWebBrowser控件来控制自... 阅读全文

摘要：All Delphi versions since Delphi 2006 have an updated memory manager that is faster and more feature rich. One of the nicest features of the "new" memory manager allows applications to register (and u... 阅读全文

摘要：一、匈牙利命名法： 　　广泛应用于象Microsoft Windows这样的环境中。 　　Windows 编程中用到的变量（还包括宏）的命名规则匈牙利命名法，这种命名技术是由一位能干的 Microsoft 程序员查尔斯·西蒙尼(Charles Simonyi) 提出的。 　　匈牙利命名法通过在变量名前面加上相应的小写字母的符号标识作为前缀，标识出变量的作用域，类型等。这些符号可以多个... 阅读全文

摘要：今天在看雪看到有人提出这样一个问题：delphi中treeview的修改 原文如下： ---------------------------------------------------------------------------------------------------------------------- 最近朋友拿给我一个软件，其中有一个地方感觉很奇怪。软件下载地址http://... 阅读全文