Changeset 129 for PinConnection/UCommThread.pas

Timestamp:

Jan 17, 2011, 6:55:36 AM (13 years ago)

Author:

george

Message:

• Modified: Thread exception handling through global handler.
• Modified: CoolStreaming BitStream demo use AsString property.

File:

• PinConnection/UCommThread.pas (modified) (3 diffs)

PinConnection/UCommThread.pas

@@ -6 +6 @@
 
 uses
-  Classes, SysUtils, blcksock, UCommPin, SyncObjs, UStreamHelper;
+  Classes, SysUtils, blcksock, UCommPin, SyncObjs, UStreamHelper, UCommon;
 
 type
@@ -16 +16 @@
 
   TCommThreadReceiveThread = class(TThread)
+  public
     Parent: TCommThread;
     Stream: TMemoryStream;
@@ -130 +131 @@
     except
       on E: Exception do
-        //MainForm.ExceptionLogger1.ThreadExceptionHandler(Self, E);
+        if Assigned(ExceptionHandler) then ExceptionHandler(Self, E);
     end;
   until Terminated;