AsyncPro를 사용하고 있습니다.

Comport가 오픈이 되지 않아 이렇게 질문을 드립니다.

Main이란 폼에는
     WinSockPort, SLControl, StatusLight를,

Sub01이란 폼에는
     Comport, Modem, TAPIDevice, Emulator, BPTerminal을 갖다 놓았습니다.

프로그램이 실행하여 Main폼이 보여지면 Sub01이 만들어져 Main과 함께
화면에 나타납니다.

  procedure TFrmMain.FormShow(Sender: TObject);
  begin
    with TFrmSub01.Create(Self) do begin
      Left:=0;
      Top := FrmMain.Top + FrmMain.Height;
      Show;
    end;
      .....
  end;

 
  procedure TFrmSub01.FormShow(Sender: TObject);
  begin
    //ComPort의 초기값 읽어오기
    COM      := IniFile.ReadInteger('TMI Modem Setting', 'COM', 0);
    Baud     := IniFile.ReadInteger('TMI Modem Setting', 'Baud', 57600);
    Parit    := IniFile.ReadString('TMI Modem Setting', 'Parity', 'None');
    DataBits := IniFile.ReadInteger('TMI Modem Setting', 'DataBit', 8);
    StopBits := IniFile.ReadInteger('TMI Modem Setting', 'StopBit', 1);

     if Parit = 'None'  then Parity := pNone;
     if Parit = 'Odd'   then Parity := pOdd;
     if Parit = 'Even'  then Parity := pEven;
     if Parit = 'Mark'  then Parity := pMark;
     if Parit = 'Space' then Parity := pSpace;

    ComPort.ComNumber:= Com;
    ComPort.Baud     := Baud;
    ComPort.Parity   := Parity;
    ComPort.DataBits := DataBits;
    ComPort.StopBits := StopBits;

    ComPort.Open := True;
    Modem.Initialize;
  end;

Comport의 Object Inspector의 Properties에서 AutoOpen과 Open은 False하였고

폼이 보여지면서 포트랑 데이터비트 등..을 설정하고 난 후에 Open을 시키려고

했는데 ie_NOpen-device not open이란 에러 메세지만 뜨는군요.

프로그램이 실행된 후 Comport.ComNumber는 4로 세팅이 됩니다.(COM4)

어찌할바를 모르겠습니다.

부탁드리겠습니다.

혹시 질문 내용이 빈약하여 이해를 못하신다면 세세히 적어 다시 올리겠습니다.

수고하십시오.

                                                         / 김달호, 이병덕 /