Search found 309 matches

by Rochinha
Sat Sep 13, 2008 7:01 pm
Forum: FiveWin for Harbour/xHarbour
Topic: The Poor Man Cryptography Method ( PMCM )
Replies: 13
Views: 2638

Antonio,

My routines are didactic. but, you can use the FWH functions. I needed to know the encrypted outcome. I will use your functions.
by Rochinha
Sat Sep 13, 2008 6:46 am
Forum: FiveWin for Harbour/xHarbour
Topic: Sample ==> Vertical-Button-Text ( => Rochinha )
Replies: 5
Views: 1107

ukoenig,

Very nice and thanks!
by Rochinha
Sat Sep 13, 2008 6:43 am
Forum: FiveWin for Harbour/xHarbour
Topic: The Poor Man Cryptography Method ( PMCM )
Replies: 13
Views: 2638

The Poor Man Cryptography Method ( PMCM )

Friends The code of tip: // Some MDI application testing // Cryptograph some fields // By Rochinha - 5Volution #include "FiveWin.ch" #include "Customer.ch" static oWnd, oClients, oClient, oName static cName static oSplit static lEncrypted //---------------------------------------...
by Rochinha
Thu Sep 11, 2008 5:19 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Simple RSS reader for your applications...
Replies: 52
Views: 11992

Silvio, Again, ASP is a script and XML is a result. Your ASP page show a result and FeedReader work on a XML code. View in your ASP code for XML function treatment. In the code below i pass .XML file link EK_SAVEARR( { "http://www.teramoest.it/dblog/feedrss.asp", ; "http://rss.terra.c...
by Rochinha
Thu Sep 11, 2008 2:16 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Simple RSS reader for your applications...
Replies: 52
Views: 11992

Silvio,

ASP code is not XML code. Put the real XML link.
by Rochinha
Thu Sep 11, 2008 1:50 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Any sample about splitter in resources and Vertical button?
Replies: 1
Views: 482

Any sample about splitter in resources and Vertical button?

Hi,

I need a sample of splitter with resources and how to make a button with Vertical text.

Example:

Code: Select all

+---+
|   |
| N |
| A |
| M |
| E |
|   |
+---+
+---+
|   |
| P |
| H |
| O |
| N |
| E |
|   |
+---+
by Rochinha
Thu Sep 11, 2008 1:32 pm
Forum: FiveWin para Harbour/xHarbour
Topic: SubNtx
Replies: 34
Views: 8459

Antonio, Esta es la minha prueba de 2004. // Sample showing how to use SUBNTX with NTX indexes #include "FiveWin.ch" static oWnd, cTempo1, cTempo2, cName := "COMERC" //----------------------------------------------------------------------------// function Main() DEFINE WINDOW oWn...
by Rochinha
Tue Aug 26, 2008 6:09 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Simple RSS reader for your applications...
Replies: 52
Views: 11992

Silvio,

Download and install MS SOAP Toolkit.

hERE
by Rochinha
Mon Aug 25, 2008 4:03 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Simple RSS reader for your applications...
Replies: 52
Views: 11992

Thanks for all, Patrick, change TOleAuto() to CreateObecjt() of xHarbour() or: ... Function FeedPuching( cURL ) local oHyperlink oHyperlink := TOLEAuto():New( "Microsoft.XmlHttp" ) oHyperlink:Open( "GET", cURL, .F. ) oHyperlink:Send( "" ) cResponseText := oHyperlink:Res...
by Rochinha
Sun Aug 24, 2008 11:57 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Simple RSS reader for your applications...
Replies: 52
Views: 11992

Simple RSS reader for your applications...

Friends This is a simple sample and need some modifications. Double click on left browse load a feed. Double click on right browse show a news. #include "FiveWin.ch" #include "Splitter.ch" /* * ********************************************************* * * FEED READER: Modulo leit...
by Rochinha
Thu Aug 07, 2008 2:37 pm
Forum: FiveWin for Harbour/xHarbour
Topic: TOOLTIP question
Replies: 10
Views: 1566

Otto,

see the SAMPLES\TESTFOC2.PRG.
by Rochinha
Fri Jul 25, 2008 6:43 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Pickdate
Replies: 94
Views: 15570

Otto,

The Vertical Scolling is better.

Your Pick Date Code is a Best Code Of Year!

Thanks at lot.
by Rochinha
Fri Jul 25, 2008 5:00 am
Forum: FiveWin for Harbour/xHarbour
Topic: Pickdate
Replies: 94
Views: 15570

Otto I make a little changes in your control to use Horizontal Scroll: #include "fivewin.ch" STATIC oWndPlan STATIC planFont STATIC sX := 1 STATIC sY := 1 STATIC sXTemp := 0 STATIC sYTemp := 0 STATIC aPlan := {} STATIC startRow :=0 STATIC startCol :=0 STATIC startDay :="" STATIC ...
by Rochinha
Tue Jul 22, 2008 10:35 pm
Forum: FiveWin para Harbour/xHarbour
Topic: NUMERO UNICO
Replies: 8
Views: 1435

Hola Mira mi codigo: FUNCTION PsqControle( database ) // Inicializa controle com um numero diferente do total de registros nControle := iif( recco()=0, 1, recco()+(recco()/2) ) // Guarda a área atual do .DBf a ser controlado OldArea := Select() If !File("CONTROLE.DBF") // Cria a estrutura ...
by Rochinha
Mon Jul 07, 2008 6:48 pm
Forum: FiveWin for Harbour/xHarbour
Topic: CODE: Help in controls, now, so easy.
Replies: 3
Views: 1031

1) The indexexpression from help.dbf contains the line number. I suppose that the textfile will not be found when the program has changed. See the line with a nProcline var: function TheHelp( idCtrl ) local cProcName := Padr(ProcName( 1 ),20) local nProcLine := 0 // ProcLine( 0 ) ... nProcline := 0...