류종택 님이 쓰신 글 :
: 질문하시는 거야 질문답변 게시판인데 염치없을 실 필요가^^
:
: 여하튼..
: TTimer를 사용하시면 간단할 것 같은데염..
:
: procedure TForm1.Timer1Timer(Sender: TObject);
: begin
:   Timer1.Tag:= Timer1.Tag  xor 1;
:   If Timer1.Tag = 1 then Panel1.Color:= clRed
:   Else  Panel1.Color:= clGreen;
:
:   // 얼마 이상 시그날이 안오면 멈출 것인가?
:   Tag:= Tag + 1;
:   If Tag > 10 then Timer1.Enabled:= False;
: end;
:
: 시그널이 들어올 때..
:   Tag:= 0;
:   Timer1.Enabled:= True;
:
: 사실 시그널이 들어올 때 마다..
:   Panel1.Tag:= Panel1.Tag  xor 1;
:   If Panel1.Tag = 1 then Panel1.Color:= clRed
:   Else  Panel1.Color:= clGreen;
: 처럼하는 것이 더 좋지 않을 까 합니다..

Panel1.Tag를(을) 구현하셨는데  Panel1.Color로쓰는것과비교 설명부탁합니다..
그리고 If Tag > 10 Then...여기서 10 은무엇을 의미합니까..
항상 행복하세요...  
:
:
: Voice of Delphi, 류..
:
: 남바다 님이 쓰신 글 :
: : 안년하세요 건강하시죠?
: : 다름이니고요.
: : 페널의 칼라(적,녹색)를 외부(com1 port)에서 데이타값이날라오는동안은 페널의칼라값이
: : 적색이 캄박캄박,날라오는값이 없으면 녹색으로 표현하고싶은데 잘안되네요..
: : 구현방법을 부탁합니다..(염치없음)^^
: :