-
unit Video
interface
uses
Windows, Messages, SysUtils, Classes, Gr...
unit Video
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, stdctrls,
ExtCtrls, avicap, mmsystem, dsgnintf
// Types for event-procedures
type
TCapStatusProc = procedure(Sender: TObject) of object
TCapStatusCallback = procedure(Sender: TObject nID: integer status: string)
of object
TVideoStream = procedure(sender: TObject lpVhdr: PVIDEOHDR) of object
TAudioStream = procedure(sender: TObject lpWHdr: PWAVEHDR) of object
// Property Editor for driver selection
type
TDrivereditor = class(TPropertyEditor)
function GetAttributes: TPropertyAttributes override
procedure GetValues(Proc: TGetStrProc) override
function GetValue: string override
procedure SetValue(const Value: string) override
end -unit Video interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, stdctrls, ExtCtrls, avicap, mmsystem, dsgnintf// Types for event-procedurestype TCapStatusProc = procedure (Sender: TObject)
- 2022-02-21 02:41:49下载
- 积分:1
-
制作帮助文件的一个利程10
制作帮助文件的一个利程10-3-production of a document to help Lee Cheng 10-3
- 2023-05-07 16:55:02下载
- 积分:1
-
delph灵感编程,讲述了delphi的许多实例,值得一看
delph灵感编程,讲述了delphi的许多实例,值得一看-delph inspiration programming, spoke of the many examples of delphi, an eye-catcher
- 2022-04-19 14:24:36下载
- 积分:1
-
borlandc++builder6
borland c++ builder6
- 2020-06-26 03:20:02下载
- 积分:1
-
水木清华BBS精华
水木清华BBS精华-Shuimu Tsinghua BBS essence.
- 2022-07-28 16:27:54下载
- 积分:1
-
考勤机
说明: 科密一卡通二次开发文档以及动态库以及程序(test kemiykt sdk doc and dll files)
- 2020-06-22 21:00:01下载
- 积分:1
-
其实学Delphi并不难,看你的努力程度,我才学了一个学期,就已经可以做一些小的应用软件了,
现在在接做两个大的系统,首先要相信自己,才能有可能成功,找些好...
其实学Delphi并不难,看你的努力程度,我才学了一个学期,就已经可以做一些小的应用软件了,
现在在接做两个大的系统,首先要相信自己,才能有可能成功,找些好的书,如《DELPHI编程技巧与实例》等,-Actually, academic Delphi is not difficult to see your efforts, I scholarship for a semester. it can do some small software applications, now done in the following two systems, we must first believe in themselves and may be successful, and find some good books, like "Delphi programming techniques and examples."
- 2022-02-03 17:50:26下载
- 积分:1
-
Delphi编写的充电器上位机程序含代码
Delphi编写的充电器上位机程序含代码-Delphi prepared charger PC program containing the code
- 2023-06-15 11:15:17下载
- 积分:1
-
ListBox
If you don t know how to use the ListBox of Delphi this source code will help you. It shows how to delete an item or just unselect it.
- 2011-09-05 15:54:52下载
- 积分:1
-
Delphi 打印图形(图片)
Delphi 打印图形,把图片打印出来,通过这个例子,你可以学习到:
strect:Trect;//定义打印输出矩形框的大小
temhi,temwd:integer;
begin
if DIGPrint.execute then
begin
temhi:=imgpic.picture.height;
temwd:=imgpic.picture.width;
while (temhi = printer.pageheight div 2)and
//将图形放大到打印页面的1/2大小
(temwd = printer.pagewidth div 2) do
begin
temhi:=temhi+temhi;
temwd:=temwd+temwd;
end;
with strect do //定义图形在页面上的中心位置输出
begin
left := (printer.pagewidth -temwd) div 2;
top := (printer.pageheight-temhi) div 2;
right := left+temwd;
bottom := top+temhi;
end;
with printer do
begin
begindoc;
canvas.stretchdraw(strect,imgpic.picture.graphic);
enddoc;
end;
end;
- 2022-10-24 23:35:04下载
- 积分:1