#include "FiveWin.ch"
static oWnd
//----------------------------------------------------------------------------//
function Main()
local oTmr, oSay, oFnt
DEFINE FONT oFnt NAME "Fixedsys Normal" SIZE 0, -30
DEFINE WINDOW oWnd TITLE "Prueba"
@ 2, 2 SAY oSay PROMPT "La hora es "+time() COLOR "GR+/W*" FONT oFnt SIZE 450, 150
DEFINE TIMER oTmr INTERVAL 700 ACTION ChangeColor( oSay ) OF oWnd
ACTIVATE TIMER oTmr
ACTIVATE WINDOW oWnd
oFnt:End()
return nil
//----------------------------------------------------------------------------//
function ChangeColor( oSay )
static lStatus := .F.
static lStatus1 := .F.
if lStatus
oSay:SetColor( "GR+/W*" )
else
oSay:SetColor( "b+/W*" )
endif
oSay:Refresh()
lStatus = ! lStatus
lStatus1 = ! lStatus
return nil
lucasdebeltran wrote:Hello,
Silvio, why don´t you share your class?.
ukoenig wrote:Victor Daniel wrote :
I did not know that the sources had a right reserved
I don't understand the problem
As soon I'm publishing a solution inside the forum, sharing my experience,
I think it is nonsense talking about copyrights as long it is my own created solution
best regards
Uwe
Massimo Linossi wrote:ukoenig wrote:Victor Daniel wrote :
I did not know that the sources had a right reserved
I don't understand the problem
As soon I'm publishing a solution inside the forum, sharing my experience,
I think it is nonsense talking about copyrights as long it is my own created solution
best regards
Uwe
You're right Uwe.
Especially when the copyright belongs to someone who is not even able to boil water without the help of this forum.
carlos vargas wrote:sin animo de crear polemicas,
pienso que los foros de fwh son para ayudar a los compañeros con sus problemas y para mejorar fwh.
sin embargo existen algunos que son un poco reacios a compartir sus "soluciones", y en esto sobresale silvio.
tengo claro que hay algunas cosas que nos reservamos para nosotros mismo y cada quien tiene ese derecho, pero no me perece la forma de responderle a un usuario que solicita ayuda,
cuando como dice el dicho "..arrieros somos y el el camino andamos.."
pero es comun ver a silvio a la defensiva, como en esta ocacion, la verdad es que se ve y se sienten como si de echo le robaran algo que de alguna forma muchos contribuyeron
a construir y/o mejorar con sus post de ayuda.
es algo contradictorio verlo en algunos post pidiendo ayuda para desarrollar tal o cual cosa, lo cual luego tienen "derechos reservados".
es comun que cuando alguen le pregunta si lo puede compartir responda con que "esta aun en desarrollo" o esa clase la hice con otra persona y esa no autoriza, como recuerdo sucedio hace mucho tiempo.
yo hace mucho tiempo de silvio no espero sino peticiones de ayuda y soporte nada mas.
como decimos aca "no pidamos peras al olmo, no esta en su naturaleza."
espero que la diferencia de idioma no afecte mucho de lo que deseo expresar.
salu2
carlos vargas
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: No registered users and 42 guests