摘要:
{** $id: lauxlib.h,v 1.60 2003/04/03 13:35:34 roberto exp $** auxiliary functions for building lua libraries** see copyright notice in lua.h} { this .h header file is translated by melice }
unit lau......
摘要:
......
Delphi编程控制摄像头
你的电脑有没有摄像头?看到别人用qq玩视屏你会不会去想怎么实现的?这里介绍使用delphi使用ms的avicap32.dll就可轻松的实现对摄像头编程, 【程序编程相关:
对使用Delphi制作DLL复用文件的建】 【推荐阅读:
使TStringGrid自适应宽度】如果再加上你的网络编程水平,实现一个视屏聊天就不成什么问题了. 【扩展信息:
老友归来--delphi2005试用手记】 看看下面代码的代码: const wm_cap_start = wm_user; const wm_cap_stop = wm_cap_start + 68; const wm_cap_driver_connect = wm_cap_start + 10; const wm_cap_driver_disconnect = wm_cap_start + 11; const wm_cap_savedib = wm_cap_start + 25; const wm_cap_grab_frame = wm_cap_start + 60; const wm_cap_sequence = wm_cap_start + 62; const wm_cap_file_set_capture_filea = wm_cap_start + 20; const wm_cap_sequence_nofile =wm_cap_start+ 63 const wm_cap_set_overlay =wm_cap_start+ 51 const wm_cap_set_preview =wm_cap_start+ 50 const wm_cap_set_callback_videostream = wm_cap_start +6; const wm_cap_set_callback_error=wm_cap_start +2; const wm_cap_set_callback_statusa= wm_cap_start +3; const wm_cap_set_callback_frame= wm_cap_start +5; const wm_cap_set_scale=wm_cap_start+ 53 const wm_cap_set_previewrate=wm_cap_start+ 52 function capcreatecapturewindowa(lpszwindowname : pchar; dwstyle : longint; x : integer; y : integer;nwidth : integer;nheight : integer;parentwin : hwnd; nid : integer): hwnd;stdcall external ‘avicap32.dll‘; 上面的代码就是我们主要用到的一个函数与常量的定义....
下一页 摘要:
下面的函数用来压缩access数据库 需要增加comobj单元function compactdatabase(afilename,apassword:string):boolean;//压缩与修复数据库,覆盖源文件const sconnectionstring = provider=microsoft.jet.oledb.4.0;data source=%s; +jet oledb:datab......