Q&A

  • 실행시에 shockwaveFlash만드는 방식이 있나요?
제가 실행시에 shcowaveFlash를 만들려고 하였습니다. 그러나 전혀 만들어 지지 않습니다. 아시는 분들께 답변 부탁드립니다. 델파이에서 shockwaveflash 사용은 정말 힘든것 같습니다.



코딩 부분

procedure TpusanInfo.FormCreate(Sender: TObject);

var

pswf : TshockwaveFlash;

begin



pswf := TshockwaveFlash.Create(self);

pswf.Movie := 'c:pswf1.swf';

pswf.Playing := true;

pswf.Loop := false;

pswf.Width := 257;

pswf.Height := 179;

pswf.Top := 150;

pswf.left := 32;



end;



그럼 즐거운 하루 되세요..

1  COMMENTS
  • Profile
    바보 2000.12.13 05:23
    이건 제가 안것이 아니고.. 김백운씨가 가르쳐 주더군요!!!

    (김백운씨 나 이쁘져``)



    pswf.Parent := self; //요렇게 추가해주면 되겠죠.. ^^



    윤미영씨는 shockwaveFlash로 어떤 비밀 프로젝트를 하시나?

    지난번에 shockwaveFlash 배경투명화 시키는법 물어 보셨던가? 나도 모르는데..

    아시면 좀 가르쳐주세요!!



    - 맨날 땅만 파고 있는 바보가 -



    윤미영 wrote:

    > 제가 실행시에 shcowaveFlash를 만들려고 하였습니다. 그러나 전혀 만들어 지지 않습니다. 아시는 분들께 답변 부탁드립니다. 델파이에서 shockwaveflash 사용은 정말 힘든것 같습니다.

    >

    > 코딩 부분

    > procedure TpusanInfo.FormCreate(Sender: TObject);

    > var

    > pswf : TshockwaveFlash;

    > begin

    >

    > pswf := TshockwaveFlash.Create(self);

    > pswf.Movie := 'c:pswf1.swf';

    > pswf.Playing := true;

    > pswf.Loop := false;

    > pswf.Width := 257;

    > pswf.Height := 179;

    > pswf.Top := 150;

    > pswf.left := 32;

    >

    > end;

    >

    > 그럼 즐거운 하루 되세요..