游子日月长

摘要： 方法如下：首先需要在uses部分加入mmsystem，接着写入下列语句，其中e:\1.mid为播放的文件，NN为自定义名称标志procedure TForm1.Button1Click(Sender: Tobject);begin//播放音乐MCISendString('OPEN e:\1.MID 阅读全文

摘要： 下面是源代码： unit Unit1; interface usesWindows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,MPlayer, StdCtrls; typeTForm1 = class(TForm 阅读全文

摘要： uses Unit2; procedure TForm1.Button1Click(Sender: TObject);begin Form2.Show; Form2.WindowState := wsMaximized; Form2.MediaPlayer1.Notify := false; For 阅读全文

摘要： Animate1.RESName := 'About'; Animate1.Active := True; 阅读全文

摘要： use mmsystem;SndPlaySound('hello.wav',SND_FILENAME or SND_SYNC) ///////////////////////////////////unit PlaySnd1; interface uses Windows, Messages, Sy 阅读全文

摘要： procedure TForm1.Button1Click(Sender: TObject);begin Application.ProcessMessages; MediaPlayer1.Open; Application.ProcessMessages; MediaPlayer1.Step; A 阅读全文

摘要： 视频采集，存成aviunit Unit1; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls; type TForm1 = class 阅读全文

摘要： 目 录 一. 视频捕获快速入门 2 二.基本的捕获设置 3 １．设置捕获速度： 3 ２．设置终止捕获 4 ３．捕获的时间限制 4 三.关于捕获窗口 4 １.创建一个AVICAP捕获窗口 5 ２．将一个捕获窗口连接至捕获设备 5 ３． 父窗口与子窗口的交互 5 ４．捕获窗口的状态 6 四.视频捕获驱动 阅读全文

摘要： 1)编写.RC文件 ..RC文件是资源的源文件，编译器也就编译这个文件，生成.RES的资源文件 首先在我们的项目子目录中建立一个纯文本文件，起名叫Sound.rc，文件中 有一行，内容为： SOUND1 WAV SOUND.WAV 其中SOUND.WAV为一个Windows下普通的声音文件 2)编译 阅读全文

摘要： 单纯的图形整体拉出效果比较简单,动态地改变图形区域的大小就可以实现,但事先应将图形的“Stretch”设置为“True”。 举例说明下拉效果: 1.在表单上放置一图片,高度为200,属性“Height”设为0,“Stretch”设置为True。添加“Timer”构件, “Interval”设为200 阅读全文