| |
| |
|
Torsten
Rümker | Hi,
I have me today consider for my Lieblingsprojekt finally a Settings dialog to create.
after I me The different possibilities by the head weg let have would I gladly with a tab Control works.
now To of my actual question:
If I with the ROC one Tabeingefügt have, How bestücke I it then correctly with the different of me required elementen?
yet alights no element on the jeweiligen tab.
Achja and How come I whom 2ten or. 3ten tab heran?
many ask 
be as alternative naturally too for Info grateful where I the nachlesen can
MfG
Torsten |
|
| |
| Ich lerne, ob ich will oder nicht!
Betriebssystem:
- Ubuntu 15.x
- Windows (diverse)
XProfan Version: X2 | 10/02/05 ▲ |
|
| |
|
|
Rolf
Koch | Hi versuchs time so:
CompileMarkSeparation $P+
SetErrorLevel 0
********************** HINWEISE ********************************
CODE ERZEUGT MIT ROKOS OBJECT CREATOR 4.2d
DATUM 02.10.2005 um 13:09 Uhr
VERWENDETE PROFANVERSION IST 8.0-NT XPROFAN
CODE ERSTELLT UNTER WINDOWS XP
!!! Dieser Code wird von Roc immer neu erzeugt !!!
!!! Erst bearbeiten, wenn alle Objekte erzeugt wurden !!!
!!! Verändern Sie ggf. feste Pfade in variable Pfade !!!
DEF GETSYSCOLOR(1) !"USER32","GetSysColor"
DECLARE T&,TAB1&,TAB2&
DECLARE EDIT1&,EDIT2&,EDIT3&
DECLARE ELEMENT1&,ELEMENT2&,ELEMENT3&
WINDOWSTYLE 63
WINDOWTITLE "Tabtest"
WINDOW 209,169-500,250
SETTRUECOLOR 1
DECLARE ENDE%
CLS GETSYSCOLOR(15)
USEFONT "MS Sans Serif",13,0,0,0,0
SETDIALOGFONT 1
Hier kann ggf. Ihr Menü hin
T& = CREATE("TABCTRL",%HWND,"Reiter1",0025,0027,0395,0172)
TAB1&=@InsertTab(T&,1,"Reiter2")
TAB2&=@InsertTab(T&,2,"Reiter3")
AUF ERSTEN TAB LEGEN: (Nicht an Edit stören, habs einfach so genannt!)
ELEMENT1&=Control("STATIC","",$54001106,10,30,200,100,t&,0,%hinstance,$0)
EDIT1&=Create("Edit",ELEMENT1&,"TAB 0",10,10,100,18)
AUF ZWEITEN TAB LEGEN:
ELEMENT2&=Control("STATIC","",$54001106,10,30,200,100,t&,0,%hinstance,$0)
EDIT2&=Create("TEXT",ELEMENT2&,"TAB 1",10,10,100,18)
AUF DRITTEN TAB LEGEN:
ELEMENT3&=Control("STATIC","",$54001106,10,30,200,100,t&,0,%hinstance,$0)
EDIT3&=Create("BUTTON",ELEMENT3&,"TAB 3",10,10,100,18)
Zuerst nur das erste anzeigen:
Showwindow(Element1&,1)
Showwindow(Element2&,0)
Showwindow(Element3&,0)
SETFOCUS(%HWND)
WHILENOT ENDE%
WAITINPUT
SETTEXT %HWND,"Aktives Tab "+STR$(GetActiveTab(T&))
If @EQU(%KEY,2)
LET ENDE%= 1
ELSEIF @EQU(%KEY,4)
ELSEIF TABCHANGED(T&) TABCTRL
IF GetActiveTab(T&) = 0
Showwindow(Element1&,1)
Showwindow(Element2&,0)
Showwindow(Element3&,0)
ELSEIF GetActiveTab(T&) = 1
Showwindow(Element1&,0)
Showwindow(Element2&,1)
Showwindow(Element3&,0)
ELSEIF GetActiveTab(T&) = 2
Showwindow(Element1&,0)
Showwindow(Element2&,0)
Showwindow(Element3&,1)
ENDIF
Ea>
WEND
Rolf |
|
| |
| |
| |
|
|
Torsten
Rümker | clear this is then self written,
me interesting whether I the in ROC sozusagen by Click release can.
MfG
Torsten
PS: ähnliches trouble, can I z.b. a Checkbox at the outset as Markiert create? |
|
| |
| Ich lerne, ob ich will oder nicht!
Betriebssystem:
- Ubuntu 15.x
- Windows (diverse)
XProfan Version: X2 | 10/02/05 ▲ |
|
| |
|
|
Rolf
Koch | LOL
Achso.
No to Time not yet. I give To, that I this already long had to introduce can (but the love Time, can me not).
>PS: ähnliches trouble, can I z.b. a Checkbox at the outset as Markiert create?
unfortunately not yet, can I me but time remember (guter Info).
Nunja a problem is it really not, sooner one not yet eingebundenes feature.
ROC is a Helper window. I had never to a IDE To write, with which one a kmpl. View source create and this then perform can.
ought to not so his, that one still something händisch hinzufügt? means whom logischen View source my I.
Rolf |
|
| |
| |
| |
|
|
 | [quote:5b4954fc73=Rolf cook]ROC is a Helper window. I had never to a IDE To write, with which one a kmpl. View source create and this then perform can.
ought to not so his, that one still something händisch hinzufügt? means whom logischen View source my I.[/quote:5b4954fc73]
the wished so did i not of ROC
Only the Insert the Elemte on each tab heard still with to formation the Dialoges, therefore have I virtual the would possible.
Übriegens, wished I time allude, with the the ROC To works me already so some hour gespart has, means thankyou for the nice Piece software.
and yet: I have faith I another Ergänzungsidee for future versions
one SpinEdits can fundamentally a upper and downstairs boundary for eingestelle values mitgeben, the would too yet beautiful, if to the same miterledigen could if one it anlegt.
MfG
Torsten |
|
| |
| |
| |
|
|
Rolf
Koch | [quote:e98470620a]the wished so did i not of ROC [/quote:e98470620a]
Puh and GottseiDank
mean me, there stick plenty More behind as it looks ;)
[quote:e98470620a]Übriegens, wished I time allude, with the the ROC To works me already so some hour gespart has, means thankyou for the nice Piece software.
[/quote:e98470620a]
.. and very this is it, what me then again courage gives weiterzumachen. Freut me Real something like To listen!
[quote:e98470620a]and yet: I have faith I another Ergänzungsidee for future versions
one SpinEdits can fundamentally a upper and downstairs boundary for eingestelle values mitgeben, the would too yet beautiful, if to the same miterledigen could if one it anlegt.
[/quote:e98470620a]
Have me too this note. but denk Please on it:
I can never promise whether and when I something install can ;)
but many Thanks for ideas and that You whom Object Creator uses.
Rolf |
|
| |
| |
| |
|
(774)
Deutsch
English
Français
Español
Italia