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; function TPluginVariation.ResetVariable(const Name: string) : boolean;
var
dummy: double;
begin 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; end;
/////////////////////////////////////////////////////////////////////////////// ///////////////////////////////////////////////////////////////////////////////