popup menus

TheMSsForum.com: The Microsoft Software Forum

The MSS Forum ‹ Exchange Fox
- Archive
  - Biz
  - MCSE
  - CRM
  - Drivers
  - Framework
  - ADO
  - ASP
  - Compact
  - Forms
  - Dotnet
  - C#
  - VB
  - FontpageGen
  - Excel
  - WorkSheet
  - Exchange
  - Setup
  - Fox
  - Fontpage
  - ASP
  - IIS
  - Entourage
  - Money
  - Messanger
  - PocketPC
  - Powerpoint
  - Project
  - Publisher
  - Excel
  - VB
  - Security
  - Portal
  - Services
  - SQLServerDev
  - SVCS
  - SQLServer
  - VB
  - VC
  - MFC
  - ExcelGen

- Previous
  - 1
    - Foxuser.dbf file cause application crash I have this this problem on Win2000 only systems: my application crashes very early at startup, I found it doesn't crash if I: - flag foxuser.* files as read-only - delete foxuser.* files (but in this way it crashes next startup) This never happened in the past and I can't find a reason. At startup I SET RESOURCE OFF. I changed nothing in my startup procedure. -- Andrea Mariottini Tag: popup menus Tag: 178578
  - 2
    - modify contents within a memo field I have to change some contents within a memo field programmatically. For example , the contents of a memo field are Name = "lblV_partybuzlist_cAbbr" Caption = "Abbr" Left = 9 Top = 14 cfield = V_PARTYBUZLIST.CABBR lgetcaption = .T. Name = "lblV_partybuzlist_cAbbr" I want to change the lgetcaption = .T. to .F. I have written some codes to do it but I feel it is a bit clumsy. Does everyone has any better ideas ? the code I have written is as follows: REPLACE apresent.properties WITH ; SUBSTR(apresent.properties, 1, ATCC("lgetcaption = "), apresent.properties) + 13) ; + ".F." + ; SUBSTR(apresent.properties, ATCC("lgetcaption = "), apresent.properties) + 17) Any comments are welcome. Matthew Tag: popup menus Tag: 178572
  - 3
    - Why VFP not popular in academic? Is there any of you have heard VFP is uses for academic purpose? Recently I plan to continue my studies but as far as I seen all the academic test don’t use VFP as their test or even worse I never heard VFP is one of common language uses in academic purpose. Frankly I try to apply at academic with the student get their financial aid, but it don't use VFP as their evaluation process test, I am very disappointed. Does any of you know where VFP is uses for academic evaluation process test, I would very happy to heard that. no VFP in evaluation process test, ie: http://www.mum.edu/compro/index.html Tag: popup menus Tag: 178570
  - 4
    - MSDN download of Visual Foxpro 6.0 Sorry if I missed this one in the faqs. I just received my MSDN subscription and it includes VFP 8.0. Most of my development is in 6.0 How can I download the install CD-ROM's for 6.0? ...JS Tag: popup menus Tag: 178553
  - 5
    - Index corruption Hello Group, I wonder if there is a way to detect index corruption at run time. I want to detect corruption when my app is lunched so I can fix it and avoid subsequent troubles and error messages presented to the user. I appreciate any help in the subject. TIA Carlos Jones Tag: popup menus Tag: 178544
  - 6
    - GETFILE() position I use getfile() in a small app. When running directly in VFP8, it works fine. I compile the EXE and the open dialog box from getfile() is shown off screen. I have to right-click the task icon and select move to get it to show. I have SCEEN=OFF in my config.fpw. Does that matter? Tag: popup menus Tag: 178542
  - 7
    - ODBC REPORD LOCKING EXAMPLE *!* This program is example of using ODBC to update tables and uses timestamp to take care of record lock when updating and *!* inserting. It uses set prop to make sure tables can be reverted in case of error. It is very important to have .001 time *!* delay in inserting and updating records because FoxPro does not give time in thousand of a second. In putting .001 it *!* makes sure that you get all unique records. ***************************************************************************************************************************** *!* Make table with four fields Date --- date() * *!* Sec --- 10,5 numeric use SECOUND() function * *!* Name --- Character 10 * *!* Lname--- Character 10 * ********************************************************************************************* clear ERROR1 =.f. UPDATELOCK = 0 set safety off sqldis(0) connection = sqlconnect('VfpTables'," "," ") ?connection nprop= SqlSetpro(connection,"transactions",2) if nprop = 1 for i= 1 to 100 wait window('wait..') timeout .001 && important delay for time stamp wait window("Updating Tabel " + str(i)) nowait Query1 ="Select * from datetime " NRESULT = SQLEXEC(connection,Query1,'temp') if NRESULT !=1 =aerror(x) =messagebox(x(2)+ chr(13)+Query1) =SQLDISCONNECT(connection) ERROR1 = .t. endif select * from temp into table counter use in counter do while UPDATELOCK = 0 && to make sure record is not changed Query1 = "Select *,"+str(second(),10,4)+" AS NEW_TIME,"+; && update current time to timestamp in temp table str(i)+" AS CREATSTAMP"+; && this line is not needed " From counter "+; " WHERE counter.lastname = 'KHAN'" NRESULT = SQLEXEC(connection,Query1,'temp') if NRESULT !=1 =aerror(x) =messagebox(x(2)+ chr(13)+Query1) =SQLDISCONNECT(connection) ERROR1 = .t. endif Query1= "update datetime set name ='AAA',Sec ="+str(temp.New_Time,10,4)+" where LastName ='KHAN'"&& update real table with temp timestamp NRESULT= SQLEXEC(connection,Query1) if NRESULT != 1 =aerror(x) ERROR1 = .t. =messagebox(x(2)+ chr(13)+Query1) wait window " Insert failed." ERROR1= .t. endif Query1 = " select * from datetime "+; " WHERE Lastname= '"+alltrim(temp.Lastname)+"' AND Sec ="+str(temp.New_Time,10,4)&& if time in real table =time in temp table you can update NRESULT = SQLEXEC(connection,Query1,'Temp1') if NRESULT != 1 =aerror(x) ERROR1 = .t. =messagebox(x(2)+ chr(13)+Query1) wait window " Query failed." ERROR1= .t. else if reccount()> 0 && as long as record is zero you keep trying to update. UPDATELOCK =1&& as soon as u get record which means you have unique timestamp and u get out of the loop endif endif enddo if ERROR1 = .t. =sqlrollback(connection) ERROR1 = .f. messagebox ('Some Error Happened Nothing Saved',32,'Error') exit else =sqlcommit(connection) endif endfor wait clear else messagebox('Set ProP Error ',32,'Error') endif Tag: popup menus Tag: 178528
  - 8
    - Problems with MP3 file played by MCI object Hi, I have a sound problem using MCI object to play a MP3 file... The problem is the sound is not clean... I hear some "plock" in the background of the sound. Anyone know this problem ? Thank for ur help !!! Mike Tag: popup menus Tag: 178521
  - 9
    - Changing the class of an object If I want to change the class of objects in a .vcx, do I open the .vcx as a table and just replace the class type as long as the base classes match and recomplie the code? What other steps are needed, if any? Thanks. Tag: popup menus Tag: 178504
  - 10
    - RUN Function misbehavior in VFP8 DIR Function behaves differently in VFoxPro 8: instead of simply returning a list of the files in a directory (each on a line) it returns the names of the files disposed in a two-column format, except for those files with long names, which occupy a whole line. Since each line may contain the name of more than one file, the function became useless as a way to verify contents of a directory. I have not found a way to make DIR behave as it used to behave (a single file name on each line), is there a way? Tag: popup menus Tag: 178492
  - 11
    - SQL server developers' edition This is a multi-part message in MIME format. ------=_NextPart_000_0016_01C35907.40E61710 Content-Type: text/plain; charset="Windows-1252" Content-Transfer-Encoding: quoted-printable Looks like the price of the SQL server developer edition has been = slashed to $49 from $499 Does anyone know this version has got any limit on the evaluation period = ? EULA does not say anything about it. sp ------=_NextPart_000_0016_01C35907.40E61710 Content-Type: text/html; charset="Windows-1252" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=3DContent-Type content=3D"text/html; = charset=3Dwindows-1252"> <META content=3D"MSHTML 6.00.2800.1170" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3DArial size=3D2>Looks like the price of the SQL server = developer=20 edition has been slashed to $49 from $499</FONT></DIV> <DIV><FONT face=3DArial size=3D2>Does anyone know this version has got = any limit on=20 the evaluation period ? EULA does not say anything about = it.</FONT></DIV> <DIV><FONT face=3DArial size=3D2></FONT> </DIV> <DIV><FONT face=3DArial size=3D2>sp</FONT></DIV></BODY></HTML> ------=_NextPart_000_0016_01C35907.40E61710-- Tag: popup menus Tag: 178487
  - 12
    - VFP 8 ( SETALL AND BindEvents) Hi all, I would like bind all the events keypress() of several textbox of a page (pageframe) to thisform.mymethode. How can i do it ? Thanks in advance bernhart Tag: popup menus Tag: 178483
  - 13
    - Scrollbars don't show on my Form. Why doesn't my scrollbars show on my form (VFP 8)? Below is an example of code where I have a grid larger than the width and height of my form, but the scrollbars do not show on my form! What am I missing here? THX - Mike Farnesi MYFORM=CREATEOBJECT('FORM') WITH MYFORM .SCROLLBARS=2 .ADDOBJECT('MYGRID','GRID') WITH .MYGRID .TOP=0 .LEFT=0 .WIDTH=2000 .HEIGHT=2000 .VISIBLE=.T. ENDWITH .SHOW ENDWITH Tag: popup menus Tag: 178467
  - 14
    - indexseek() and buffering does buffering mode (buffering mode 5, optimistic table buffering) affect indexseek()? I am adding many records to a table and then at end do a tableupdate() to update all the added records. During the process I am using indexseek to make sure I am not adding duplicate records? Another programmer keeps saying that indexseek() will not be able to find the newly added records with buffering on. I did a small test and it seems to work for me. Anybody with experience with this? Tag: popup menus Tag: 178466
  - 15
    - How to detect that window has changed I use FPW2.6a, and I have a screen with 2 browse windows A and B. Then I issue a READ CYCLE with A,B DEACTIVATE .T. VALID .F. I would like to trap when the user clicks with the mouse from one browse window to the other. I have tried to put code into the deactivate routine, but no result. Any good idea what to do? Tag: popup menus Tag: 178465
  - 16
    - browse window with different fonts I still use FPW 2.6a, and I would like to create a browse window that contains different fonts or styles in certain columns or rows. Is that possible? Tag: popup menus Tag: 178445
  - 17
    - still get fatal errors any news about this problem ? -- George Malekkos --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.504 / Virus Database: 302 - Release Date: 24/7/2003 -----= Posted via Newsfeeds.Com, Uncensored Usenet News =----- http://www.newsfeeds.com - The #1 Newsgroup Service in the World! -----== Over 80,000 Newsgroups - 16 Different Servers! =----- Tag: popup menus Tag: 178444
  - 18
    - memory leak in vfp6.0? Chect the following source code - is this a memory leak? ***************************************************************** close tables all For i = 1 to 10 Begin transaction use items sele items use End trans Messagebox(sys(1011) + ' ' + sys(1016)) Next i *************************** items is a table belonging to a database - you can use any table the values of sys(1011) and sys(1016) (number of memory handles in use and amount of memory being used by objects) both increase throughout the loop. The same behavior is observed if End Transactions is replaced with a Rollback. Note that the rate of increase is proportional to the number of index tags the table has in its corresponding cdx file. The number of fields and the number of records of the table are irrelevant. Issuing comands like close all, clear all, clear memory, etc does NOT reduce the values returned by the two system functions mentioned above. If the begin / end transactions are removed from the source this behavior dissappears. I am using VFP6 / SP5. This behavior appears in both Win 2000 and Win 98 -- George Malekkos http://www.powersoft.com.cy eXPerience the POWER of real SOFTware ------------------------------------------------------------------- Powersoft Computer Solutions Ltd PO Box 27075 1641 Nicosia Cyprus Tel 357-22.67.00.67 Fax 357-22.67.77.22 ------------------------------------------------------------------- --- Outgoing mail is certified Virus Free. Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.504 / Virus Database: 302 - Release Date: 24/7/2003 -----= Posted via Newsfeeds.Com, Uncensored Usenet News =----- http://www.newsfeeds.com - The #1 Newsgroup Service in the World! -----== Over 80,000 Newsgroups - 16 Different Servers! =----- Tag: popup menus Tag: 178443
  - 19
    - Prompt for code page = NO programmatically In my development environment (VFP 6), I can Tools Options Prompt for code page && and uncheck it How to do I do this under program control? TIA. -S- Tag: popup menus Tag: 178441
  - 20
    - To add a column in the grid window! Hi All, I've been trying to add a column in the grid window. I right click the grid window and choose "Help Design Tools", then an error message jumped out: "Error #1742 at Resetcolumns(0): The source of object must be a reference of variable." What does it mean? Or any different ways to do that? Many thanks. Sam. Tag: popup menus Tag: 178434
  - 21
    - Error in accessing VFP webservice I have created a webservice in VFP 7 (DLL Created in VFP 7 and WSDL generated using SOAP Tool kit 3). When I try to access it from a VB client using SOAP 3, some times I get the following error. -2147221504 - WSDLOperation:Instantiating the dispatch object for method <MyMethodName> failed As this error does not occur always I do not have a clue on how to fix it. Any ideas? Best Regards, Y. SIvaram Tag: popup menus Tag: 178426
  - 22
    - date question Hi all, I need a date string containing the 1st day of the current month. IE: ? lcDate 07/01/03 or the a date string containing the last day of the previous month. ? lcDate 06/30/03 Your input is appreciated. Thanks. Tag: popup menus Tag: 178413
  - 23
    - Listbox Not displaying Util it is Clicked Hope this is something simple. In VFP 8 I have two identical listboxes on a form. Both using their own seperate view data, both bound the same way to different views: BoundTo = T BoundColumn = 2 ColumnCount = 1 Row Source = v_view.field1, field2 Row Source Type = Alias Both views has data in them. One of the list boxes diplays the value and one does not until you click on it at run time - then it refreshes with the correct data. I have tried refreshing no no avail. What would cause such an odd behavior. Rick Tag: popup menus Tag: 178405
  - 24
    - DBC Connection to SQL data?? I have already created an connection object with my DBC that I use with remote views into SQL. If I want to query a table in the SQL server, can I use the connection object I have already created? I tried: sqlconnect('mydsn','myusername','mydbcconnectionobject') but it doesn't work. I'm trying to limit the number of times I have to put the username and password in code. TIA -Bruce Tag: popup menus Tag: 178404
  - 25
    - Creating web-based apps with VFP8 vs Starting with .NET solution Hi all, I talked to a prospect yesterday. He has a plastic bag manufacturer and he wanted to create apps to maintain the data in his manufacturing company. He said that there were already three software companies that gave a proposal to him. I will be the forth. All three companies are offering a web-based applications, thus he insist that mine should be web-based also. Problem is, although I've been using VFP for almost four years by now, I have never touched a web-based application. For more information: two companies (out of three) offered a Linux based solution (I think they'll use php), and the other offered a .net based solution (vb.net for sure!). Question: 1. Anybody got any idea what my selling point should be when I meet him on next the Tuesday? 2. How steep is the learning curve to create a web-based applications with VFP? I'm willing to invest in 3rd party product like WWC if I have to. Any other alternatives? 3. I was planning to buy VS.NET --- not in a near future actually, but if I can get this project, I might decide to buy it sooner. Will it do any help if I develop the apps with VFP ( I have VFP8 )? 4. Considering that I am used to code in VFP, I assumed that it would be much easier for me to create the apps in VFP rather than starting from scratch with VS.NET. What makes me doubt is I read several pages of VB.NET book in our local bookstore this afternoon, and it looks like that VB.NET is designed to create a web-based application from the beginning. The book started with creating a hello world web-based apps. Anybody here ever learn VB.NET with VFP background? Do you have any suggestion? TIA, Willianto Tag: popup menus Tag: 178390
