I want to get code to create the form from existing from.
For example when I have from that have one commandbutton.
Can I get code from this form that can I paste into procedure?
Local oForm
oForm = CREATEOBJECT("myform")
oForm.show(1)
**This code bellow I need to get. Is Any...
Hi all,
I wont to create form from procedure. I have create this form in form builder.
Is any chance to generate somehow this (form)code that can I paste into procedure?
Thanks
MikeLewis,
You was right. But I done it. I used afterrowcolcahange event and remember record that is selected. I store records tooltiptext in new property. Then I show the new property.
But cell must be focused.
Thats only way I can do that. I think.
Hi all,
how to show ToolTipText in grid.
Every record has text filed that contain text that I wont to show when user move mouse on record in a grid.
I have set MyForm.ShowTips=.t.
Hi all,
This is example of table
id type count
1 A 2
1 A 3
1 B 5
2 A 1
2 B 2
3 C 3
3 C 4
How to make SQL select command that will make sum of filed "count". But it must sum rows that have same id and type.
The result should look like...
Hi all,
I need to insert a new record into cursor on the end.
But it is always not in the end, why????
In table the new record is in the end but in the cursor no.
Any Idea?
Hi,
I have an interesting problem.
In textbox keypress event I have this code:
----------------------------------------
LPARAMETERS nKeyCode, nShiftAltCtrl
if nKeyCode==13
thisform.command1.setfocus
endif
-----------------------------------------
But after I press ENTER in textbox so then is...
I am working in VFP 6.0 and there isn't any possibility to select some data from table to cursor with SQL statment and then update this cursor.
So I wrote this function that makes from noeditable cursor editable cursor:
function r2rw(aCursor)
local i, cFname, nSize, cType, cField
select *...
I get this error sometimes.
It happens to me when I chenge work area(select table or cursor)
try to use this:
use leave
append blank
store recno() to nrec
.
.
.
use leave
go nrec
In case of character input:
you can do it this way:
if len(alltrim(thisform.txtfrdate.value))<len(alltrim(thisform.txtdate.value))
messagebox(....)
endif
Put this code in lost focus property of yours textboxes
In case of date input
if thisform.txtfrdate.value<thisform.txtdate.value...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.