| |
|
|
Torsten Rümker | Hallo, ich habe mir heute überlegt für mein Lieblingsprojekt endlich einen Einstellungen Dialog zu erstellen.
Nachdem ich mir die Verschiedenen möglichkeiten durch den Kopf gehen lassen habe würde ich gerne mit einem Tab Control arbeiten.
Jetzt zu meiner eigentlichen Frage:
Wenn ich mit dem ROC ein Tabeingefügt habe, wie bestücke ich es dann korrekt mit den verschiedenen von mir benötigten elementen? Bisher landet kein element auf dem jeweiligen Tab.
Achja und wie komme ich an den 2ten bzw. 3ten Tab heran?
Viele fragen
Bin als Alternative natürlich auch für den Hinweis dankbar wo ich das nachlesen kann
MfG Torsten |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 02.10.2005 ▲ |
|
|
|
|
Rolf Koch | Hi versuchs mal so: KompilierenMarkierenSeparieren $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
ENDIF
WEND
Rolf |
|
|
| |
|
|
|
Torsten Rümker | Klar das ist dann selbst geschrieben, mich interessierte ob ich das auch im ROC sozusagen per Mausklick realisieren kann.
MfG Torsten
PS: ähnliches Problem, kann ich z.b. eine Checkbox von vornherein als Markiert erstellen? |
|
|
| Ich lerne, ob ich will oder nicht! Betriebssystem: - Ubuntu 15.x - Windows (diverse) XProfan Version: X2 | 02.10.2005 ▲ |
|
|
|
|
Rolf Koch | LOL Achso. Nein zur Zeit noch nicht. Ich gebe zu, daß ich dies schon lange hätte einführen können (aber die liebe Zeit, lässt mich nicht).
>PS: ähnliches Problem, kann ich z.b. eine Checkbox von vornherein als Markiert erstellen? Leider noch nicht, kann ich mir aber mal merken (guter Hinweis). Nunja ein Problem ist es eigentlich nicht, eher ein noch nicht eingebundenes Feature.
ROC ist ein Fensterhelfer. Ich hatte nie vor eine IDE zu schreiben, mit welcher man einen kmpl. Quelltext erstellen und diesen dann ausführen kann. Sollte es nicht so sein, daß man doch noch etwas händisch hinzufügt? Also den logischen Quelltext meine ich.
Rolf |
|
|
| |
|
|
|
| [quote:5b4954fc73=Rolf Koch]ROC ist ein Fensterhelfer. Ich hatte nie vor eine IDE zu schreiben, mit welcher man einen kmpl. Quelltext erstellen und diesen dann ausführen kann. Sollte es nicht so sein, daß man doch noch etwas händisch hinzufügt? Also den logischen Quelltext meine ich.[/quote:5b4954fc73] Das wollte ich auch nicht vom ROC Nur das Einfügen der Elemte auf die einzelnen Reiter gehört doch noch mit zur Gestaltung des Dialoges, deshalb habe ich gedacht das wäre möglich.
Übriegens, wollte ich mal erwähnen, das mit dem ROC zu Arbeiten mir schon so manche Stunde gespart hat, also dankeschön für das schöne Stück Software.
Und jetzt noch: Ich habe glaube ich noch eine Ergänzungsidee für zukünftige Versionen Einem SpinEdit kann man grundsätzlich eine obere und untere Grenze für eingestelle Werte mitgeben, das wäre auch noch schön, wenn man das gleich miterledigen könnte wenn man es anlegt.
MfG Torsten |
|
|
| |
|
|
|
Rolf Koch | [quote:e98470620a]Das wollte ich auch nicht vom ROC [/quote:e98470620a] Puh und GottseiDank Glaub mir, da steckt viel mehr hinter als es aussieht ;)
[quote:e98470620a]Übriegens, wollte ich mal erwähnen, das mit dem ROC zu Arbeiten mir schon so manche Stunde gespart hat, also dankeschön für das schöne Stück Software. [/quote:e98470620a] .. und genau das ist es, was mir dann wieder Mut gibt weiterzumachen. Freut mich echt sowas zu hören!
[quote:e98470620a]Und jetzt noch: Ich habe glaube ich noch eine Ergänzungsidee für zukünftige Versionen Einem SpinEdit kann man grundsätzlich eine obere und untere Grenze für eingestelle Werte mitgeben, das wäre auch noch schön, wenn man das gleich miterledigen könnte wenn man es anlegt. [/quote:e98470620a] Hab mir auch dies notiert. Aber denk bitte daran: Ich kann niemals versprechen ob und wann ich etwas einbauen kann ;)
Aber vielen Dank für die Ideen und daß Du den Object Creator nutzt. Rolf |
|
|
| |
|
|