메인화면에서.. 서브 화면을 띄워서 깜빡이게 했는데
안되요...
도와주세요....
소스는
메인화면은 메신저 메인화면이고
아래는 대화창 화면 생성하는 부분입니다.
if (FrmSRecv = nil) then //폼이 없을때 새로 만들고..
begin
FrmSRecv := TFrmSRecv.Create(Application);
FrmSRecv.FrmNumber :=IDStr;
FrmSRecv.YIDName := Trim(MsgSnd.YID) ;
FrmSRecv.YID := '대화창';
FormList.Add(FrmSRecv); // 리스트에 추가
FrmSRecv.WindowState := wsMinimized;
FWI.cbSize := SizeOf(FLASHWINFO);
FWI.hwnd := FrmSRecv.Handle;
FWI.dwFlags := FLASHW_ALL or FLASHW_TIMER;
FWI.uCount := 10;
FWI.dwTimeout := 0;
FlashWindowEx(FWI);
이렇게 하니까.. 폼이 생성되는것을 깜빡하고 화면에 보이면서
작업표시줄에서 깜빡이고 있습니다.
화면에 안보이면서 바로 작업표시줄에 깜빡이게 하는 방법좀 알려주세요...