소스에서 작업을 할때는 아래에 있는 내용이 문제가 없는데...
셋업파일을 만들어서 다른 컴퓨터에서 작업을 하면
엑셀을 폼위로 가져오기는 하는데..
소스에서 작업할때처럼.. 엑셀 전체를 메뉴,툴바가 보이는데..
셋업파일로 다른컴퓨터에서 실행을 하면 메뉴,툴바가 하나도 안보입니다.
셋업만들때 제가 무엇을 빠트렸나요..
알려주세요...
procedure TFrmMain.FormShow(Sender: TObject);
Var wnd: HWND;
begin
try
XLApp:= CreateOleObject('Excel.Application');
except
ShowMessage('엑셀이 설치되어있지 않습니다.');
exit;
end;
XLApp.Visible := True; //엑셀실행
wnd := findwindow('XLMAIN', nil );
Windows.SetParent(wnd, Panel1.Handle); //Panel1.Handle
SetWindowPos( wnd, Panel1.Handle , 0, -26, Panel1.clientwidth, Panel1.clientheight , SWP_NOZORDER or sWP_SHOWWINDOW ); //엑세을 실행하여.. panel1올려보여줌
end;
문제는요.. xlApp.Visible := True만하면 엑셀 실행된것 메뉴 툴바.. 이런것들이 전부 보이는데
그및문장을 실행화면 메뉴 툴바들이 하나도 안보여서 프로그램을 사용할수 없네요...
왜이런현상이 일어나나요...
알려주세요..