FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Virtual UI
Posts: 728
Joined: Fri Oct 07, 2005 07:38 AM
Virtual UI
Posted: Wed Jul 12, 2017 03:09 PM
¿Qué opináis de este producto? Lo he visto funcionando en Delphi y ... en fin, sin palabras :-) :-)

http://www.cybelesoft.com/thinfinity/virtualui/
Angel Salom
Visionwin Software - https://www.visionwin.com
------------------------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.4
Posts: 555
Joined: Wed Jul 31, 2013 01:14 PM
Re: Virtual UI
Posted: Wed Jul 12, 2017 06:52 PM

Angel, parece muy interesante. Es parecido a Winflector?

Saludos
Ruben Dario Fernandez

Dario Fernandez

FWH 2501, Harbour, MVS2022 Community, MySql & MariaDB, Dbf/Cdx VSCode.

Maldonado - Uruguay
Posts: 728
Joined: Fri Oct 07, 2005 07:38 AM
Re: Virtual UI
Posted: Wed Jul 12, 2017 07:24 PM

Por lo que he podido ver crea un servidor web que virtualiza las aplicaciones desarrolladas bajo Windows, de modo que se puedan "ejecutar" desde cualquier navegador de internet compatible con HTML5, ¿has visto las 'live demos'?

Angel Salom
Visionwin Software - https://www.visionwin.com
------------------------------------------------------------
fwh 19.05 - harbour 3.2 - bcc 7.4
Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM
Re: Virtual UI
Posted: Wed Jul 12, 2017 09:40 PM

Se ve muy interesante !!! Gracias por compartir

Saludos

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Virtual UI
Posted: Thu Jul 13, 2017 05:47 AM

Por lo que se ve, está desarrollado en javascript:

view-source:http://uk1.thinfinity.net/lab.html

Copiar y pegar esta dirección en el navegador

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 731
Joined: Fri Oct 07, 2005 07:42 AM
Re: Virtual UI
Posted: Thu Jul 13, 2017 09:42 AM
Aqui un compañero lo hice en Delphi hace años, y la verdad es que queda chulo

He intentado hacerlo funcionar, pero no consigo que se publique, a ver si alguien tiene un poco más de suerte;

Code (fw): Select all Collapse
MEMVAR oVirtualUI
INIT PROCEDURE VirtualStart
    PUBLIC oVirtualUI

   try
     oVirtualUI := createObject("Thinfinity.VirtualUI")
   catch
     MsgStop( "not dll")
   end  

     RETURN

function Main()
 
   MsgInfo( cValtoChar( oVirtualUI:Start( 10 ) ) )

return NIL
Saludos

Rafa Carmona ( rafa.thefullARROBAgmail.com___quitalineas__)
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Virtual UI
Posted: Thu Jul 13, 2017 02:02 PM
regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion