프린트 이전에 Dr_SetFax()를 써주면 출력 화면의 내이 상대편 팩스로 전송됩니다.

 

문법(Grammar)

Dr_SetFax()

 

인수(Arguments)

없음

 

되돌림값(Return)

논리값  .t. : 팩스 보내기 성공

 

설명(Explanation)

프린트 이전에 Dr_SetFax()를 써주면 출력 화면의 내용이 상대편 팩스로 전송됩니다.

 

예제(Sample)

#include "npp.ch"
#include "print.ch"

Func Main()
     Local oWnd,  oClip := ''
     DEFINE DIALOG oWnd FROM 0,0 TO 0,0
             oWnd:Hide()
             oClip := TClipBoard():New(,oWnd)
             oClip:SetText ( "02-3424-7379" )
             oClip:End()
     ACTIVATE DIALOG oWnd NOWAIT
     PrintTest ( .t. )
     oWnd:End()
Return Nil

Func PrintTest( lFax )
      Local oPrn
      DEFAULT lFax := .f.
      If lFax
         if !Dr_SetFax()
            MsgStop("지정된 Fax가 없습니다.")
            Return Nil
         Endif
      Endif
      PRINTER oPrn NAME "FAXTEST" PREVIEW
                oPrn:Startpage()
                oPrn:Say( 10,10, "FAX TEST" )
                oPrn:EndPage()
      ENDPRINT
      if lFax
         Dr_ResFax()
      Endif
Return Nil
 

Link categories 1

Link categories 2