| |
|
|
Roberto Neu | Ich habe es schon mit Deletobject und DestroyWindow probiert aber da Passiert einfach nichts. |
|
|
| |
|
|
|
Rolf Koch | Was meiste mit löschen? Den Inhalt? Das Objekt selbst? Ein normales Multiedit per Create erstellt? Sei mir nicht böse, aber Dein Avatarbild ist brutal aufdringlich |
|
|
| |
|
|
|
Roberto Neu | Ja ein normales Multiedit mit einem Text Drin. Ich will danach ein Kleinerers öffnen lassen, aber dan kommt immer die Kleine hervor ^^ Also das Objekt und der Text drin |
|
|
| |
|
|
|
Rolf Koch | Gib mal ein Stück Quelltext - ich glaub das hat keiner kapiert hier. Ein Multieedit auf Creatbasis lässt sich immer zerstören, wenn es ein Handle zugeordnet bekommen hat. Ich gehe jetzt mal wieder von einem Fehler Deinerseits aus. |
|
|
| |
|
|
|
Roberto Neu | Die will ich später dann Löschen KompilierenMarkierenSeparieren
Proc meditklein
klein& = Create("MultiEdit",%HWnd,"Kleine Ansicht",5,7,300,-380)
endproc
Proc meditgros
gros& = Create("MultiEdit",%HWnd,"Große Ansicht",5,7,400,-380)
c
|
|
|
| |
|
|
|
Rolf Koch | |
|
| |
|
|
|
Rolf Koch | Hier mal ein- und ausblenden. Die Boxen werden nicht zerstört, kannst aber immer wieder drauf zugreifen: KompilierenMarkierenSeparierendeclare gros&,klein&
Proc meditklein
klein& = Create("MultiEdit",%HWnd,"Kleine Ansicht",5,7,300,-380)
endproc
Proc meditgros
gros& = Create("MultiEdit",%HWnd,"Große Ansicht",5,7,400,-380)
endproc
cls
meditgros
meditklein
Showwindow(klein&,1)
showwindow(gros&,0)
waitinput
Showwindow(klein&,0)
showwindow(gros&,1)
waitinput
|
|
|
| |
|
|
|
Roberto Neu | So habe das mit destroywindow jetzt gemacht. Ich habe es sogar doppelt geschrieben. Aber da ich im erklären nicht so gut bin guck dir das Bitte mal selbst an
Währendessen werde ich das mit 0 und 1 probieren ^^ |
|
|
| |
|
|
|
Rolf Koch | Heut bin ich sehr gutmütig *lol* Schau ganz einfach: (Aber jede Zeile kapieren, bevor Du nächste Frage stellst!) KompilierenMarkierenSeparierendeclare medit&,befehle&,kr&,rbutton2&,rbutton1&,rbutton3&,text1$,text2$,text3$,Intro$,E%,Exit&,klein&,gros&,bild&,kleinb&,grosb&,grosr&,kleinr&
windowtitle "IP Editor 1"
cls
loadbmp "files\kleine.bmp",5,385;0
Proc meditklein
klein& = Create("MultiEdit",%HWnd,"Kleine Ansicht",5,7,300,-380)
endproc
Proc meditgros
gros& = Create("MultiEdit",%HWnd,"Große Ansicht",5,7,400,-380)
endproc
Create("GroupBox",%HWnd,"Ansicht\Optionen",420,0,Width(%HWnd) -435,Height(%HWnd) - 205)
grosr& = Create("RadioButton",%HWnd,"Groß",427,25,70,20)
kleinr& = Create("RadioButton",%HWnd,"Klein",427,50,70,20)
kleinb& = Create("Button",%HWnd,"Speichern",498,25,100,20)
grosb& = Create("Button",%HWnd,"Speichern",498,50,100,20)
Beide zuerst erstellen
meditgros
meditklein
Start: dann nur grosses anzeigen:
showwindow(klein&,0)
showwindow(gros&,1)
Der Logik wegen auch die Checkbox setzen:
setcheck grosr&,1
whilenot e%
WaitInput
if GetCheck(kleinr&)
Kleines anzeigen, grosses ausblenden
showwindow(klein&,1)
showwindow(gros&,0)
elseif GetCheck(grosr&)
Grosses anzeigen, kleines ausblenden
showwindow(klein&,0)
showwindow(gros&,1)
elseif Mouse(5,385 - 305,405)
Kleines anzeigen, grosses ausblenden
showwindow(klein&,1)
showwindow(gros&,0)
endif
endwhile
='./../../references-fonction/xprofan/end/'>end
|
|
|
| |
|
|
|
Rolf Koch | |
|
| |
|
|
|
Roberto Neu | Hab alles verstanden. Aber das elseif Mouse(........) musste man in IF umändern oder? Also vorher hats bei mir net geklappt uber das Bild das kleine Multiedit(Omg ist Multiedit männlich oder weiblich??) zu öffnen. Jetzt gehts ^^ Und nochmal vielen Dank |
|
|
| |
|
|