| |
| |
|
Manfred
Barei | Salut,
je weiss pas si cela un faute ist et seulement chez mir auftritt.
si je sur dem Hauptfenster un Bild comme Hintergrund lege volonté TabControlls pas plus angezeigt, alle anderen Controlls cependant volonté angezeigt, siehe Code.
s'il te plaît einmal Testen.
KompilierenMarqueSéparation $P+
SET("ERRORLEVEL",0)
DECLARE RICHEDIT1&,RICHEDIT2&
DECLARE STATICBITMAP1&,hbild&
DECLARE GRIDBOX1&
'----------Declarationen für Tabcontroll
DECLARE TabControl&,TabPage1&,TabPage2&,LastTab&
'-----------------------------------------------------------------
DEF GETSYSCOLOR(1) !"USER32","GetSysColor"
WINDOWSTYLE 538
WINDOWTITLE "Test"
WINDOW (%maxx/2 - 736/2),(%maxy/2 - 525/2) - 736,525
SET("TRUECOLOR",1)
DECLARE ENDE&
CLS GETSYSCOLOR(15)
USEFONT "MS Sans Serif",14,0,0,0,0
SETDIALOGFONT 1
'--hier ein eigenes Bild wählen---------------------------
STATICBITMAP1& = CREATE("HPIC",-1,"D:PROGRAMMEXPROFAN11EIGENE_PROGRAMMEKARTEIKARTENBMPKARTEN_TEXTUR.PNG")
'--so funktioniert es nicht mit dem TabControll
'hbild& = Create("BITMAP",%HWND,STATICBITMAP1&,0000,0000)
'--so funktioniert es mit dem TabControll--------------
DrawPic STATICBITMAP1&,0 ,0 ;0
'-----------TabControl--------------------------------------------
TabControl& = @CREATE("TABCTRL",%HWND,"Vorderseite",260,150,425,265)
TabPage1& = CONTROL("DIALOG","", $40081003,2,25,WIDTH(TabControl&)-10, HEIGHT(TabControl&)-30,TabControl&,0,%HINSTANCE)
SHOWWINDOW(TabPage1&,0)
@INSERTTAB(TabControl&,2,"Rückseite")
TabPage2& = CONTROL("DIALOG","", $40081003,2,25,WIDTH(TabControl&)-10, HEIGHT(TabControl&)-30,TabControl&,0,%HINSTANCE)
SHOWWINDOW(TabPage2&,0)
LastTab& = TabPage1&
RICHEDIT1& = CREATE("RICHEDIT",TabPage1&,"",2,0,425,-235)
RICHEDIT2& = CREATE("RICHEDIT",TabPage2&,"",2,0,425,-235)
SHOWWINDOW(LastTab&,1)
'-------------------------------------------
GRIDBOX1& = create("GridBox",%HWND,"lfd. Nr.;0;50;von;2;65;bis;2;65",3,032,145,175,280)
SETFOCUS(%HWND)
REPAINT 0
ENDE& = 0
WHILENOT ENDE&
WAITINPUT
If %KEY=2
ENDE&= 1
ElseIf @TABCHANGED(TabControl&)
SHOWWINDOW(LastTab&,0)
If GETACTIVETAB(TabControl&) = 0
LastTab& = TabPage1&
ElseIf GETACTIVETAB(TabControl&) = 1
LastTab& = TabPage2&
EndIf
SHOWWINDOW(LastTab&,1)
SETFOCUS(TabControl&)
EndIf
EndWhile
DeleteObject STATICBITMAPclass=s4 href='./../../function-references/XProfan/end/'>end
Salut aus qui Heide
Manfred |
|
| |
| Zu wenig Wissen ist gefärlich, zu viel auch.(XProfan X4) | Win 10 Pro 64 | Win7 Ultimate 32/64 | AMD FX-8320, 16GB, GeForce GT 630 | | 05.10.2010 ▲ |
|
| |
|
|
 | chez stürzt cela Programme juste ab weil im Code steht:
