Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. newtofoxpro

    Install Barcode Font programmatically

    VFP9SP2, Windows 10 With the help of this thread I tried but no success https://www.tek-tips.com/viewthread.cfm?qid=938702 1. I have tried myapp.exe run as Administrator 2. At DOS-Prompt CMD.EXE I found FREE3OF9.TTF file exist. DIR c:\windows\fonts\FREE3OF9.TTF 3. But does not appear in...
  2. newtofoxpro

    Fatal error: exception code=c0000029

    User reported, this error occurs any time anywhere in exe compiled by vfp9. Is it possible to solve this error ? And myapp.exe crash and generate error log file myapperr.log
  3. newtofoxpro

    Signed QR Code data

    E-invoice. Signed QR Code data string is approx 900+ character. I am looking for best way to store/save in DBF free tables Thanks in advance
  4. newtofoxpro

    libharu : Link Annotation

    Is it possible to create "Link Annotation" with libhpdf.dll in vfp ? I trying Annot=HPDF_Page_CreateLinkAnnot(IndexPage,Rect,Dst) stuck at "Rect
  5. newtofoxpro

    BINDEVENT GetKeyState

    PUBLIC ofrm ofrm = CREATEOBJECT("MyForm") ofrm.show(1) RETURN DEFINE CLASS MyForm as Form AutoCenter=.T. ADD OBJECT txt1 as textbox ADD OBJECT txt2 as textbox WITH Top=50 ADD OBJECT cmd as commandbutton WITH top = 100, Height=100, Width=thisform.width, Visible=.F. PROCEDURE Init...
  6. newtofoxpro

    Image in ReportListener

    I am using ReportListener class for watermark. Working fine if Image exist in HDD. What I am trying If image include in EXE. watermark does not print. loBmp = CREATEOBJECT("GpBitmap") loBmp.CreateFromFile(This.watermarkimage)] Is it possible to call image/jpg/png from exe ?
  7. newtofoxpro

    Single User App

    Code not tested. This is my idea, Pls post yours. ApplicationType="SingleUser" IF !FILE("users.dbf") CREATE TABLE users.dbf (CompName c(20), UserName c(20)) USE ENDIF USE users.dbf IN 0 ALIAS "users" ON ERROR WAIT WINDOW NOWAIT "" SET REPROCESS TO 1 DELETE FOR LOCK() IN users INSERT...
  8. newtofoxpro

    Select Sql Sum group by

    CREATE CURSOR CurTrn (TrnTpe c(10), TrnProd c(20), TrnQty n(15,2), TrnRate n(15,2), TrnRPer c(5), TrnAmt n(15,2)) INSERT INTO CurTrn VALUES ("SALE","PENCIL",10,4,'Pcs',50) INSERT INTO CurTrn VALUES ("SALE","PENCIL",10,5,'Pcs',60) INSERT INTO CurTrn VALUES ("FREE","PENCIL",10,0,' ',0) SELECT...
  9. newtofoxpro

    Gmail via cdo2000

    I am sending email/gmail via following methods 1> http://fox.wikis.com/wc.dll?Wiki~CdoEmail I got error : 1429 Mesaje : OLE IDispatch exception code 0 from CDO.Message.1: The transport failed to connect to the server. 2> another try with...
  10. newtofoxpro

    date textbox

    oForm=CREATEOBJECT("myForm") oForm.show() READ EVENTS RETURN DEFINE CLASS myForm as Form visible=.T. ADD OBJECT mDate as textbox WITH top=10, Left=10 ADD OBJECT mCode as textbox WITH top=50, Left=10 PROCEDURE Init this.mDate.StrictDateEntry=0 this.mDate.Value=DATE()...
  11. newtofoxpro

    Hide ProgressBar in Zipping.

    http://www.tek-tips.com/faqs.cfm?fid=5113 Pls refer above link. 1. How to hide ProgressBar in Zipping. 2. Detect zipping completion. Thanks & Best Regards.
  12. newtofoxpro

    use again

    set exclusive off use tran.dbf in 0 alias "TranEdit" index tran.cdx order 1 use tran.dbf in 0 alias "TranRead" index tran.cdx again exclusive noupdate order 1 when I have to read data I use "TranRead" and insert/change I use "TranEdit" anybody finds speed advantage to another user in lan ...
  13. newtofoxpro

    Classes Procedure & Events

    Possibility no no. I want to know best practices. Small procedures which needed frequently in various places in the project, I kept in MainProc.prg & set proc to MainProc.prg in main prg. PROCEDURE myDate PARAMETERS InMyDate RETURN DMY(InMyDate) ? MyDate(date()) Another way...
  14. newtofoxpro

    Unique ID from String

    I want to generate Unique ID from String. For Example . SYS(2007,padr("HI",70)) But sys(2007) generate same id from two string. Thanks & Best Regards.
  15. newtofoxpro

    In Grid, two fields as one

    CREATE CURSOR myCursor (Fld1 c(40), Fld2 n(15,2)) INSERT INTO myCursor (Fld1,Fld2) VALUES ("Good",741.52) INSERT INTO myCursor (Fld1,Fld2) VALUES ("Better",9887.52) SELECT * FROM myCursor INTO CURSOR myCursor oForm=CREATEOBJECT("myForm") oForm.show() READ EVENTS DEFINE CLASS myForm as Form...
  16. newtofoxpro

    Report should print JPEG when exist.

    I have build report having logo.JPEG image. It runs fine. But when image does not exist, vfp open file picker. I want report should print when image exist in same folder and should not print when image does not exist and should not generate any error or file picker. Thanks in advance
  17. newtofoxpro

    Building myapp Installer

    I am using InnoSetup now. It's working well. Being not expert I cannot use it well. I want... When User run Setup.exe Screen (1) : Should Show What setup is going to install. i.e. Info about myapp. Screen (2) : Which Edition User want to Install? <Single/MuliUser> (Radio-Button) In Case...
  18. newtofoxpro

    mscomm32.ocx beyond port limit

    Using Xp, VFP9. As I learn it's limit is 16. I have found some info to alter mscomm32.ocx unofficially. And provide information does not worked for me. Please help
  19. newtofoxpro

    Report on pre-printed paper

    This is FPW code PosFromTop = 3 PosFromLeft = 2 SpaceBetweenCharactor = 2.5 WhatToPrint = "MY NAME IS JOHN" @ PosFromTop,PosFromLeft say SUBSTR(WhatToPrint,1,1) size 1,SpaceBetweenCharactor FOR mCnt=2 TO LEN(WhatToPrint) @ $,$ say SUBSTR(WhatToPrint,mCnt,1) size 1,SpaceBetweenCharactor...
  20. newtofoxpro

    Help on Control

    I have added three textboxs. one,two,three . At When event of two, I have added Grid Control and focus on it. When I press <enter> focus should shift to control three. Or press <Shift+Tab> control should shift to one. How to do this ? Best Regards.

Part and Inventory Search

Back
Top