browse

Topic Specific Tutorials and Tips.

Moderator: Rathinagiri

t57042
Posts: 148
Joined: Tue Mar 16, 2010 9:46 am
Location: belgium

browse

Post by t57042 »

With the BROWSE command is it possible to edit the record in a separate window (so not inplace)?

Thanks Richard
User avatar
mol
Posts: 3718
Joined: Thu Sep 11, 2008 5:31 am
Location: Myszków, Poland
Contact:

Re: browse

Post by mol »

You need to define your own window to edit data. You can also use InputWindow.
Edit procedure can be called from upper menu, context menu, bottom or hetkey.
User avatar
esgici
Posts: 4543
Joined: Wed Jul 30, 2008 9:17 pm
DBs Used: DBF
Location: iskenderun / Turkiye
Contact:

Re: browse

Post by esgici »

t57042 wrote:With the BROWSE command is it possible to edit the record in a separate window (so not inplace)?
Demo prg of EDIT EXTENDED already works in this way ;)

Regards
Viva INTERNATIONAL HMG :D
User avatar
danielmaximiliano
Posts: 2611
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Contact:

Re: browse

Post by danielmaximiliano »

Hola a Todos :
a pesar que en la referencia de HMG dice que puedo mirar los distintos ejemplos
hmg.3.0.46 no contiene dichos ejemplos : \hmg\samples\browse_5\ , donde puedo conseguir dichos ejemplos para no tener que recurrir a Minigui ext.
HMG Reference (c)2002-2010 Roberto Lopez httpsites.google.jpg
HMG Reference (c)2002-2010 Roberto Lopez httpsites.google.jpg (64.99 KiB) Viewed 7115 times
gracias /thanks

Google Translate

Hi Everyone:
although the HMG reference says that I can look at many examples
hmg.3.0.46 not contain these examples: \hmg\samples\browse_5\ , where I can get these examples to avoid resorting to MiniGUI ext.

I enter the data to browse do not come a .dbf
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`. Harbour/HMG : It's magic !
(¸.·``··*

Saludos / Regards
DaNiElMaXiMiLiAnO

Whatsapp. := +54901169026142
Telegram Name := DaNiElMaXiMiLiAnO
User avatar
esgici
Posts: 4543
Joined: Wed Jul 30, 2008 9:17 pm
DBs Used: DBF
Location: iskenderun / Turkiye
Contact:

Re: browse

Post by esgici »

danielmaximiliano wrote: hmg.3.0.46 not contain these examples: \hmg\samples\browse_5\ , where I can get these examples to avoid resorting
Hola Daniel

Browse samples extracted from official HMG distribution for a long time ago :(
BROWSES.zip
BROWSE samples of HMG
(134.43 KiB) Downloaded 877 times
Viva INTERNATIONAL HMG :D
User avatar
danielmaximiliano
Posts: 2611
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Contact:

Re: browse

Post by danielmaximiliano »

Thanks / Gracias Esgici.
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`. Harbour/HMG : It's magic !
(¸.·``··*

Saludos / Regards
DaNiElMaXiMiLiAnO

Whatsapp. := +54901169026142
Telegram Name := DaNiElMaXiMiLiAnO
klauskugel
Posts: 90
Joined: Tue Oct 09, 2012 2:28 pm

Re: browse

Post by klauskugel »

Hola Daniel,

Is it this the sort of Code your looking for?

#include "minigui.ch" // Minigui 2.9.5

Function Main

SET DELETED ON

DEFINE WINDOW Form_1 ;
AT 0,0 ;
WIDTH 640 HEIGHT 480 ;
TITLE 'MiniGUI Browse Demo)' ;
MAIN NOMAXIMIZE ;
ON INIT OpenTables() ;
ON RELEASE CloseTables()

DEFINE MAIN MENU
POPUP 'File'
ITEM 'Delete' ACTION Def_Excluir()
ITEM 'Refresh' ACTION Form_1.Browse_1.Refresh
SEPARATOR
ITEM 'Exit' ACTION Form_1.Release
END POPUP
END MENU

@ 10,10 BROWSE Browse_1 ;
WIDTH 610 ;
HEIGHT 390 ;
HEADERS { 'Code' , 'First Name' , 'Last Name', 'Birth Date', 'Married' , 'Biography' } ;
WIDTHS { 150 , 150 , 150 , 150 , 150 , 150 } ;
WORKAREA Test ;
FIELDS { 'Test->Code' , 'Test->First' , 'Test->Last' , 'Test->Birth' , 'Test->Married' , 'Test->Bio' } ;
TOOLTIP 'Browse Test' ;
DELETE ;
LOCK ;
EDIT APPEND


END WINDOW

CENTER WINDOW Form_1

Form_1.Browse_1.SetFocus

ACTIVATE WINDOW Form_1

Return Nil

Procedure OpenTables()

Use Test Index Code

Go Top

Form_1.Browse_1.Value := RecNo()

Return Nil

Procedure CloseTables()
Use
Return Nil

Function Def_Excluir()

if MsgYesNo("Deseja excluir o registro corrente?",'')
TEST->(DBGoto(Form_1.Browse_1.Value))
While(TEST->(!RLOCK()))
enddo
TEST->(DBDelete())
TEST->(DBUnlock())
Form_1.Browse_1.Refresh()
MsgInfo(" Concluido! ",)
endif

Return Nil
Attachments
mybrowse295.zip
(3.54 KiB) Downloaded 512 times
klauskugel
Posts: 90
Joined: Tue Oct 09, 2012 2:28 pm

Re: browse

Post by klauskugel »

Here the full set of browse in 2.9.5
So by now that's the full set of the past.
I just looked in Esgicis examples and thought
the 2.9.5 examples could be useful.

:D
Greetings klauskugel
Attachments
brow295.zip
(97.29 KiB) Downloaded 554 times
User avatar
Czarny_Pijar
Posts: 172
Joined: Thu Mar 18, 2010 11:31 pm
Location: 19.2341 E 50.2267 N

Re: browse

Post by Czarny_Pijar »

Looks like the BROWSE command now is orphaned in favor of GRID. Only misleading echoes of those good times can be heard, among other in the priceless Esgici's guide to IDE, quote:
Step - 2 : Copy TEST.DBF and TEST.DBT from C:\hmg\SAMPLES\BROWSE_1 folder to your new folder.
Fortunately these files can be found elsewhere.

Also the Browse button hit the little honorable last place in the toolbox roster.

BTW, thank you folks for BROWSE examples, :roll: when I came here, these examples were kissed goodbay already.
User avatar
esgici
Posts: 4543
Joined: Wed Jul 30, 2008 9:17 pm
DBs Used: DBF
Location: iskenderun / Turkiye
Contact:

Re: browse

Post by esgici »

klauskugel wrote: I just looked in Esgicis examples
FYI :

That are official samples of HMG, not mine.

Regards
Viva INTERNATIONAL HMG :D
Post Reply