KompilierenMarqueSéparationSTATICBITMAP1& = CREATE("HPIC",-1,"D:PROGRAMMEXPROFAN11EIGENE_PROGRAMMEKARTEIKARTENBMPKARTEN_TEXTUR.PNG")>
si je mais:
KompilierenMarqueSéparation schreibe funktionierts wunderbar et sous Win7 habe je ici aussi aucun Anzeigeprobleme bzw. es wird alles korrekt gezeichnet.
(maintenant wiederum ne...aucune XP zur main...) |
|
| |
| |
| |
|
|
Thomas
Freier | Du versteht es pas. il voudrais volontiers - pourquoi De toute façon- pas : DrawPic STATICBITMAP1&,0 ,0 ;0
mais : hbild& = Créer("BITMAP",%HWND,STATICBITMAP1&,0000,0000)
voilà cela Tab-Contrôle pas plus im Vordergrund im opposition zur Gridbox et eh bien voudrais Manfred savons, pourquoi cela so ist.
Doit il wohl avec DrawPic hinnehmen ou bien cela Tab-Contrôle sur hbild& poser. |
|
| |
| |
| |
|
|
E.T. | là réagir quelques Elemente droite unterschiedlich:
un @CONTROL("Dialogue",... liegt aussi im Hintergrund,
un @Créer("Button,%HWnd,... liegt im Vordergrund
citation: ...ou bien cela Tab-Contrôle sur hbild& poser.
dans qui Aider steht en supplément:
"Hinweis; si Dialogelemente sur cette Bitmap liegen devoir, so ist chez ihnen quand même cela Handle des übergeordneten Dialoges/Fensers anzugeben et pas cela des Bitmap-Controls. avec cela wird gewährleistet, qui qui Buttons, etc. comment gewohnt réagir."
alors soll es oui so gemacht volonté, comme Manfred im Bsp. aufzeigt !
une unification qui Elemente dans XProfan, so cela ensuite aussi alle Elemente im Vordergrund liegen, serait je là pour angebracht tenir... |
|
| |
| Grüße aus Sachsen... Mario  WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 06.10.2010 ▲ |
|
| |
|
|
| la fois avec einem Canvas [...]  probiert? |
|
| |
| |
| |
|
|
Manfred
Barei | allô iF,
si Du dir den Code genauer durchgelesen hättest ensuite hättest Du gesehen le moi sur qui la ligne avec dem STATICBITMAP1& une Kommentar eingefügt habe dans dem steht cela homme un eigenes Bild auswählen soll.
comment Thomas richtig erkannt hat brauche je es avec Créer("BITMAP" et pas avec DrawPic weil cela pas so Funktioniert comment je es brauche
iF, j'ai cela avec dem Canvas encore pas so entier verstanden mais je werde es avec cela einmal essayer.
Fals encore quelqu'un une autre möglichkeit hatt, je suis avec presque allem d'accord, je dois es seulement comprendre.
Salut
Manfred |
|
| |
| Zu wenig Wissen ist gefärlich, zu viel auch.(XProfan X4) | Win 10 Pro 64 | Win7 Ultimate 32/64 | AMD FX-8320, 16GB, GeForce GT 630 | | 06.10.2010 ▲ |
|
| |
|
|
|
si Du dir den Code genauer durchgelesen hättest ensuite hättest Du gesehen le moi sur qui la ligne avec dem STATICBITMAP1& une Kommentar eingefügt habe dans dem steht cela homme un eigenes Bild auswählen soll.
maintenant biste ungerecht. j'ai den Code durchaus oui c'est ca angesehen et _deshalb aussi erkannt cela im opposition zum Code im Phorum hPic statt Bitmap angewandt wird - alors un "Bild" statt un Contrôle et tu écris dessus oui aussi "ein Bild comme Hintergrund" et pas un Bitmap-Static. mon hNewPic-Hinweis était doch un Tip comment cela Beispiel hätte einfacher air peut.
"Wenn je sur dem Hauptfenster un Bild comme Hintergrund lege" - steht im Eingangsposting et ca était pour mich aussi "schlüssig" weil Bitmaps oui scheinbar dem TabControl ne...aucune Neuzeichnen senden (quoi je mais au maximum vermute).
Drum J'ai eu Thomas aussi pas verstanden avec "Du versteht es pas. il voudrais volontiers - pourquoi De toute façon- pas : DrawPic", car cela Eingangsposting weicht dans Code et Text de dem Bitmap-Posting hin zum hPic-Posting ab.
Ist mais "wurscht" - wir trouver déjà une Code qui passt.
quoi oui c'est ca veux Du letztendlich erreichen? cela cela Hintergrundbild aussi simple _nachträglich geändert volonté peux? si pas ensuite wäre doch cela hPic-Zeichnen sur hWnd optimal et on pourrait aussi la fois Canvas sur DLG essayer.
Solch un Canvas comment de qui canvas.inc hergebildet kennt 2 "Modi". qui erste Modi bedeutet soviel comment "Subclasse mir Contrôle/ Dialog XYZ et zeichne mir puis un hPic welches on ständig aussi changement peux comment on veut simple per sur-hPic-Zeichnen".
qui zweite Modi ((si plus que 1 Param angegeben chez create) erzeugt un Static dans angegebener Taille et legt puis un hPic welches on ständig aussi changement peux comment on veut simple per sur-hPic-Zeichnen.
So pourrait on dire Modi2 ist comment un Bitmap-Static avec dem Unterschied aussi nachträglich simple puis zeichnen trop peut sans Flimmern etc., Modi1 zeichnet arrêt sur einem beliebigen Contrôle solch hPic.
Könnte on dire canvas um «PCSI à Contrôle kleben sans selbst um Neuzeichnen kümmern trop müssen". |
|
| |
| |
| |
|
|
E.T. | citation: "...«PCSI à Contrôle kleben sans selbst um Neuzeichnen kümmern trop müssen"
cela muss je wohl doch aussi juste (alors si Zeit ist...) la fois ausprobieren....
mais cela irgendwelche Elemente dans Xprofan "vorn" ou bien "hinten" liegen (vom Bild aus gesehen), sollte doch vereinheitlicht volonté (Ah, Wunsch eingeben...).
je hatte kürzlich aussi erstaunt geschaut, comme mon "änderbares Hintergrundbild" beim erzeugen et sichtbar faire eines (@Contrôle(...)-Statics simple pas dans den Hintergrund voulais... |
|
| |
| Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 07.10.2010 ▲ |
|
| |
|
|
| | on darf arrêt pas annehmen dass qui Z-Achse sich aussi dans chaque le cas optique auswirkt - si un hintenliegendes Contrôle zeichnet et pas à vordere Controls cela Neuzeichnen anweist ou bien Sektionen comme "beschädigt" markiert ensuite ist naturellement cela hintenliegende Contrôle optique vorn. ^ ^ |
|
| |
| |
| |
|
|
E.T. | | alors XProfan avec 3D-lunettes (zumindest beim testen - Intepreter), avec cela on voit, si dessus vorn et hinten à gauche ist ... Hihi |
|
| |
| Grüße aus Sachsen... Mario WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 07.10.2010 ▲ |
|
| |
|
|
| | On peut aussi une Button sur ne Listbox poser et cet ListBox sur ne ChoiceBox et cet ChoiceBox sur un Static - Anzegefehler produzieren peux oui pas cela Thema son. ^ ^ |
|
| |
| |
| |
|
|
Manfred
Barei | allô iF,
Entschuldige s'il te plaît, j'ai mich wohl faux ausgedrückt.
il me faut cela Bild comme statisches (pas veränderliches) Contrôle, avec cela je mich pas um cela récente Zeichnen kümmern doit.
Salut |
|
| |
| Zu wenig Wissen ist gefärlich, zu viel auch.(XProfan X4) | Win 10 Pro 64 | Win7 Ultimate 32/64 | AMD FX-8320, 16GB, GeForce GT 630 | | 07.10.2010 ▲ |
|
| |
|
(455)
Deutsch
English
Français
Español
Italia