Private job As dcstmp10.tiffstamp 'Object

Private Sub Command1_Click()

  If job Is Nothing Then _
    Set job = CreateObject("dcstmp10.tiffstamp")

  job.CopyMode = cmXOR
  job.DefaultDPI = 300
  job.CreateDirectories = False
  job.ScanSubdirectories = False
  job.FontName = "Arial"
  job.Halftone = False
  job.Labeled = Check2.Value = 1
  job.LabelMacro = "@50,42P@30A@0,0C@18H@255,0,0F" + Combo1.Text
  job.Page = 0
  job.Source = Text1.Text
  job.Target = Text2.Text
  job.Stamp = Watermark
  job.Stamped = Check1.Value = 1
  job.StampLeft = 10
  job.StampTop = 10
  job.Stretched = False

  If Not job.Run Then
    MsgBox job.ErrorMsg, , "Error during tiffSTAMP"
  Else
    Label3.Caption = "1 file stamped"
  End If

End Sub

Text printer driver

directLABEL NT extracts all text out of your printjobs and saves better formatted textfiles using heuristic algorithms. The text printer driver can be used by software integrators to provide interfaces to third party products.
Read more about Text printer driver

New release of directVIEW

Our favourite image viewer supports now more file formats than ever. We added the english language as well as an interface to our archiving solution directINDEX.
Read more about New release of directVIEW

Save money and print PCL directly

Older MS-DOS applications does not support Windows printers directly. But they often offers PCL or ESC/P output. Use a directPCL solution to intercept printer output and convert PCL printer data directly to any existing Windows printer. USB and network printers are supported as well as Postscript or other printer languages.
Read more about Save money and print PCL directly

Any questions left?

Are you not shure or do you have any further questions? Don"t hesitate, just ask us.
Read more about Any questions left?