델파이 4.0 사용자 입니다.
비주얼씨로 만든 파일 뷰어 프로그램을 델파이에서 DDE를 사용하여 불러 쓸려고 합니다.
비주얼씨 프로그램의 APP. NAME은 s_view 이고 TOPIC NAME은t_view 입니다.
그리고 비주얼씨 프로그램의 파일열기의 ID는 ID_FILE_OPEN 입니다.
다음은 제가 만든 델파이 테스트 프로그램인데 제대로 작동이 안되고 자꾸 에러가 나는군요.
어디가 잘못 되었는지 델파이 고수님들의 아낌없는 지도를 바랍니다. 꾸벅<-미리인사.
procedure TForm1.BitBtn1Click(Sender: TObject);
var ppp, wfile, filename : string;
begin
filename:='c:c1.txt';
wfile:='c:viewer.exe ';
ppp:=wfile + filename;
winexec(PChar(ppp),1); <-- 여기까지는 제대로 실행됩니다
if ddeclientconv1.setlink('s_view','t_view') then <--여기서 제대로 작동이 안됩니다
begin
DdeClientItem1.DdeConv := DdeClientconv1; <-- 이부분으로 들어가질 못합니다
DdeClientItem1.DdeItem := '';
filename:='c:c2.txt';
wfile:='ID_FILE_OPEN ' + filename;
DdeClientconv1.ExecuteMacro(PChar(wfile), True);
end
else
showmessage('Connection Error');<- 실행하면 이 부분으로
떨어집니다.
end;
도대체 뭐를 잘못 썼는지를 모르겠습니다