|
Home > Archive > FoxPro Setup > April 2005 > custom toolbar in foxpro IDE?
You are viewing an archived Text-only version of the thread.
To view this thread in it's original format and/or if you want to reply to
this thread please [click here]
| Author |
custom toolbar in foxpro IDE?
|
|
| Emilio 2005-04-07, 8:05 pm |
| This seems like it would be rather feasible. I'm looking for help on how to
create a customized toolbar in Foxpro. I'm familiar with customizing the
toolbars that come with Foxpro, however, the various buttons that you can use
are pre-determined by categories (File, Edit, View, etc.). Is there a way to
introduce new, customized buttons? Or, rather, to create a toolbar, and
instead of adding it to an application, add it to the IDE?
Thanks in advance.
| |
| Stefan Wuebbe 2005-04-07, 8:05 pm |
|
"Emilio" <Emilio@discussions.microsoft.com> schrieb im Newsbeitrag
news:6CE1E6F5-22B7-480F-8DDB- DA781785097E@microso
ft.com...
> This seems like it would be rather feasible. I'm looking for help on how to
> create a customized toolbar in Foxpro. I'm familiar with customizing the
> toolbars that come with Foxpro, however, the various buttons that you can use
> are pre-determined by categories (File, Edit, View, etc.). Is there a way to
> introduce new, customized buttons? Or, rather, to create a toolbar, and
> instead of adding it to an application, add it to the IDE?
You can define a custom toolbar class and run an instance in the
IDE (via "devStart.prg" or project hook for example, see below)
hth
-Stefan
--
|\_/| ------ ProLib - programmers liberty -----------------
(.. ) Our MVPs and MCPs make the Fox run....
- / See us at www.prolib.de or www.AFPages.de
-----------------------------------------------------------
* custom_ide_toolbar.prg
PUBLIC oToolbar
oToolbar = CREATEOBJECT('myTool
bar')
oToolbar.Show()
RETURN
DEFINE CLASS myToolbar as Toolbar
ADD OBJECT cmdCloseDBs as Commandbutton WITH ;
Caption = "Close Databases"
PROCEDURE cmdCloseDBs.Click
CLOSE DATABASES ALL
ENDPROC
ADD OBJECT chkDeleted as Checkbox WITH ;
Caption = "Set('Deleted')", ;
Style = 1
PROCEDURE chkDeleted.Valid
IF SET("Deleted")='ON'
SET DELETED OFF
ELSE
SET DELETED ON
ENDIF
? 'SET("Deleted")', SET("Deleted")
ENDPROC
ENDDEFINE
* eop
| |
| Emilio 2005-04-07, 8:05 pm |
| Perfect. Thanks.
"Stefan Wuebbe" wrote:
>
> "Emilio" <Emilio@discussions.microsoft.com> schrieb im Newsbeitrag
> news:6CE1E6F5-22B7-480F-8DDB- DA781785097E@microso
ft.com...
>
> You can define a custom toolbar class and run an instance in the
> IDE (via "devStart.prg" or project hook for example, see below)
>
>
> hth
> -Stefan
>
>
> --
> |\_/| ------ ProLib - programmers liberty -----------------
> (.. ) Our MVPs and MCPs make the Fox run....
> - / See us at www.prolib.de or www.AFPages.de
> -----------------------------------------------------------
>
> * custom_ide_toolbar.prg
> PUBLIC oToolbar
> oToolbar = CREATEOBJECT('myTool
bar')
> oToolbar.Show()
> RETURN
>
> DEFINE CLASS myToolbar as Toolbar
> ADD OBJECT cmdCloseDBs as Commandbutton WITH ;
> Caption = "Close Databases"
> PROCEDURE cmdCloseDBs.Click
> CLOSE DATABASES ALL
> ENDPROC
> ADD OBJECT chkDeleted as Checkbox WITH ;
> Caption = "Set('Deleted')", ;
> Style = 1
> PROCEDURE chkDeleted.Valid
> IF SET("Deleted")='ON'
> SET DELETED OFF
> ELSE
> SET DELETED ON
> ENDIF
> ? 'SET("Deleted")', SET("Deleted")
> ENDPROC
> ENDDEFINE
> * eop
>
>
|
|
|
|
|