diff options
| author | Alexey Kulakov <panda75@bk.ru> | 2014-02-02 14:36:54 +0000 |
|---|---|---|
| committer | Alexey Kulakov <panda75@bk.ru> | 2014-02-02 14:36:54 +0000 |
| commit | cc497be070a8b067625080bf3920c79bb168e272 (patch) | |
| tree | 27b0dc830e7fb022ca9f252607c06b495f1f8265 /plugins | |
| parent | 08c0e3c054dbfe042fc43ea1e5fcd0a737ccaedc (diff) | |
mRadio: proxy fix - Bass don't make copy
git-svn-id: http://svn.miranda-ng.org/main/trunk@8014 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
Diffstat (limited to 'plugins')
| -rw-r--r-- | plugins/mRadio/rbass.pas | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/plugins/mRadio/rbass.pas b/plugins/mRadio/rbass.pas index c641dc6194..42bc4ffe62 100644 --- a/plugins/mRadio/rbass.pas +++ b/plugins/mRadio/rbass.pas @@ -49,6 +49,8 @@ var SaveHeader:bool;
const
+ proxy:pAnsiChar = nil;
+const
hRecord:THANDLE = 0;
procedure BassError(text:PWideChar);
@@ -278,6 +280,8 @@ begin MyFreeBASS;
if BassStatus=rbs_load then
begin
+ mFreeMem(Proxy);
+
BASS_PluginFree(0);
Unload_BASSDLL;
@@ -409,8 +413,6 @@ begin end;
function CheckBassStatus:bool;
-var
- proxy:pAnsiChar;
begin
if BassStatus=rbs_null then
MyLoadBass;
@@ -419,9 +421,9 @@ begin begin
SetBassConfig;
+ mFreeMem(Proxy);
proxy:=GetProxy(hNetLib);
BASS_SetConfigPtr(BASS_CONFIG_NET_PROXY,proxy);
- mFreeMem(proxy);
end;
if BassStatus=rbs_load then
|