Delphi를 사용하여 IE Windows를 제어하십시오

저자：Eve Cole 업데이트 시간：2025-02-17 03:48:01

프로그램 설명

이 프로그램은 IE를 열고, 지정된 웹 페이지에 링크하고, IE 주소 표시 줄에서 URL 주소 정보 및 창 이름을 얻고, 최근에 열린 창을 활성화하고, 최근에 열린 창을 닫는 데 사용됩니다. 프로그램 인터페이스는 그림 1에 나와 있습니다.

디자인 생각

이 프로그램에서 IE를 사용하여 DDE를 사용하여 IE가 먼저 실행되도록하는 데 도움이되는 방법은 여러 가지가 있습니다. DDE 클라이언트가 되십시오. DDE 클라이언트는 실행되지 않은 서버로 데이터를 교환 할 수 없습니다. 이 프로그램에서는 API 기능 ShellexEcute에 전화하여 IE를 열어줍니다.

그림 1

이 프로그램에서 DDE 클라이언트를 사용할 때 클래스 TDDECLIENTCONV의 다음 기능과 절차가 사용됩니다.

함수 setLink (string; 주제 : string) : boolean;

그중에는 DDE 서버의 애플리케이션 이름이 있습니다. 함수에 따라 SetLink는 세션 주제를 성공적으로 반환하는 데 사용됩니다.

디자인 단계

새 응용 프로그램을 작성하고 두 개의 편집 구성 요소와 6 개의 버튼 구성 요소를 양식에 추가하십시오. 각 구성 요소의 특성은 그림 2에 나와 있습니다.

그림 2

용도에 ddeman, shellape 및 comobj 유닛에 대한 참조를 추가하고 tddeclientconv 유형의 전역 변수 dde를 정의하십시오.

관련 코드를 작성하십시오

.... var dde : tddeclientconv; // dde는 양식 프로 시저를 생성 할 때 DDE 클라이언트를 만듭니다. = tddeclientconv.create (self); // 기본 브라우저를 시작하고 지정된 웹 페이지를 자동으로 엽니 다. Tobject); shellexecute를 호출하여 기본 브라우저를 열고 창 모드를 SW_SHOWNORMAL SHELLEXECUTE (핸들, NIL, PCHAR ( ''http://www.chinaren.com/index.shtml ''), NIL, NIL로 설정하십시오. , sw_shownormal; explore '', 'www_getwindowinfo') 그런 다음 dde.openlink를 시작합니다 실행되지 않습니다. ') 지정된 웹 페이지 dde.requestdata에 링크하십시오 IE 버튼은 최근에 열린 IE 창 프로세스를 활성화합니다. BUTTON4CLICK (Sender : Tobject); 1 ''); dde.closelink; DDE.SETLINK ( 'IEXPLORE' ','www_Exit ')를 시작하면 DDE.OpenLink를 시작합니다. ); 끝.