- Next
  - 1
    - New msdn.microsoft.com/vfoxpro website layout Surf on over to http://msdn.microsoft.com/vfoxpro/ and have a look at the new Visual FoxPro website. -- Cindy Winegarden MCSD, Microsoft Visual FoxPro MVP cindy.winegarden@mvps.org, www.cindywinegarden.com Tag: popup menus Tag: 178387
  - 2
    - Mixed colors in grid Hi! I have a grid with 24 columns. The value in each column can be ether -1, 0 or a number greater then 0. In any given row I want the background color to be white for -1, green for 0 and red for the everthing greater than 0. Everthing I've tried so far will ether make the entire row or the entire column one of the colors depending on which row I'm in. I need to have mixed colors in the same row and they need to be retained in that row when I go to the next row. Can anyone help me with this? Thanks Terry Tag: popup menus Tag: 178382
  - 3
    - Refreshing tables in the DE vfp 6.0 Form with private data session and tables in the DE Hello After user click save button the files are updated and fields in window are cleared. How do I refresh the tables in the data environment so that they are up to date? The only way I can think of ensuring the tables are current is by closing the form and opening it again. How do I refresh all the tables in the data environment of a form with the current disk values? Do I have close and reload all the tables? I hope not. Thanks for your advice Al Tag: popup menus Tag: 178380
  - 4
    - Old menus I think I've just discovered that VFP 8 has real trouble when dealing with "old" menus, to the point of C0000005'ing. After I went through and opened all the old menus, allowing VFP to "Convert to new menu format," things were ok. Likely a causal relationship. Anybody else notice this? Eric Tag: popup menus Tag: 178375
  - 5
    - Grid columns I have a grid with 8 columns created in the Visual Class Designer. I'm reassigning the ColumnOrder and nothing is happening. I put a message in the 'Init' of the grid to make sure that I'm editing the correct item in the class. The message came up but the column order stayed the same. What am I missing as the possible problem? Thanks, Chip Tag: popup menus Tag: 178369
  - 6
    - Report remembers printer I developed an application with reports. The problem is, that some of the reports come out of the printer (network printer)I used at development time. It should be printed by the Standard printer of the User. Other reports of the application work as expected. What did I wrong. TIA Michal Tag: popup menus Tag: 178365
  - 7
    - Define Object This is a multi-part message in MIME format. ------=_NextPart_000_0008_01C356F7.16ACF390 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable * While we patiently wait for VFP9, here is an interesting piece of code * DefineObject.prg * VFP8 ONLY ! * TODO: nested objects TEXT TO objectText NOSHOW=20 DEFINE OBJECT Employee AS Name =3D "George" Phone =3D "555-1234" Hired =3D {^1920/01/01} Salary =3D $999.95 Age =3D 93 Weight =3D 184.25 Inactive =3D .F. Pets[5] =3D .NULL. ENDDEFINE ENDTEXT ? objectText oEmployee =3D DefineObject(objectText) SET STEP ON && check oEmployee RETURN *------------------------------------ FUNCTION DefineObject LPARAMETERS objectText IF GETWORDNUM(objectText,1) <> "DEFINE" THEN RETURN .NULL. ENDIF anyObject =3D CREATEOBJECT("EMPTY") linesCount =3D ALINES(objectLines,objectText) FOR counter =3D 2 TO linesCount-1 equalSign =3D AT("=3D",objectLines[counter]) propertyName =3D ALLTRIM(LEFT(objectLines[counter],equalSign-1)) propertyValue =3D ALLTRIM(SUBSTR(objectLines[counter],equalSign+1)) IF INLIST(LEFT(propertyValue,1),CHR(34),CHR(39),CHR(91)) THEN && = String propertyValue =3D SUBSTR(propertyValue,2,LEN(propertyValue)-2) ADDPROPERTY(anyObject,propertyName,propertyValue) ELSE ADDPROPERTY(anyObject,propertyName,EVALUATE(propertyValue)) ENDIF ENDFOR RETURN anyObject ENDFUNC *------------------------------------ I love you fox ;-) ------=_NextPart_000_0008_01C356F7.16ACF390 Content-Type: text/html; charset="iso-8859-1" Content-Transfer-Encoding: quoted-printable <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML><HEAD> <META http-equiv=3DContent-Type content=3D"text/html; = charset=3Diso-8859-1"> <META content=3D"MSHTML 6.00.2800.1170" name=3DGENERATOR> <STYLE></STYLE> </HEAD> <BODY bgColor=3D#ffffff> <DIV><FONT face=3D"Courier New" size=3D2>* While we patiently wait for = VFP9, here is=20 an interesting piece of code</FONT></DIV> <DIV><FONT face=3D"Courier New" size=3D2></FONT> </DIV> <DIV><FONT face=3D"Courier New" size=3D2>* DefineObject.prg<BR>* VFP8 = ONLY=20 !</FONT></DIV> <DIV><FONT face=3D"Courier New" size=3D2>* TODO: nested = objects</FONT></DIV> <DIV><FONT face=3D"Courier New" size=3D2></FONT> </DIV> <DIV><FONT face=3D"Courier New" size=3D2>TEXT TO objectText=20 NOSHOW <BR>  DEFINE OBJECT Employee AS<BR>  =20  Name     =3D "George"<BR> =20   Phone    =3D "555-1234"<BR> =20   Hired    =3D {^1920/01/01}<BR> =20   Salary   =3D $999.95<BR> =20   Age      =3D 93<BR> =20   Weight   =3D 184.25<BR>    Inactive = =3D=20 .F.<BR>    Pets[5]  =3D .NULL.<BR> =20 ENDDEFINE<BR>ENDTEXT</FONT></DIV> <DIV><FONT face=3D"Courier New"></FONT> </DIV> <DIV><FONT face=3D"Courier New" size=3D2>? objectText<BR>oEmployee =3D=20 DefineObject(objectText)<BR>SET STEP ON && check=20 oEmployee<BR>RETURN</FONT></DIV> <DIV><FONT face=3D"Courier New"></FONT> </DIV> <DIV><FONT face=3D"Courier New"=20 size=3D2>*------------------------------------<BR>FUNCTION=20 DefineObject<BR>  LPARAMETERS objectText<BR>  IF=20 GETWORDNUM(objectText,1) <> "DEFINE" THEN<BR>    = RETURN=20 .NULL.<BR>  ENDIF<BR>  anyObject =3D = CREATEOBJECT("EMPTY")<BR> =20 linesCount =3D ALINES(objectLines,objectText)<BR>  FOR counter =3D = 2 TO=20 linesCount-1<BR>    equalSign     =3D = AT("=3D",objectLines[counter])<BR>    propertyName  = =3D=20 ALLTRIM(LEFT(objectLines[counter],equalSign-1))<BR>   =20 propertyValue =3D=20 ALLTRIM(SUBSTR(objectLines[counter],equalSign+1))<BR>    = IF=20 INLIST(LEFT(propertyValue,1),CHR(34),CHR(39),CHR(91)) THEN &&=20 String<BR>       propertyValue =3D=20 SUBSTR(propertyValue,2,LEN(propertyValue)-2)<BR>    &= nbsp; =20 ADDPROPERTY(anyObject,propertyName,propertyValue)<BR>   =20 ELSE<BR>      =20 ADDPROPERTY(anyObject,propertyName,EVALUATE(propertyValue))<BR> &nbs= p; =20 ENDIF<BR>  ENDFOR<BR>  RETURN=20 anyObject<BR>ENDFUNC<BR>*------------------------------------<BR></FONT><= /DIV> <DIV><FONT face=3D"Courier New" size=3D2>I love you fox=20 ;-)</DIV></FONT></BODY></HTML> ------=_NextPart_000_0008_01C356F7.16ACF390-- Tag: popup menus Tag: 178355
  - 8
    - call refresh method on page frame?? Is there a way to programmtically call the refresh method of each page of a page frame? What I don't want to do: this.page1.refresh this.page2.refresh this.page3.refresh ... Besides, I might want to add pages and I don't want to have to worry about the code. TIA -Bruce Tag: popup menus Tag: 178339
  - 9
    - open a dropdown combobox Is there a way to programmatically open a combobox??? Tag: popup menus Tag: 178333
  - 10
    - VFP6&7&8: possible bug with TEXTMERGE Hello, All! I tried posting this behavior to the VFP bug report page, but I get a Page Unavailable error. I think this is a bug. If you can confirm this, perhaps Lee or one of the MVP's who hang out here can forward it to the right people. I am using the TEXTMERGE functions to merge memvars with preformatted RTF text that is stored in a table. If the RTF contains one or more spaces followed by a CHR(13), then the spaces are removed. To demonstrate this behavior, try this code. Note, I did not include any variables to merge with the text. <vfp_code> lcTest = "Here are 10 spaces:" + SPACE(10) + CHR(13) + "This is the second line." set textmerge to test.txt set textmerge on \\<<lcTest>> set textmerge to c = filetostr("test.txt") ?SPACE(10)$c && .F. </vfp_code> I was able to fix this issue by replacing spaces prior to using the textmerge features, but I find it a bit quick and dirty: <vfp_code> lcTest = "Here are 10 spaces:" + SPACE(10) + CHR(13) + "This is the second line." lcTest = STRTRAN(lcTest, " ", "!@#$QUICKANDDIRTYFIX") set textmerge to test.txt set textmerge on \\<<lcTest>> set textmerge to * now lets hope the replacement string does not exist in the preformatted RTF.... * otherwise use a function like SYS(2015). c = STRTRAN(filetostr("test.txt"), "!@#$QUICKANDDIRTYFIX", " ") ?SPACE(10)$c && .T. </vfp_code> So what do you think: is this behavior by design? -- Eric den Doop www.foxite.com - The Home Of The Visual FoxPro Experts - Powered By VFP8 Tag: popup menus Tag: 178332
  - 11
    - ComboBox bound to array with -ve value in BoundColumn Hi, Is it not possible to have a ComboBox where the RowSourceType is an array and the BoundColumn contains a negative value? What happens when I select an array item which has a negative value in the BoundColumn is that the text shown is blank - it works fine for the non-negative values. If this is they way the ComboBox works is there any way around it? I cannot change the underlying data which I am using to build the array. Thanks in advance, Pauline Tag: popup menus Tag: 178323
  - 12
    - Upgrade question On MS website I find two different upgrade policies for VFP 8. One page says you can upgrade from VFP v5, 6 or 7. Another page says it must be the professional editions of v5, 6 or 7. So I called to ask and was told by two different people that I must have the professional version. I don't. I have upgraded nearly every version of FP since before it was bought by MS. Is it true that my upgrade path has been cut off? Tag: popup menus Tag: 178320
  - 13
    - SET PATH missing ? Hi, At the beginning of my prg I have :cTemp = IIF(Application.StartMode = 0,SYS(16),Application.ServerName) lcChemin = SUBSTR(cTemp,1,RAT("\",cTemp)-1) SET DEFAULT TO (lcChemin) I distribute the exe (whith InnoSetup) At the install time, it's OK ... but when I lauch the exe, It said "unable to locate libary" (nearly) If I put VFP6R.DLL;VFP6RENU.DLL;VFP6RFRA.DLL in the directory of the prg, the program run Where is the error ? A missing SET PATH in the prg or a error in the InnoSetup install script ? Thanks -- Olivier (enlever les 3X pour la réponse) Tag: popup menus Tag: 178295
  - 14
    - Issuing "MODIFY CLASS" programmatically... How can I manipulate the formset that gets generated as a result of this? I can't seem to close it, hide it, or anything much at all in fact 8-( Any ideas? Regards Mark -If more of us acted more sensibly, d'you think Governments might join in? Tag: popup menus Tag: 178292
  - 15
    - Compiling a Class Library Hi everyone, I am trying to create a compiled version of a class library and the only way to do it was by opening the class library as a table and then replacing the "METHODS" field for all records with a blank (""). The class library was created in VFP7 and it is not a part of an executable file. Has anyone else been able to create a compiled version of a class library using another, better approach? Thanks for the help! Mehmed M. Tag: popup menus Tag: 178290
  - 16
    - How to customize the size of paper on report ? Hi, I have a problem with my report. How to make a report (customize it's paper) if I want to use it in continuous paper which is have size: 2500 mm x Length 1400mm each sections ? Do I have to change the paper size in paper size printer properties in windows control panel ? But if I use it, in Windows XP there is no custom paper size. As information, I use Epson LX 300+. Thanks a lot for the information, teach and help. Tag: popup menus Tag: 178280
  - 17
    - MessageBox with checkbox - API? Hi, I'm looking for a messagebox replacement for VFP7 that will allow me to display a checkbox along with the other standard messagebox capabilities. I found this one: http://www.gipsysoft.com/messagebox/ But it requires passing a pointer to a memory location as part of a structure that is passed to the DLL. I've downloaded the heap class from UT, but would rather not delve into that if there's a better alternative out there. Note: I initially rolled my own VFP class to handle this, but found that since it's a VFP form also, it's causing undesired events to fire (calling form's deactivate, if called from grid, it's when fires when dialog dismissed, etc.) So, I don't believe a VFP form will give me what I need. I also rolled my own to invoke a VFP form via COM, but it invokes very slowly and seems to block repainting of the underlying form when moved. I really appreciate all your help. Best, Mark Nadig /\/\/ Tag: popup menus Tag: 178275
  - 18
    - FPD 2.6 printing from WinXP? Does anyone know how to get FoxPro for DOS 2.6 applications running under WinXP to print? Thanks, Jeff -- Jeff Grippe Hilldun Corporation Tag: popup menus Tag: 178263
  - 19
    - MSComm32 and Terminal Server I have a VFP barcode app which works fine sending serial data over a normal LAN via MSComm. I'm trying to do the same thing over terminal services (XP client/2003 TS server) with serial port redirection. It's weird because the InBufferCount property gives the correct number of bytes read, but the Input property has nothing in it - in fact it's listed in the locals in the debugger, but doesn't even have a type, let alone any data. I get an 'undefined' error for the property when the OnComm event fires. I've tried just scanning into hyperterminal, and that works fine. I'm working around this using a keyboard wedge instead of serial input, but it's not ideal because I want to send a signal back to the scanner to indicate that the data has been fully processed. Any ideas? Thanks. --- Checked by AVG anti-virus system (http://www.grisoft.com). Version: 6.0.504 / Virus Database: 302 - Release Date: 24/07/2003 Tag: popup menus Tag: 178262
  - 20
    - Default Values When changing indexes or fields, we programmatically check the status of the field or index before making the change at the user site. This way the code isn't being run each time. Does anyone know of a way to programmatically check to see if a field has a default value set. Tag: popup menus Tag: 178258
  - 21
    - XP Embedded Has anyone messed around with XP Embedded? I have POS software written in VFP, and it'd be cool to be able to use an embedded OS - and although MS's site says that Visual Studio apps can run on XP embedded - it neither mentioned nor excluded VFP, so I was wondering if anyone has had success making a VFP app run on XP embedded? I know that VFP can't run on CE embedded (AFAIK), but XP embedded is supposed to be almost as capable as the full blown XP pro.. Tag: popup menus Tag: 178255
  - 22
    - child table records Is there a way to make a grid (or browse) display only certain records exactly as though it was a child table in a relation (without having a parent table!) ? (I know I can set a relation from a parent, but in this case I need to simulate the relation in the child table). THANKS Mike Farnesi Tag: popup menus Tag: 178252
  - 23
    - RecordSource property of grid I have a problem with the recordsource property of a grid. I'm using a SQL statement in the Load method of a form. I have a grid on the form with the recordsource property set to the alias that's created with the SQL statement. The problem is when I add a new record to the table that the cursor is created from. After I add the record, I rerun the SQL statement to update the cursor but then the grid shows all white. It doesn't show any of my column or row lines or any of the records. After running the SQL statement, I've browsed the cursor and all the records are in there, including the record I just added. Why doesn't it update my grid? Thanks for your help. Doug Tag: popup menus Tag: 178238
  - 24
    - Setting views properties programmatically Hello. Does anyone know if it is possible to automatically set views properties (filtering, grouping etc.) in Outlook/Exchange? If yes, how do I do it? Thanks, Rolf Falnes rolf.falnes@tietoenator.com Tag: popup menus Tag: 178235
  - 25
    - Is it already running? Hello All, I need to deploy an application on an NT 4 server that gets launced when certain events occur. I don't want the program to launch if it is already running, however. Does anyone know of a way to accomplish this? Is there a way to check to see if the program is already running and then exit if it is not? Thanks, -- Jeff Grippe Hilldun Corporation Tag: popup menus Tag: 178228

Is there a way to pass parameters to a menu in VFP 7?

--
Kendall R. Dixon
Information Systems
Tusculum College
Phone: 423/636-7300 ext.5750

Top

Re: popup menus by Mickael

Mickael
Tue Aug 05 08:28:56 CDT 2003

Hi,

Add a LPARAMETERS at the top of the MPR...

Mike

"Kendall Dixon" <kdixon@tusculum.edu> a écrit dans le message de
news:O%23TecM1WDHA.1580@tk2msftngp13.phx.gbl...
> Is there a way to pass parameters to a menu in VFP 7?
>
>
>
> --
> Kendall R. Dixon
> Information Systems
> Tusculum College
> Phone: 423/636-7300 ext.5750
>
>
>
>

Top

Re: popup menus by Stefan

Stefan
Tue Aug 05 08:44:02 CDT 2003

"Kendall Dixon" <kdixon@tusculum.edu> schrieb im Newsbeitrag
news:O%23TecM1WDHA.1580@tk2msftngp13.phx.gbl...
> Is there a way to pass parameters to a menu in VFP 7?

Yes. If you're using the menu designer, try "View" |
"General Options..." from the vfp menu and check "Setup".
See also "SDI menus" and "SDI forms" in help.
If your creating your menu programmatically, you can
have parameters statements anyway, see also the .mpr
files generated from yourmenu.mnx

hth
-Stefan

Top