VFUG Turkey fox4um.com members meetings in Istanbul at 24.10.2009,
we are glad to coming together,this is the first event in Turkey for VFP actions.
Notably Cetin BASOZ ( allready you good known VFP MVP,MCP ), me and the other forum members will be there.
hope to will be good session.
Soykan...
Hi Experts,
i wantto develop a small sales forms which will run on pocket pc ,
which is the best , easy way for this goal ?
which is the similar programming tool like vfp ?
PS : i dont wantto to be inpected to .net & vsstudio etc :(
Soykan OEZCELIK
how can i add "send/receive" button this sample ?
**************************************************
Public oform1
oform1=createobject("form1")
oform1.Show
Return
**************************************************
Define Class form1 As Form
Height = 400
Width = 620
DoCreate = .T...
VFP9 uses GDI for this reason,
if you dont want to lose your designs and want to use them with VFP9
put "Set ReportBehavior 80" command
before your report commands routine
after then you can switch back to via "Set ReportBehavior 90" command
HTH
Soykan OEZCELIK
you can download a great solution for this goal from www.universalthread.com downloads section named 'launcher' developed by Nick Neklioudov.
Soykan OEZCELIK
Try this also,
*--- declaring variables
Local LnDIM1,LnDIM2,LnDIM3,LnDIM4,LnDIM5,LnDIM6,LnDIM7,LnDIM8,;
LnDIM9,LnDIM10,LnDIM11,LnDIM12
Local ldStart1,ldStart2,ldStart3,ldStart4,ldStart5,ldStart6,ldStart7,ldStart8,;
ldStart9,ldStart10,ldStart11,ldStart12
Local...
From 19/11/2005 19:46:33
Soykan Ozcelik [Send an email to Soykan Ozcelik] [Send a private message to Soykan Ozcelik] #036893 [This member is online]
SoykanSoft
Tekirdag, Turkey [Turkey]
To
All
Forum:
Thread ID: 1070591
Category:
Message ID: 1070591
Title:
VFP9 changes...
Thanks for the reply wgcs,
i've decided to change my invoice form design with pageframed solution... by this way i don't need to any modal form for add or edit action also all off controls will show on textboxes while user navigate between records on the grid and if user want change at any...
...grid.recordsource = invoicedetail
grid.linkmaster = invoiceheader
grid.relationalexpr = Pmyguid
grid.childorder = Pmyguid
* function for myguid field default value
Function guid()
Local pGUID,rGUID
Declare Integer UuidCreate In 'RPCRT4.dll' String @pguid
Declare Integer StringFromGUID2 In...
...updating is Ok but record pointer goes next record
here is my some main form keypress event codes and save,delete,etc codes ..
* form keypress event
Lparameters nKeyCode, nShiftAltCtrl
If Type("_Screen.ActiveForm.ActiveControl")=="O"
Local loActiveControl
m.loActiveControl =...
Hi again Mike,
CustID can be letter or digit like A-0001 or 9888A or AAAA or 999999 etc.. so that i should catch if empty text2 value code should accept highest custid or value ..
if you were me or if you need these solution how would be the your code ?
TIA
Soykan OEZCELIK
Hi Mike,
first i want to list custid's between text1 and text2 and also if both of text1 and tex2 empty it will return .t. and will list all records else
it will take min text1 value and if empty text2 it will accept max value of custid
hope that i explained :(
Soykan OEZCELIK
...TIA
with thisform
lcMinCustID=min(.text1.value,.text2.value)
lcMaxCustID=Max(.text1.value,.text2.value)
lcMaxCustID=iif(empty(.text2.value,0x7FFFFFFF,.text2.value)
endwith
...
select * from customers where custid between lcminCustID and lcmaxCustID into cursor CrsCustomers
Soykan OEZCELIK
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.