안녕하세요..!!
퍼온 소스라서 자세히 이해는 안되는되요.. 다음과 같은 Procedure를
호출해서 해당 디렉토리에 있는 동영상(mpg)파일을 재생하는 건데요..
제가 묻고자 하는건 두가지 입니다.
1. 동영상이 반복적으로 계속 재생되게 하는 문제
2. 꽉찬 화면으로 재생되게 하는 문제.
    동영상 재생 화면의 크기를 어떻게 크게 할 수 있나요?
    테이블 크기와는 아무 관계가 없던데요..

도움 부탁드립니다. 감사합니다.  

procedure Tadmanager_form.AddMovies(const doc: Ihtmldocument2;MoviePath :String);
var
htmldoc,doc2    : olevariant;
MovieTag,header,tail   : WideString;

begin
//웹문서에 동영상광고를 삽입한다.
  MoviePath := 'File:///C:ProjectClessonLesson1.mpg';
  header := '<center><table border=0 width=700 Height=500            bgcolor=black><tr><td align=center bgcolor=black>';
  tail   := '</td></tr></table></center>';
  //embed tag사용시
  MovieTag := '<embed width=700 height=290 src=' + MoviePath + ' showControl=false autostart=true  >';
  MovieTag := header + MovieTag + tail;
  doc2 := doc;
  htmldoc  := doc.selection.createRange as IhtmltxtRange;
  htmldoc.pasteHTML(MovieTag);
end;