wangzn1979的专栏

Virtual Key Code    Corresponding keyVK_LBUTTON    Left mouse buttonVK_RBUTTON    Right mouse buttonVK_CANCEL    Control+BreakVK_MBUTTON    Middle mouse buttonVK_BACK     Backspace keyVK_T

var  NetSource : TNetResource;    file://连接服务器结构  dwResult:DWORD;               file://连接文件服务器的返回值procedure ConnectServer;begin    g_bFlag:=True;    NetSource.dwType:= RESOURCETYPE_ANY;    NetSource

插入修改 保存图象bmTemp:=TBitmap.Create;ms:=TMemoryStream.Create;try    qryFace.Close;    qryFace.SQL.Clear;    qryFace.SQL.Add(update video_face_image set face_image2=:face_image2);    qryFace.SQL.Add(Form

 如何实现应用程序中的”回车”成TAB?也就是说当按Enter键的时候,产生的效果是按了Tab键. 下面是我经常使用的方法:在你的数据模块中,添加如下代码:interface  。。。。。。  type    TMessageHandler = class     //使得回车消息转换成Tab消息      class procedure AppMessage(va

方法:关键是用DBGrid的事件 OnTitleClick首先判断单击是哪一列,     i:=Column.Index;然后要确定是哪个字段    Field:=DBGrid1.Columns[i].FieldName+ ASC;最后进行排序:    qryWork.Sort:=Field; 上面仅仅是进行升序排列,若要添加降序排列,则要用 DESC