Q&A

  • 힌트 두개를 한꺼번에 띄우는 방법
질문 그대루 입니다.



그래프를 하나 그리는데 그와 관련된 힌트 두 개를 한꺼번에 띄우는 방법을 알고 싶어요..





MyHint1 := THintWindow.Create(self);//힌트 박스생성

with MyHint1 do

begin

color:=clinfobk;

activatehint(MyRect1,'aa'+ #13 + 'bb');

application.ProcessMessages;

sleep(1500);

releasehandle;

free;

end;







MyHint2 := THintWindow.Create(self);//힌트 박스생성

with MyHint2 do

begin

color:=clinfobk;

activatehint(MyRect2,'cc' + #13 + 'dd');

application.ProcessMessages;

sleep(1500);

releasehandle;

free;

end;





어떤 님의 코드는 보구, 이렇게 작성을 하구 보니까 힌트1이 뜨고 난 후 힌트2가 뜹니다.



제가 원하는 작업은 힌트1과 힌트2가 동시에 떠서 동시에 사라지는 것이거든요..



잠시만 시간을 내서 답변 해 주세요..

1  COMMENTS
  • Profile
    양병규 2000.12.08 01:30
    MyHint1 := THintWindow.Create(self);//힌트 박스생성

    MyHint2 := THintWindow.Create(self);//힌트 박스생성



    with MyHint1 do

    begin

    Color:= clInfobk;

    ActivateHint(MyRect1,'aa'#13'bb');

    Update;

    end;



    with MyHint2 do

    begin

    Color:= clInfobk;

    ActivateHint(MyRect2,'cc'#13'dd');

    Update;

    end;



    Sleep(1500);



    with MyHint1 do

    begin

    ReleaseHandle;

    Free;

    end;



    with MyHint2 do

    begin

    ReleaseHandle;

    Free;

    end;



    그럼

    평안하시길~