mirror of
https://github.com/moparisthebest/Simba
synced 2024-11-28 20:12:16 -05:00
Simba: Socks Fix
This commit is contained in:
parent
3874776aab
commit
7dc15679e7
@ -119,6 +119,7 @@ type
|
|||||||
Prop: TScriptProperties;
|
Prop: TScriptProperties;
|
||||||
Client : TClient;
|
Client : TClient;
|
||||||
MInternet : TMInternet;
|
MInternet : TMInternet;
|
||||||
|
Socks: TSocks;
|
||||||
StartTime : LongWord;
|
StartTime : LongWord;
|
||||||
Settings: TMMLSettings;
|
Settings: TMMLSettings;
|
||||||
SimbaSettingsFile: String;
|
SimbaSettingsFile: String;
|
||||||
@ -309,6 +310,7 @@ begin
|
|||||||
if Assigned(OpenFileEvent) then
|
if Assigned(OpenFileEvent) then
|
||||||
Client.MFiles.OpenFileEvent := OpenFileEvent;
|
Client.MFiles.OpenFileEvent := OpenFileEvent;
|
||||||
MInternet := TMInternet.Create(Client);
|
MInternet := TMInternet.Create(Client);
|
||||||
|
Socks := TSocks.Create(Client);
|
||||||
if Assigned(OpenConnectionEvent) then
|
if Assigned(OpenConnectionEvent) then
|
||||||
MInternet.OpenConnectionEvent := Self.OpenConnectionEvent;
|
MInternet.OpenConnectionEvent := Self.OpenConnectionEvent;
|
||||||
SyncInfo:= TheSyncInfo;
|
SyncInfo:= TheSyncInfo;
|
||||||
|
Loading…
Reference in New Issue
Block a user