Sample - collection ( download Rel. 1.1 )

Sample - collection ( download Rel. 1.1 )

Postby ukoenig » Thu May 11, 2017 11:54 am

Hello,

because of many samples I created during the years,
I*m working on a sample-collector,
where it will be easy to include new tests.
The full source will be added as a download.

There will be 3 groups with 4 selections
One selection ( radio ) can have a folder with 6 sample-pages.
The 3. group ( yellow radios ) will use only dialogs ( no folder )
testing buttonbars or other things.
Samples will work from source or resource.
Free empty parts are included to add Your own tests.
With selecting a radio from the mainscreen, using the buttons < from code > or < from resource >
You can open the test straight away without searching.

The screenshot shows 2 xbrowse seek-samples
selected from section 1 and 1. folderpage < from code >

Image

best regards
Uwe :D
Last edited by ukoenig on Tue Jun 13, 2017 7:39 am, edited 1 time in total.
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: Sample - collection

Postby Marc Venken » Thu May 11, 2017 6:37 pm

Very Nice...

I follow this post carefully :P
Marc Venken
Using: FWH 23.04 with Harbour
User avatar
Marc Venken
 
Posts: 1338
Joined: Tue Jun 14, 2016 7:51 am
Location: Belgium

Re: Sample - collection

Postby Otto » Fri May 12, 2017 10:00 am

Hallo Uwe,
kommst du zum Treffen. Du könntest dann dieses Tool zeigen.
lg
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 5994
Joined: Fri Oct 07, 2005 7:07 pm

Re: Sample - collection

Postby ukoenig » Fri May 12, 2017 10:28 am

Hello Otto,

unfortunately it is not possible for me
to join the meeting because I have to go to hospital in June
and afterwards I have a 6 weeks rehabilitaion.
I think it will be possible for me, to create
a working version You can test and show at the meeting,
in case it is useful.
Most of the new solutions during the last month will be
included in just one program.

regards
Uwe :cry:
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: Sample - collection

Postby Enrico Maria Giordano » Fri May 12, 2017 1:05 pm

Uwe, my best wishes for a speedy recovery!

EMG
User avatar
Enrico Maria Giordano
 
Posts: 8243
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia

Re: Sample - collection

Postby Otto » Sat May 13, 2017 10:14 pm

Hallo Uwe,
I drücke dir die Daumen und wünsche dir alles Gute.
lg
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 5994
Joined: Fri Oct 07, 2005 7:07 pm

Re: Sample - collection

Postby ukoenig » Tue Jun 13, 2017 7:16 am

Hello,

the first release of the sample-collector
Many new options are included.
Just let me know about any improvements could be added !!!

I'm busy to write a helpfile about the usage.
The usage is easy.
Select a part of one of the 5 groups and choose < from code > or < from resource >
All needed prg-files, images and resources are included.
The structure :
4 groups with 4 sections = 16 ( folderpages from code )
+ the same from resource = 32
and 5 extras = 37
One option of a group can include multiple samples.
That makes a capacity of round about 100 samples.

There is no need, to define a window, dialog or folder inside a sample
It is done once at startup for each defined group.

http://www.pflegeplus.com/Downloads/Samples1.zip

The screenshot shows the project-file where You can define and start the included samples.
5 EXTRA-buttons are included where it is possible to test anything.
Button 1 shows a MESSAGE-system.

Image

regards
Uwe :D
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: Sample - collection ( download Rel. 1.1 )

Postby ukoenig » Tue Jun 13, 2017 2:27 pm

It is easy, to include a sample from the FWH-samplefolder.
I explain how to include the original FWH-sample < changrad.prg > to the first window-section
don*t define any window !!!

Image

1.
open < Code_4.prg >

2.
select the first function < GRPC4_SEC1() >

3.
add from original FWH-sample < changrad.prg >

LOCAL oChoose, oBtn1, bChoose
bChoose = {| oG | ChangeGrad1( oG, oBtn1 ) }


4.
add and adjust :

@ 130, 130 RBBTN oBtn1 PROMPT "&Aceptar" OF oWnd1 SIZE 120, 50 FONT oSFont ;
ACTION ChooseGradient( oBtn1:aGradiant, bChoose, , {| oChoose | CancelGrad( oChoose, oBtn1 ) } )[/color]

5. add the original functions

ChangeGrad( oGrad, oBtn )
ChangeGrad1( oGrad, oBtn )
CancelGrad( oChoose, oBtn )


Test : selecting the first gray radio ( window-section ) and the button < from code >

regards
Uwe :D
Last edited by ukoenig on Thu Jun 15, 2017 9:39 am, edited 1 time in total.
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany

Re: Sample - collection ( download Rel. 1.1 )

Postby MGA » Wed Jun 14, 2017 8:11 pm

Uwe
Very Nice...
ubiratanmga@gmail.com

FWH18.02
FWPPC
Harbour/xHarbour
xMate
Pelles´C
TDolphin
MGA
 
Posts: 1234
Joined: Mon Feb 25, 2008 2:54 pm
Location: Brasil/PR/Maringá

Re: Sample - collection ( download Rel. 1.1 )

Postby cnavarro » Thu Jun 15, 2017 1:29 am

Uwe
Great
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
User avatar
cnavarro
 
Posts: 6498
Joined: Wed Feb 15, 2012 8:25 pm
Location: España

Re: Sample - collection ( download Rel. 1.1 )

Postby ukoenig » Thu Jun 15, 2017 8:52 am

I'm glad to hear that You like it.
To create a test, normally You have to start always from the beginning :
create a window, dialog or folder and next a background.
Using the tool You don't need to do that.
Splitted in sections, these main things are done already
You only need to include / define the tests.

The specification of the PRG-structures

There are five sections
A selected section can include multiple tests

1.
A dialog with FULLsize folder ( page 1 - 4 )
Page 5 is used as EXIT
--------------------------------------------------
from CODE
CODE_1.prg
GRPC1_SEC1( oFld1, nSavePage )
GRPC1_SEC2( oFld1, nSavePage )
GRPC1_SEC3( oFld1, nSavePage )
GRPC1_SEC4( oFld1, nSavePage )

from RESOURCE
RES_1.prg
RS1_PART1( oFld1, nSavePage )
RS1_PART2( oFld1, nSavePage )
RS1_PART3( oFld1, nSavePage )
RS1_PART4( oFld1, nSavePage )
RS1_PART5( oFld1, nSavePage )

2.
A dialog with HALFsize folder ( page 1 - 4 )
------------------------------------------------------
CODE_2.prg
GRPC2_SEC1( oFld2, nSavePage ) - GRPC2_SEC4( oFld2, nSavePage )
RES_2.prg
RS1_PART1( oFld2, nSavePage ) - RS1_PART5( oFld2, nSavePage )

3.
ONLY 4 dialogs
--------------------
CODE_3.prg
GRPC3_SEC1() - GRPC3_SEC4()
RES_3.prg
RS3_PART1() - RS3_PART4()

4.
ONLY 4 windows
--------------------
CODE_4.prg
GRPC4_SEC1() - GRPC4_SEC4()
RES_4.prg
RS4_PART1() - RS4_PART4()

5.
EXTRA buttons ( nothing defined )
---------------------------------
EXTRA_1.prg - EXTRA_5.prg

6.
SETUP
The background-defines and a DBF to add the test-infos


regards
Uwe :D
Since 1995 ( the first release of FW 1.9 )
i work with FW.
If you have any questions about special functions, maybe i can help.
User avatar
ukoenig
 
Posts: 4043
Joined: Wed Dec 19, 2007 6:40 pm
Location: Germany


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 17 guests