`source/TargetB.pas` is an invalid unit, likely should be dropped

[darianmiller]

Inside the unit is unit AdFaxCtl; so it's mismatched.

It also has invalid code

destructor TApdFaxDriverInterface.Destroy;
begin
  fFileName := '';
  fDocName := '';
  if not (csDesigning in ComponentState) then begin
    if IsWinNT then
      with MonitorThread do begin
        Terminate(); //!! Issue 1183814

          SetEvent(Events[0]);     // tell monitor thread to terminate
        while not ThreadCompleted do Sleep(100);  // wait for it to do so before we pull the carpet //!! Issue 1183814
        end;
        CloseHandle(Events[0]);
        CloseHandle(Events[1]);
        CloseHandle(MonitorThread.Pipe);
        if Semaphore <> 0 then
          CloseHandle(Semaphore);
        Free;
      end
    else
      DeallocateHWnd(FWindowHandle);
  end;
  inherited Destroy;
end;

Properly formatted, easier to see the issue:

destructor TApdFaxDriverInterface.Destroy;
begin
  fFileName := '';
  fDocName := '';
  if not (csDesigning in ComponentState) then
  begin
    if IsWinNT then
      with MonitorThread do
      begin
        Terminate(); //!! Issue 1183814

        SetEvent(Events[0]); // tell monitor thread to terminate
        while not ThreadCompleted do Sleep(100); // wait for it to do so before we pull the carpet //!! Issue 1183814
      end;
    CloseHandle(Events[0]);
    CloseHandle(Events[1]);
    CloseHandle(MonitorThread.Pipe);
    if Semaphore <> 0 then
      CloseHandle(Semaphore);
    Free;
  end
  else
    DeallocateHWnd(FWindowHandle);
end;
inherited Destroy;
end;