Recent content by mjcmkrsr

Hi, Wrong - you may want to read more carefully the report layout: the data from your former Detail 1 band are now in the Group header 1 called "localiza" whereas the data from your former Detail 2 band are now in the Detail band. If you own the book "What's New in Nine: Visual Foxpro's...

Hi, Below a demo with 4 cursors to show how to calculate values per record(s), the group(s) footer(s) and the total on the last page footer. hth MarK

Hi, You may want to have a look at the demo code below - not very fancy, but it might give you an idea. oForm = CREATEOBJECT("clsMainForm") oForm.Visible = .T. oForm.SHOW() Read EVENTS CLOSE ALL CLEAR ALL RETURN *!* Define Main Form Class Define CLASS clsMainForm AS FORM...

... of course since you closed CLIENTES several lines up in your code - and you wrote it yourself! Tables may only be SELECTed if they are open. hth MarK

Hi, It might be related with the file format *.BMP or *.JPG or ... and also how you store the pictures BLOB/MEMO. Please find some demo code attached hth MarK

Hi Maybe Coosmann could give us some hints or at least tell us if and how he solved the problem MarK

Hi Yes it does. But it has some other gotchas From Hacker's Guide 7 hth MarK

Hi, You may also want to check your windows settings - see below (W10 Pro) - and/or in VFP the SET SYSFORMATS command hth MarK

and a more concise version of the above PUBLIC goForm1, goForm2, goForm3 LOCAL i IF NOT FILE("dbfTemp.dbf") CREATE TABLE dbfTemp (f1 I, f2 I, f3 I) FOR i = 1 TO 500 INSERT INTO dbfTemp VALUES ( Int(Rand()*1001), Int(rand()*1000), Int(Rand()*999)) ENDFOR...

... and a fancier example showing the versatility of DATASESSION = 2 - three forms using one table with different index tags and creating their own sets of cursors all named identically (see attachment). hth MarK

Hi Filip, Please find below the demo code for one or more forms accessing the same table PUBLIC oForm1, oForm2 LOCAL i CREATE TABLE dbfTemp (f1 I, f2 I, f3 I) FOR i = 1 TO 50 INSERT INTO dbfTemp VALUES ( Int(Rand()*1001), Int(rand()*1000), Int(Rand()*999)) ENDFOR USE...

Hi, The DATASESSION property of each form has to be set to 2 (Private). Then you have full control of the underlying table(s). From Hacker's Guide to VFP 7 You may also want to have a look at "Programming for Shared Access" in the help file. hth MarK

Hi, The INTEGER field type accepts values up to 2,147,483,647 but a numeric field type accepts values between these limits - .9999999999E+19 to .9999999999E+20 Check "Visual FoxPro Data and Field Types" in the Help File hth MarK

Hi, You have to use the comma instead of the dot x = 1234567891234 ?TRANSFORM(x, "9999,99,999,9999") ?TRANSFORM(x, "9999.99.999.9999") hth MarK

Hi, No offense, but the shown code snippet simply doesn't make sense n = THISFORM.text1.Value IF EMPTY(n) RETURN ENDIF n = VAL(n) SELECT Roba IF !USED("Roba") MESSAGEBOX("Table 'Roba' is not open.") RETURN ENDIF LOCATE FOR Sifra = n Adapting it you might want to write something like below...