人生若可如罗盘，就不需迷茫

procedure Tfrmsetcrop.ApplicationEvents1Message(var Msg: tagMSG;  var Handled: Boolean); begin  inherited; if (DBGrid1.Focused) And (Msg.message = WM_MOUSEWHEEL) then    begin      if Msg.wParam > 0

<br />现在的学生越来越聪明，一年前就发现他们不知从哪里学来退出教学系统的方法了，一节课下来，最终发现大半部分人都没听课，上自己的网，听自己的音乐。从一个学生口中得知他们的方法，原来是如此简单（具体方法不说了，免得有人有样学样）。<br />不过办法总是有的，计算机关闭前会先关闭用户进程，再关闭系统进程。呵呵，哪就写服务进程来监控教学系统的学生端吧，如果发现不存在就自动运行它。下面就是创建这个服务进程的过程，用DELPHI写的。<br />1、打开DELPHI--新建--Service Ap

本例子借助了DSPACK包，只是为了方便，不要它也可以，直接调用COM。使用DirectShow9的功能。程序须引用DirectShow9, DSPack,DSUtil,ComCtrls,ActiveX单元。具体如下：1、创建视频输入设备：var CapEnum: TSysDevEnum;begin CapEnum := TSysDevEnum.Create

前两天又是一年一度的高考报名，照旧地还是由我给学生照相，由于广东省提供的照相程序十分不好用。输入考生号照一张，再输入下一考生号照一张，每个学生考号都要输入，而且取景只取看到的图像一部分，所见不所得。感觉太差了。以前为了不用输考号，写了一个辅助程序，用于自动生成下一考号，并发到照相程序的输入框，从没想过要连照相这部分也自己编，今年突发奇想，决定自己搞个完整的摄像程序。于是到网上找了些资料，了解在

在多表查询得到的数据，要向其中增加、删除、修改时，需重新查询并显示在DataGrid中，这样一来，当前位置就改变了，总是跳到第一行，视觉上很不好。在实践中，可以用模拟的方法解决，将DataSet的LockType设为ltBatchOptimistic，这样在其中编辑的数据并不马上更新到数据库。我们可以在后台用SQL语句处理编辑，而在前台就用Delete，AppenRecord等进行对缓存数据进

a:array[0..2] of integer = (0,1,2);若想在定义处初始化数组，则数组须为全局或CONST。

TstringList有个AddObject方法，在加入项目时可以加入一个关联对象，但在加入对象时要注意的是，加入的只是这个对象的地址，并不是值，所以如果使用下面的语句：for i:=1 to 5 dobegin  list.addObject(IntToStr(i),TObject(i));end;其后再取出Object值时，里面的值可能不是原来的内容了，因为它只存储了当时的地址，地址里的值如果

DBGridEh的排序行为不一定符合自己的要求，我更喜欢自定义它的排序过程。1、先定义两个过程，接管它的排序行为procedure DBGridEhSortMarkingChanged(Sender: TObject);var  i: Integer;  strTemp: WideString;  DBGridEh: TDBGridEh;begin  DBGridEh := (Sender as 

第一步：放入DBChart控件。第二步：在Series中按“Add ”添加一个图表，按你自己的需要，可为柱形图也可为饼图。第三步：对图表数据的设置还是在代码中设置好点，直接设置的话X轴Lable不支持字符。在代码的设置也很为简单：    with DBChart1 do    begin      //设置动态的标题     Title.Text.Clear;      Title.Tex

通过查看DBGridEH的源文件，终于发现了获取输入条件的途径，在DBGridEH的ApplyFilter事件中输入如下代码即可：procedure TMainForm.DG3ApplyFilter(Sender: TObject);var  s: string;begin  s := DG3.Columns[dg3.SelectedIndex].STFilter.ExpressionStr;en

1、使用MouseMove事件获取光标位置（x,y）。2、用DBGrid.MouseCoord(x,y).X可取得列号，用DBGrid.MouseCoord(x,y).Y可取得行号。  

unit Unit1;interface{鼠标中键/滚动条/翻页操作时锁定Dbgrid的选定纪录不动  by jinjazz}uses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Grids, DBGrids, DB, DBTables, StdCtrls;  

软件可用在很多场合，如报名摄像、学生建档等，因为它可以自定义相片尺寸，操作简单方便，并可为你呼叫拍照者名字。你的电脑接上摄像头就可拍照了。    安装注意事项：下载解压后请安装文件夹里的“微软TTS5.1语音引擎(中文)”组件，否则无法发音读名字。本程序主要有如下特点：1、用“↑↓”箭头移动考生数据，用“→”箭头照相，用“←”可以帮你呼叫学生名字，一手操作摄像头，一手操作键盘即可。2、预览看到的