FiveTech Support Forums

Hi...

I need to make GET like facebook's search. (similar attached image)



Thanks

Eduardo Motta

EMotta Sistemas - http://www.emotta.com.br

Fivewin 13.08 - xHarbour Comercial 1.2.2 (jan/2013)

Antonio,

I resolved this question. I'm using the CUEBANNER instruction.

I also changed the "DispText" method of the TGet class.

Antonio see as it was and if you approve.

(sorry for my english)

METHOD DispText() CLASS MyGet

if ::lPassword .and. ::oGet:Type == "C"
#ifdef CLIPPER
SetWindowText( ::hWnd, Replicate( "", Len( Trim( ::oGet:buffer ) ) ) )
#else
SetWindowText( ::hWnd, Replicate( If( IsAppThemed(), Chr( 149 ), "" ),;
Len( Trim( ::oGet:buffer ) ) ) )
#endif
else
If Empty( ::oGet:VarGet()) .and. Empty(::oGet:buffer)
SetWindowText( ::hWnd, If( ! Empty( ::cCueText );
.and. Empty( ::oGet:VarGet() ),;
"", ::oGet:buffer ) )
Else
SetWindowText( ::hWnd, If( ! Empty( ::cCueText );
.and. Empty( ::oGet:VarGet() );
.and. GetFocus() != ::hWnd,; // Focus is outside
"", ::oGet:buffer ) )
EndIf
endif

return nil