fix for plugins without PluginVarResetVariable

This commit is contained in:
zueuk 2008-08-11 16:43:47 +00:00
parent 9663057c7a
commit 9539b0c70a

View File

@ -212,8 +212,15 @@ end;
///////////////////////////////////////////////////////////////////////////////
function TPluginVariation.ResetVariable(const Name: string) : boolean;
var
dummy: double;
begin
Result := PluginData.PluginVarResetVariable(MyVariation, PChar(Name));
if @PluginData.PluginVarResetVariable <> nil then
Result := PluginData.PluginVarResetVariable(MyVariation, PChar(Name))
else begin
dummy := 0;
Result := PluginData.PluginVarSetVariable(MyVariation,PChar(Name), dummy);
end;
end;
///////////////////////////////////////////////////////////////////////////////