TOleAuto/CreateObject en FWPPC

Post Reply
User avatar
JmGarcia
Posts: 654
Joined: Mon May 29, 2006 3:14 pm
Location: Madrid - ESPAÑA

TOleAuto/CreateObject en FWPPC

Post by JmGarcia »

¿Tenemos las funcionalidades de TOleAuto o CreateObject en FWPPC?
Necesito usar objetos de Framework 3.5

Mi idea es poder acceder a los contactos, SMS, teléfono, etc... ya que lo que tiene WM 6.0 no me gusta nada.
También intentar un poco de PocketOutLook.
Y todo esto creo que lo da Framework.

Quiero poder usar códigos como esto:

Teléfono...

Code: Select all

Imports _
 Microsoft.WindowsMobile.Telephony
...
Dim phone As New Phone
phone.Talk("+6512345678", True)
Calendario...

Code: Select all

Imports _
 Microsoft.WindowsMobile.PocketOutlook
...
Dim appt As New Appointment
appt.Subject = "Meeting with Jeff"
appt.Start = New _
    DateTime(2006, 7, 15, 9, 0, 0)

appt.End = New _
    DateTime(2006, 7, 15, 11, 0, 0)

'---vibrate the device as a reminder
appt.ReminderVibrate = True

'---repeat the reminder
appt.ReminderRepeat = True

Dim currentSession As New _
   OutlookSession
        currentSession.Appointments.Items. _
   Add(appt)
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Re: TOleAuto/CreateObject en FWPPC

Post by Antonio Linares »

JM,

> Necesito usar objetos de Framework 3.5

Te refieres a .NET ?

Solo podemos acceder a .NET si proporcionan objetos OleAuto o ActiveX.

Lo primero es localizar las cadenas descriptoras "PROGID"s de esas clases de objetos para poder crearlos.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
JmGarcia
Posts: 654
Joined: Mon May 29, 2006 3:14 pm
Location: Madrid - ESPAÑA

Re: TOleAuto/CreateObject en FWPPC

Post by JmGarcia »

Antonio Linares wrote:Lo primero es localizar las cadenas descriptoras "PROGID"s de esas clases de objetos para poder crearlos.
Y en ejemplos como este no...

Code: Select all

Imports _
 Microsoft.WindowsMobile.Telephony
...
Dim phone As New Phone
phone.Talk("+6512345678", True)
...no podemos hacer esto...

Code: Select all

Main()
local oPhone:=CreateObject("Microsoft.WindowsMobile.Telephony")
...
oPhone:phone:Talk("+6512345678",.T.)
return nil
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Re: TOleAuto/CreateObject en FWPPC

Post by Antonio Linares »

JM,

Lo has probado ? :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Re: TOleAuto/CreateObject en FWPPC

Post by Antonio Linares »

JM,

Hemos retomado el ejemplo que estabamos desarrollando:
http://forums.fivetechsupport.com/viewt ... 416#p79416

mientras no sepamos seguro si existen esos objetos como OCXs y que PROGIDs tienen :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
JmGarcia
Posts: 654
Joined: Mon May 29, 2006 3:14 pm
Location: Madrid - ESPAÑA

Re: TOleAuto/CreateObject en FWPPC

Post by JmGarcia »

Antonio Linares wrote:Solo podemos acceder a .NET si proporcionan objetos OleAuto o ActiveX.
Entonces el CreateObject nada de nada...

Lo mismo que lo tiene xHarbour no seria complicado que lo tubiera FWPPC ¿ no ?

Hay muchas referencias a Pocket Outlook Object Model (POOM)

Si vale de pista esto :roll:
Cómo obtener acceso a objetos de Pocket Outlook desde eMbedded Visual Basic y VBCE http://support.microsoft.com/kb/265771/es
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Re: TOleAuto/CreateObject en FWPPC

Post by Antonio Linares »

JM,

Tenemos CreateObject( cProgId ) en Harbour para el Pocket PC y FWPPC, asi como soporte completo de la Clase TOleAuto y tambien TActiveX :-)

Lo que no sabemos es que cProgId hay que usar. Es lo que tenemos que descubrir.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Re: TOleAuto/CreateObject en FWPPC

Post by Antonio Linares »

Segun el SDK parece que el PROGID a usar es "PocketOutlook.Application" pero no funciona, parece que no lo encuentra o no consigue inicializarlo.

Si haces una busqueda en el fichero BIN que usa el emulador, y que contiene el software, no aparece la cadena "PocketOutlook.Application" salvo que este codificada en unicode.
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
Posts: 37481
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain
Contact:

Re: TOleAuto/CreateObject en FWPPC

Post by Antonio Linares »

JM,

En este artículo explican como acceder a código "managed" (.NET) desde código "unmanaged" (C ó C++ en nuestro caso):
http://www.codeproject.com/KB/mcpp/unma ... naged.aspx

Posiblemente esta sea la puerta para poder llegar a los APIs de .NET que queremos :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
fleal
Posts: 234
Joined: Tue Oct 25, 2005 12:39 am
Location: México, DF

Re: TOleAuto/CreateObject en FWPPC

Post by fleal »

Antonio,

Tener acceso a los componentes de .NET sería estupendo. Actualmente programo un 80% de mi tiempo para pocket y solo 20% para PCs.
Pero de ese 80%, 60% es usando fivewin para pocket y el 40% usando Basic4 por que necesito tener acceso a enviar SMS, email y teléfono.

Saludos
Fernando Leal
User avatar
JmGarcia
Posts: 654
Joined: Mon May 29, 2006 3:14 pm
Location: Madrid - ESPAÑA

Re: TOleAuto/CreateObject en FWPPC

Post by JmGarcia »

fleal wrote:Tener acceso a los componentes de .NET sería estupendo...
Pues si seria estupendo... :roll:
Mi abuelo decía: Los aviones vuelan porque Dios quiere, y los helicópteros ni Dios sabe porque vuelan.
FWH 16.02, xHarbour 1.2.3, Harbour 3.2.0, WorkShop 4.5, AJ Make 0.30, Borlan BCC 7.00, VisualStudio 2013
Post Reply