|
아래글은 10초마다 HostIP.txt 파일에 저장된 HOST로 Telnet 접속을 수행하게
하는 내용입니다.
I_host는 전역변수로 선언하고,
HostIP.txt 파일의 내용에 따라 무한하게 루프를 돌리는 형식입니다.
그런데 도무지 이해할 수 없는 것은...
아래와 같이 수행하면 정상적으로 실행되지만,
ShowMessage(IdTelnet1->Host); 를 주석처리하면 두번째 호스트부터는 실행되지 않습니다.
아마도 사용자로부터 프로그램이 키 입력을 받으면 처리가 되는것 같기도 합니다.
그래서, 혹시 편법으로 Message Box가 뜨면 이 박스를 죽일 수 있는
방법이 없을까요?
---------------------------------------------------------------------
Timer4->Interval = 10000;
Label5->Caption = TimeToStr(Time());
AnsiString Temp_Host;
TStringList *Search_List = new TStringList(); // 알람 검색문자열
Search_List->LoadFromFile("C:\\HostIP.txt");
if(!(IdTelnet1->Connected())) {
if( I_host < Search_List->Count) {
Temp_Host = Search_List->Strings[I_host];
IdTelnet1->Host = Temp_Host;
//
ShowMessage(IdTelnet1->Host);
//
IdTelnet1->Port = StrToInt(PortNo->Text);
IdTelnet1->Connect();
ListBox5->Items->Add(Search_List->Strings[I_host]);
ListBox5->Items->Add(I_host);
Connect->Enabled = FALSE;
Button8->Enabled = FALSE;
Disconnect->Enabled = TRUE;
I_host=I_host++;
}
else { I_host=0;}
}
|