Jan Flikweert
Programmer
Hi all,
This regards fluidsynth.
First of all an important remark. The VFP code I provided is not a complete working piece of code, but in short to document my questions. I also included C code from an example to illustrate how it should be used.
So my question is not how to get this code working.
I have two questions:
1. Is there a way to load a 64 bit libfluidsynth-3.dll using Wscript?
2. How to process return values like in C settings = new_fluid_settings()?
Kind regards,
Jan Flikweert
This regards fluidsynth.
First of all an important remark. The VFP code I provided is not a complete working piece of code, but in short to document my questions. I also included C code from an example to illustrate how it should be used.
So my question is not how to get this code working.
I have two questions:
1. Is there a way to load a 64 bit libfluidsynth-3.dll using Wscript?
2. How to process return values like in C settings = new_fluid_settings()?
Code:
PUBLIC WshShell AS Object,synth,settings,adriver,mdriver
WshShell = CreateObject("WScript.Shell")
PUBLIC a AS OBJECT,settings,synth,adriver,mdriver
oExec = WshShell.exec("c:\windows\system32\rundll32.exe .\bin\libfluidsynth-3.dll")
[COLOR=#3465A4][b]oExec.StdIn.WriteLine("libfluidsynth.new_fluid_settings()")[/b][/color]
oExec.StdIn.WriteLine("libfluidsynth.new_fluid_audio_driver()")
oExec.StdIn.WriteLine("libfluidsynth.new_fluid_synth()")
oExec.StdOut.ReadAll()
C:
settings = new_fluid_settings();
synth = new_fluid_synth(settings);
adriver = new_fluid_audio_driver(settings, synth);
sfont_id = fluid_synth_sfload(synth, "example.sf2", 1);
Jan Flikweert