FiveTech Support Forums

FiveWin / Harbour / xBase community
Board indexAll discussionsLogin (GitHub)
Board index FiveWin para Pocket PC TOleAuto/CreateObject en FWPPC
JmGarcia
Posts: 654
Joined: Mon May 29, 2006 03:14 PM
TOleAuto/CreateObject en FWPPC
Posted: Sat Apr 18, 2009 09:19 AM
驴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 (fw): Select all Collapse
Imports _
聽Microsoft.WindowsMobile.Telephony
...
Dim phone As New Phone
phone.Talk("+6512345678", True)


Calendario...
Code (fw): Select all Collapse
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
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: TOleAuto/CreateObject en FWPPC
Posted: Sat Apr 18, 2009 12:02 PM

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
JmGarcia
Posts: 654
Joined: Mon May 29, 2006 03:14 PM
Re: TOleAuto/CreateObject en FWPPC
Posted: Sat Apr 18, 2009 02:18 PM
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 (fw): Select all Collapse
Imports _
聽Microsoft.WindowsMobile.Telephony
...
Dim phone As New Phone
phone.Talk("+6512345678", True)

...no podemos hacer esto...
Code (fw): Select all Collapse
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
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: TOleAuto/CreateObject en FWPPC
Posted: Sat Apr 18, 2009 03:11 PM

JM,

Lo has probado ? :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: TOleAuto/CreateObject en FWPPC
Posted: Sat Apr 18, 2009 03:13 PM

JM,

Hemos retomado el ejemplo que estabamos desarrollando:

viewtopic.php?f=7t=12216p=79416#p79416

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

&&

regards, saludos

Antonio Linares
www.fivetechsoft.com
JmGarcia
Posts: 654
Joined: Mon May 29, 2006 03:14 PM
Re: TOleAuto/CreateObject en FWPPC
Posted: Sun Apr 19, 2009 04:08 PM
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 :-)
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
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: TOleAuto/CreateObject en FWPPC
Posted: Sun Apr 19, 2009 05:57 PM

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
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: TOleAuto/CreateObject en FWPPC
Posted: Sun Apr 19, 2009 06:03 PM

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
Antonio Linares
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: TOleAuto/CreateObject en FWPPC
Posted: Wed Apr 22, 2009 01:43 AM

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
Re: TOleAuto/CreateObject en FWPPC
Posted: Mon Apr 27, 2009 02:55 PM

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

JmGarcia
Posts: 654
Joined: Mon May 29, 2006 03:14 PM
Re: TOleAuto/CreateObject en FWPPC
Posted: Wed Apr 29, 2009 08:18 PM
fleal wrote:Tener acceso a los componentes de .NET ser铆a estupendo...

Pues si seria estupendo... :-)
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

Continue the discussion

Static archive 路 New replies & topics via GitHub Discussions