Delphi 2006中的MIDIYOKE

概述我正在使用delphi中的应用程序.我需要使用MIDIYOKE将我的应用程序的输出发送到另一个应用程序.第二个应用是虚拟钢琴键盘. 我安装了所有的软件包并在delphi中获得了MIDI组件. 我尝试使用MidiOutputPort1和MidiInput1组件. 我试过播放一个MIDI.代码如下： procedure TForm3.Button1Click(Sender: TObject);var 我正在使用delphi中的应用程序.我需要使用MIDIYOKE将我的应用程序的输出发送到另一个应用程序.第二个应用是虚拟钢琴键盘.

我安装了所有的软件包并在delphi中获得了MIDI组件.

我尝试使用MidioutputPort1和MIDiinput1组件.
我试过播放一个MIDI.代码如下：

procedure TForm3.button1Click(Sender: TObject);varoutputPort : TMidioutputPort;begin outputPort := TMidioutputPort.Create (Nil);   try    outputPort.PortID := -1;    outputPort.Active := True;    outputPort.PatchChange(0,127,0); // Gunshot    outputPort.NoteOn (1,20,127);    // Play note at full volume    Sleep (1000);    outputPort.NoteOff (0,60,0);finallyoutputPort.Freeendend;

我想在我的应用程序和虚拟钢琴键盘之间建立联系.如何使用MidioutputPort1和MIDiinput1进行两者之间的连接.

解决方法 如果两个应用程序都支持MIDI同步,则可以使用MIDI同步.在这种情况下,MIDIYOKE是主设备,Vpk是从设备.同步由以下命令处理：

mc_MIDI_Timing_Clock           = $F8;mc_MIDI_Start                  = $FA;mc_MIDI_Continue               = $FB;mc_MIDI_Stop                   = $FC;

我在很久以前就用它,所以我的知识有点生疏.我可以从我的代码中收集到的是它的工作方式如下：将slave设置为slave / sync receive /无论它被称为模式.接下来将$FA发送到您选择的频道.一些(并非所有)奴隶要求您收听特定频道.

在每个时钟滴答声,首先发送$F8.接下来发送消息,前面是$FB消息(两个数据字节都为零).当你准备好发送$FC.

总结

以上是内存溢出为你收集整理的Delphi 2006中的MIDIYOKE全部内容，希望文章能够帮你解决Delphi 2006中的MIDIYOKE所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。