anchor.diff:    chkRecvOnLog.Checked := lvDValue.ForceByName('chk_recvonlog').AsBoolean;
     chkSendData.Checked := lvDValue.ForceByName('chk_send_onconnected').AsBoolean;
   
  +
     chkHex.Tag := 1;
     chkHex.Checked := lvDValue.ForceByName('chk_send_hex').AsBoolean;
     chkHex.Tag := 0;
  
positive.code:       lvClient.AutoReConnect := true;
        lvClient.connectASync;
      end;
    finally
      SpinUnLock(FSpinLock);
    end;
  
negative.code:   finally
      SpinUnLock(FSpinLock);
    end;
  
    Self.Caption := 'diocpv5 echo client[stop]';
  end;
  
  procedure TfrmMain.btnConnectClick(Sender: TObject);
  