Date Time Control

[Carlos Lima]

Buen día,
Puedo llamar al control de fecha/hora con el siguiente comando pero a veces no se abre directamente y aparece en la barra de herramientas. Necesito control para avanzar.
Gracias de antemano.

! /n control date/time cTituloJanela = 'Data e hora' * Declara funções de API DECLARE INTEGER FindWindow IN user32; STRING lpClassName,; STRING lpWindowName DECLARE INTEGER SetForegroundWindow IN user32 INTEGER hwnd lnWinHandle = FindWindow(NULL,cTituloJanela) If !Empty(lnWinHandle) SetForegroundWindow(lnWinHandle) ENDIF
CLEAR DLLS GringWindowToTop

[Dsan]

Hello,  that's easy. 

create cursor curDatetime (Date_n_Hour T)Then you could put Textbox on your form and link it to control source.

Regards

DS

--
Blog de la Comunidad Visual FoxPro en Español http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.
Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/496089af-36a9-46ba-ae5d-f96ca18c9de4n%40googlegroups.com.

[integral]

Buenas Tardes

Puedes usar el Date and Time Picker Control.

Ej:
PUBLIC oMiForm
oMiForm = CREATEOBJECT("MiForm")
oMiForm.SHOW(1)
RETURN

DEFINE CLASS MiForm AS FORM
AUTOCENTER = .T.
CAPTION = "Ejemplo de Date & Time Picker"
NAME = "MiForm"
PROCEDURE LOAD
THIS.ADDOBJECT("ole","OleControl","MSComCtl2.DTPicker.2")
WITH THIS.OLE
.LEFT = 25
.TOP = 25
.HEIGHT = 25
.WIDTH = 100
.VISIBLE = .T.
ENDWITH
ENDPROC
ENDDEFINE

Saludos,

Integral

[Dsan]

Si usas vfp advanced y vfp c++ compiler  64bit, segun microsoft recomienda usar dll y app con compatibilidad a pesar que dice también que no tiene en mente Microsoft cambiar o quitar los 32bit, pero si recomienda mantener la compatibilidad, ese control no es válido.

En cambio si usas vfp 9/ o el Add on vfp advanced 32 bit no problema.

saludos

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/bbe54e1d-e547-4f0c-8e81-f057ae5a4ebfn%40googlegroups.com.

[integral]

Amigo

Te dejo el siguiente link:

https://comunidadvfp.blogspot.com/2018/06/manipular-ventanas-desde-vfp-parte-1.html

Talvez te ayude en algo.

Atte.,

Integral

[Dsan]

Hola y que tiene que ver ese artículo que estaba en portalfox hace años con el Date Time Control

jaajjaja

PD

Bueno, el amigo Jorge Mota escribió muchos artículos cuando estábamos muchos saliendo del cascaron, haceeee ni me quiero acordar.

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/fa13342f-31a6-4726-83c0-264e96461775n%40googlegroups.com.

[Luis Robles]

Buenas noches....en este ejemplo que brindas....como capturo la fecha en una variable?

De antemano, gracias 

Libre de virus.www.avast.com

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/bbe54e1d-e547-4f0c-8e81-f057ae5a4ebfn%40googlegroups.com.

[Cristian Novoa]

Acá hay ejemplos usando el ActiveX y también usando VCX. Por supuesto prefiero esta última, para no estar registrando nada, funcionará en 64 bits, y la puedes modificar a tu gusto.

Estos ejemplos fueron extraídos desde la página www.devphantom.net

http://www.davphantom.net/consultar.asp?id=date-and-datetime-picker-977/

No pude adjuntar el archivo. Si tienes problemas te puedo enviar un link de drive.

[integral]

Buenos Días

Si te refieres al ejemplo que expuse. Aquí una forma de hacerlo.

WITH Thisform.DTPicker
           Pfecha = DATE(.Year,.Month,.Day)      
ENDWITH

Saludos

Integral

[Luis Robles]

Buen día Cristian, saludos. intento entrar a la pagina www.devphantom.net y el nevagador me indica que hay un error....y no abre., entonces por favor enviame el link del drive...

Libre de virus.www.avast.com

--
Blog de la Comunidad Visual FoxPro en Español http://comunidadvfp.blogspot.com
---
Has recibido este mensaje porque estás suscrito al grupo "Comunidad de Visual Foxpro en Español" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a publicesvfoxp...@googlegroups.com.

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/19c49ae2-8b9a-448f-8bde-fb330b719762n%40googlegroups.com.

[Cristian Novoa]

https://drive.google.com/drive/folders/1PxFbEl6hi6VI9EvOVCRsu37hlNuiYLpw?usp=sharing

De todos modos, trata de entrar a la página, pues hay otros recursos interesantes. Debes registrarte antes.

[Luis Robles]

Agradecido Cristian Novoa ...

Libre de virus.www.avast.com

Para ver esta conversación en el sitio web, visita https://groups.google.com/d/msgid/publicesvfoxpro/f7cdb49b-def9-44b1-85c7-64dae39c5d0cn%40googlegroups.com.