Ich habe ein Fenster im VOWindowEditor (DialogWindow) erstellt und will es folgendermaßen aufrufen:
CLASS DlgWerkNeu INHERIT wDlgWerk
PROTECT oWerk AS objWerk
CONSTRUCTOR (oOwner)
oWerk := objWerk{SELF}
SUPER(oOwner)
SELF:Caption := "Neues Kunstwerk"
RETURN SELF
Wenn ich diese Funktion aufrufe erscheint zur Laufzeit die folgende Meldung:
Beschreibung : Controlerzeugung fehlgeschlagen
Subsystem : GUI Klassen
Generischer Code : EG_UNKNOWN Unknown GenCode
FuncSym : CONTROL:CREATE
Schwere : ES_ERROR
Kann Default : True
Kann erneut versuchen : False
Kann ersetzen : False
Versuche : 1
Arg : {(0x0010)0x0189441B} CLASS SINGLELINEEDIT
Aufrufreihenfolge :
CONTROL:CREATE (Line: 0)
TEXTCONTROL:CREATE (Line: 0)
CONTROL:HANDLE (Line: 0)
__WCREGISTERCONTROL (Line: 0)
CONTROL:.CTOR (Line: 0)
TEXTCONTROL:.CTOR (Line: 0)
EDIT:.CTOR (Line: 0)
SINGLELINEEDIT:.CTOR (Line: 0)
WDLGWERK:.CTOR (Line: 373)
DLGWERKNEU:.CTOR (Line: 6)
RUNTIMEMETHODHANDLE:INVOKEMETHOD (Line: 0)
RUNTIMECONSTRUCTORINFO:INVOKE (Line: 0)
_CREATEINSTANCE (Line: 0)
_CREATEINSTANCE (Line: 0)
CREATEINSTANCE (Line: 0)
WINDOW:__COMMANDFROMEVENT (Line: 0)
WINDOW:__PREMENUCOMMAND (Line: 0)
WINDOW:DISPATCH (Line: 0)
APPWINDOW:DISPATCH (Line: 0)
SHELLWINDOW:DISPATCH (Line: 0)
__WCSHELLWNDPROC (Line: 0)
CALLWINDOWPROC (Line: 0)
__WCCONTROLPROC (Line: 0)
DISPATCHMESSAGE (Line: 0)
APP:EXEC (Line: 0)
XAPP:START (Line: 35)
START (Line: 6)
Worin könnte das Problem liegen?
Viele Grüße
Frank Kohle
Fehler beim Öffnen eine DialogWindow
Moderator: wriedmann
Re: Fehler beim Öffnen eine DialogWindow
Hallo Frank,
schaut nach VO aus, oder ist das X#?
Wolfgang
schaut nach VO aus, oder ist das X#?
Wolfgang
Wolfgang Riedmann
Meran, South Tyrol, Italy
wolfgang@riedmann.it
https://www.riedmann.it - https://docs.xsharp.it
Meran, South Tyrol, Italy
wolfgang@riedmann.it
https://www.riedmann.it - https://docs.xsharp.it
Re: Fehler beim Öffnen eine DialogWindow
Es ist X# - VO-Dialekt
Re: Fehler beim Öffnen eine DialogWindow
Ich würde die super Zeile ganz nach oben schieben.
Regards
Karl
(on Win8.1/64, Xide32 2.20, X#2.20.0.3)
Karl
(on Win8.1/64, Xide32 2.20, X#2.20.0.3)
Re: Fehler beim Öffnen eine DialogWindow
Das hat leider nicht geholfen. Wenn ich statt des gewünschten ein anderes generiertes DialogWindow einbinde, erscheint dieses Fenster. Der Fehler scheint im generierten DialogWindow zu stecken, aber wie soll ich diesen finden?
Frank
Frank
Re: Fehler beim Öffnen eine DialogWindow
Drei Vorschläge:
* Dummy Änderung im Designer machen und speichern, dann wird der Code neu generiert.
* Was versteckt sich hinter dem Protect? Was passiert, wenn Du das auskommentierst
* neue MDI App erzeugen, das fehlerhafte Ding einbinden und aus der Startmethode aufrufen, geht das?
* Dummy Änderung im Designer machen und speichern, dann wird der Code neu generiert.
* Was versteckt sich hinter dem Protect? Was passiert, wenn Du das auskommentierst
* neue MDI App erzeugen, das fehlerhafte Ding einbinden und aus der Startmethode aufrufen, geht das?
Regards
Karl
(on Win8.1/64, Xide32 2.20, X#2.20.0.3)
Karl
(on Win8.1/64, Xide32 2.20, X#2.20.0.3)
Re: Fehler beim Öffnen eine DialogWindow
Hallo Frank,
bitte poste mal die erst 20 Zeilen der generierten Init-Methode (oder Constructor).
Wolfgang
bitte poste mal die erst 20 Zeilen der generierten Init-Methode (oder Constructor).
Wolfgang
Wolfgang Riedmann
Meran, South Tyrol, Italy
wolfgang@riedmann.it
https://www.riedmann.it - https://docs.xsharp.it
Meran, South Tyrol, Italy
wolfgang@riedmann.it
https://www.riedmann.it - https://docs.xsharp.it
Re: Fehler beim Öffnen eine DialogWindow
Hi Frank,
As Karl said, please do a dummy save to the window that has the problem and see if it fixes it.
If it doesn't, as Wolfgang said please post the full contents of the constructor() but also the contents of the resource file (.rc) related to this window. Usually it's a resource problem causing such errors.
As Karl said, please do a dummy save to the window that has the problem and see if it fixes it.
If it doesn't, as Wolfgang said please post the full contents of the constructor() but also the contents of the resource file (.rc) related to this window. Usually it's a resource problem causing such errors.
Chris Pyrgas
XSharp Development Team
chris(at)xsharp.eu
XSharp Development Team
chris(at)xsharp.eu
Re: Fehler beim Öffnen eine DialogWindow
Code: Select all
PARTIAL CLASS wDlgWerk INHERIT DIALOGWINDOW
PROTECT oDCSLE_AutFName AS SINGLELINEEDIT
PROTECT oDCSLE_AutVName AS SINGLELINEEDIT
PROTECT oDCFT_AutFName AS FIXEDTEXT
PROTECT oDCFT_AutVName AS FIXEDTEXT
PROTECT oDCGB_Autor AS GROUPBOX
PROTECT oDCFT_Titel AS FIXEDTEXT
PROTECT oDCSLE_Titel AS SINGLELINEEDIT
PROTECT oDCFT_Inhalt AS FIXEDTEXT
PROTECT oDCSLE_Inhalt1 AS SINGLELINEEDIT
PROTECT oDCSLE_Inhalt2 AS SINGLELINEEDIT
PROTECT oDCSLE_Inhalt3 AS SINGLELINEEDIT
PROTECT oDCFT_WHoehe AS FIXEDTEXT
PROTECT oDCFT_WBreite AS FIXEDTEXT
PROTECT oDCFT_WTiefe AS FIXEDTEXT
PROTECT oDCSLE_WHoehe AS SINGLELINEEDIT
PROTECT oDCSLE_Breite AS SINGLELINEEDIT
PROTECT oDCSLE_WTiefe AS SINGLELINEEDIT
PROTECT oCCRB_WArt1 AS RADIOBUTTON
PROTECT oCCRB_WArt2 AS RADIOBUTTON
PROTECT oCCRB_WArt3 AS RADIOBUTTON
PROTECT oCCRB_WArt4 AS RADIOBUTTON
PROTECT oCCRB_WArt5 AS RADIOBUTTON
PROTECT oCCRB_WArt6 AS RADIOBUTTON
PROTECT oCCRB_WArt7 AS RADIOBUTTON
PROTECT oCCRB_WArt8 AS RADIOBUTTON
PROTECT oDCRBG_WArt AS RADIOBUTTONGROUP
PROTECT oCCRB_WUArt1 AS RADIOBUTTON
PROTECT oCCRB_WUArt2 AS RADIOBUTTON
PROTECT oCCRB_WUArt3 AS RADIOBUTTON
PROTECT oCCRB_WUArt4 AS RADIOBUTTON
PROTECT oCCRB_WUArt5 AS RADIOBUTTON
PROTECT oCCRB_WUArt6 AS RADIOBUTTON
PROTECT oCCRB_WUArt7 AS RADIOBUTTON
PROTECT oCCRB_WUArt8 AS RADIOBUTTON
PROTECT oDCRBG_WUArt AS RADIOBUTTONGROUP
PROTECT oDCFT_Jahr AS FIXEDTEXT
PROTECT oDCSLE_Jahr AS SINGLELINEEDIT
PROTECT oDCFT_WertWerk AS FIXEDTEXT
PROTECT oDCSLE_WertWerk AS SINGLELINEEDIT
PROTECT oDCFT_WertVers AS FIXEDTEXT
PROTECT oDCSLE_WertVers AS SINGLELINEEDIT
PROTECT oDCFT_LStelle AS FIXEDTEXT
PROTECT oDCSLE_LStelle AS SINGLELINEEDIT
PROTECT oDCFT_WEDatum AS FIXEDTEXT
PROTECT oDCSLE_WEDatum AS SINGLELINEEDIT
PROTECT oCCPB_Cal AS PUSHBUTTON
PROTECT oDCFT_Anmerk AS FIXEDTEXT
PROTECT oDCSLE_Anmerk AS SINGLELINEEDIT
PROTECT oCCRB_Ausstell1 AS RADIOBUTTON
PROTECT oCCRB_Ausstell2 AS RADIOBUTTON
PROTECT oCCRB_Ausstell3 AS RADIOBUTTON
PROTECT oCCRB_Ausstell4 AS RADIOBUTTON
PROTECT oCCRB_Ausstell5 AS RADIOBUTTON
PROTECT oCCRB_Ausstell6 AS RADIOBUTTON
PROTECT oCCRB_Ausstell7 AS RADIOBUTTON
PROTECT oCCRB_Ausstell8 AS RADIOBUTTON
PROTECT oDCRBG_Ausstell AS RADIOBUTTONGROUP
PROTECT oCCRB_Eigentum1 AS RADIOBUTTON
PROTECT oCCRB_Eigentum2 AS RADIOBUTTON
PROTECT oCCRB_Eigentum3 AS RADIOBUTTON
PROTECT oCCRB_Eigentum4 AS RADIOBUTTON
PROTECT oCCRB_Eigentum5 AS RADIOBUTTON
PROTECT oCCRB_Eigentum6 AS RADIOBUTTON
PROTECT oCCRB_Eigentum7 AS RADIOBUTTON
PROTECT oCCRB_Eigentum8 AS RADIOBUTTON
PROTECT oDCRBG_Eigentum AS RADIOBUTTONGROUP
PROTECT oDCFT_Bild AS FIXEDTEXT
PROTECT oDCSLE_Bild AS SINGLELINEEDIT
PROTECT oDCGB_Werk AS GROUPBOX
PROTECT oCCPB_OK AS PUSHBUTTON
PROTECT oCCPB_Cancel AS PUSHBUTTON
PROTECT oDCFixedText1 AS FIXEDTEXT
// User code starts here (DO NOT remove this line) ##USER##
CONSTRUCTOR(oParent,uExtra)
SELF:PreInit(oParent,uExtra)
SUPER(oParent , ResourceID{"wDlgWerk" , _GetInst()} , TRUE)
SELF:oDCSLE_AutFName := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_AUTFNAME , _GetInst() } }
SELF:oDCSLE_AutFName:HyperLabel := HyperLabel{#SLE_AutFName , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_AutFName:TextLimit := 48
SELF:oDCSLE_AutFName:TooltipText := "Familienname des Künstlers"
SELF:oDCSLE_AutVName := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_AUTVNAME , _GetInst() } }
SELF:oDCSLE_AutVName:HyperLabel := HyperLabel{#SLE_AutVName , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_AutVName:TextLimit := 48
SELF:oDCSLE_AutVName:TooltipText := "Familienname des Künstlers"
SELF:oDCFT_AutFName := FIXEDTEXT{SELF , ResourceID{ WDLGWERK_FT_AUTFNAME , _GetInst() } }
SELF:oDCFT_AutFName:HyperLabel := HyperLabel{#FT_AutFName , "Name:" , NULL_STRING , NULL_STRING}
SELF:oDCFT_AutVName := FIXEDTEXT{SELF , ResourceID{ WDLGWERK_FT_AUTVNAME , _GetInst() } }
SELF:oDCFT_AutVName:HyperLabel := HyperLabel{#FT_AutVName , "Vorname:" , NULL_STRING , NULL_STRING}
SELF:oDCGB_Autor := GROUPBOX{SELF , ResourceID{ WDLGWERK_GB_AUTOR , _GetInst() } }
SELF:oDCGB_Autor:HyperLabel := HyperLabel{#GB_Autor , "Autor (Künstler)" , NULL_STRING , NULL_STRING}
SELF:oDCFT_Titel := FIXEDTEXT{SELF , ResourceID{ WDLGWERK_FT_TITEL , _GetInst() } }
SELF:oDCFT_Titel:HyperLabel := HyperLabel{#FT_Titel , "Titel:" , NULL_STRING , NULL_STRING}
SELF:oDCSLE_Titel := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_TITEL , _GetInst() } }
SELF:oDCSLE_Titel:HyperLabel := HyperLabel{#SLE_Titel , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_Titel:TextLimit := 64
SELF:oDCSLE_Titel:TooltipText := "Titel des Kunstwerks"
SELF:oDCFT_Inhalt := FIXEDTEXT{SELF , ResourceID{ WDLGWERK_FT_INHALT , _GetInst() } }
SELF:oDCFT_Inhalt:HyperLabel := HyperLabel{#FT_Inhalt , "Inhalt:" , NULL_STRING , NULL_STRING}
SELF:oDCSLE_Inhalt1 := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_INHALT1 , _GetInst() } }
SELF:oDCSLE_Inhalt1:HyperLabel := HyperLabel{#SLE_Inhalt1 , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_Inhalt1:TextLimit := 128
SELF:oDCSLE_Inhalt1:TooltipText := "Inhalt des Kunstwerks (1. Zeile)"
SELF:oDCSLE_Inhalt2 := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_INHALT2 , _GetInst() } }
SELF:oDCSLE_Inhalt2:HyperLabel := HyperLabel{#SLE_Inhalt2 , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_Inhalt2:TextLimit := 128
SELF:oDCSLE_Inhalt2:TooltipText := "Inhalt des Kunstwerks (2. Zeile)"
SELF:oDCSLE_Inhalt3 := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_INHALT3 , _GetInst() } }
SELF:oDCSLE_Inhalt3:HyperLabel := HyperLabel{#SLE_Inhalt3 , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_Inhalt3:TextLimit := 128
SELF:oDCSLE_Inhalt3:TooltipText := "Inhalt des Kunstwerks (3. Zeile)"
SELF:oDCFT_WHoehe := FIXEDTEXT{SELF , ResourceID{ WDLGWERK_FT_WHOEHE , _GetInst() } }
SELF:oDCFT_WHoehe:HyperLabel := HyperLabel{#FT_WHoehe , "Höhe:" , NULL_STRING , NULL_STRING}
SELF:oDCFT_WBreite := FIXEDTEXT{SELF , ResourceID{ WDLGWERK_FT_WBREITE , _GetInst() } }
SELF:oDCFT_WBreite:HyperLabel := HyperLabel{#FT_WBreite , "Breite:" , NULL_STRING , NULL_STRING}
SELF:oDCFT_WTiefe := FIXEDTEXT{SELF , ResourceID{ WDLGWERK_FT_WTIEFE , _GetInst() } }
SELF:oDCFT_WTiefe:HyperLabel := HyperLabel{#FT_WTiefe , "Tiefe:" , NULL_STRING , NULL_STRING}
SELF:oDCSLE_WHoehe := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_WHOEHE , _GetInst() } }
SELF:oDCSLE_WHoehe:HyperLabel := HyperLabel{#SLE_WHoehe , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_WHoehe:TextLimit := 5
SELF:oDCSLE_WHoehe:TooltipText := "Höhe des Kunstwerks (in cm)"
SELF:oDCSLE_WHoehe:Picture := "99999"
SELF:oDCSLE_Breite := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_BREITE , _GetInst() } }
SELF:oDCSLE_Breite:HyperLabel := HyperLabel{#SLE_Breite , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_Breite:TextLimit := 5
SELF:oDCSLE_Breite:TooltipText := "Breite des Kunstwerks (in cm)"
SELF:oDCSLE_Breite:Picture := "99999"
SELF:oDCSLE_WTiefe := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_WTIEFE , _GetInst() } }
SELF:oDCSLE_WTiefe:HyperLabel := HyperLabel{#SLE_WTiefe , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_WTiefe:TextLimit := 5
SELF:oDCSLE_WTiefe:TooltipText := "Tiefe des Kunstwerks (in cm)"
SELF:oDCSLE_WTiefe:Picture := "99999"
SELF:oCCRB_WArt1 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WART1 , _GetInst() } }
SELF:oCCRB_WArt1:HyperLabel := HyperLabel{#RB_WArt1 , "Werkart 1" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WArt1:TooltipText := "Kunstwerk gehört zu dieser Werkart"
SELF:oCCRB_WArt2 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WART2 , _GetInst() } }
SELF:oCCRB_WArt2:HyperLabel := HyperLabel{#RB_WArt2 , "Werkart 2" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WArt2:TooltipText := "Kunstwerk gehört zu dieser Werkart"
SELF:oCCRB_WArt3 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WART3 , _GetInst() } }
SELF:oCCRB_WArt3:HyperLabel := HyperLabel{#RB_WArt3 , "Werkart 3" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WArt3:TooltipText := "Kunstwerk gehört zu dieser Werkart"
SELF:oCCRB_WArt4 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WART4 , _GetInst() } }
SELF:oCCRB_WArt4:HyperLabel := HyperLabel{#RB_WArt4 , "Werkart 4" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WArt4:TooltipText := "Kunstwerk gehört zu dieser Werkart"
SELF:oCCRB_WArt5 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WART5 , _GetInst() } }
SELF:oCCRB_WArt5:HyperLabel := HyperLabel{#RB_WArt5 , "Werkart 5" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WArt5:TooltipText := "Kunstwerk gehört zu dieser Werkart"
SELF:oCCRB_WArt6 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WART6 , _GetInst() } }
SELF:oCCRB_WArt6:HyperLabel := HyperLabel{#RB_WArt6 , "Werkart 6" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WArt6:TooltipText := "Kunstwerk gehört zu dieser Werkart"
SELF:oCCRB_WArt7 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WART7 , _GetInst() } }
SELF:oCCRB_WArt7:HyperLabel := HyperLabel{#RB_WArt7 , "Werkart 7" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WArt7:TooltipText := "Kunstwerk gehört zu dieser Werkart"
SELF:oCCRB_WArt8 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WART8 , _GetInst() } }
SELF:oCCRB_WArt8:HyperLabel := HyperLabel{#RB_WArt8 , "Werkart 8" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WArt8:TooltipText := "Kunstwerk gehört zu dieser Werkart"
SELF:oDCRBG_WArt := RADIOBUTTONGROUP{SELF , ResourceID{ WDLGWERK_RBG_WART , _GetInst() } }
SELF:oDCRBG_WArt:HyperLabel := HyperLabel{#RBG_WArt , "Werkart" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WUArt1 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WUART1 , _GetInst() } }
SELF:oCCRB_WUArt1:HyperLabel := HyperLabel{#RB_WUArt1 , "Werkunterart 1" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WUArt1:TooltipText := "Kunstwerk gehört zu dieser Werkunterart"
SELF:oCCRB_WUArt2 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WUART2 , _GetInst() } }
SELF:oCCRB_WUArt2:HyperLabel := HyperLabel{#RB_WUArt2 , "Werkunterart 1" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WUArt2:TooltipText := "Kunstwerk gehört zu dieser Werkunterart"
SELF:oCCRB_WUArt3 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WUART3 , _GetInst() } }
SELF:oCCRB_WUArt3:HyperLabel := HyperLabel{#RB_WUArt3 , "Werkunterart 1" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WUArt3:TooltipText := "Kunstwerk gehört zu dieser Werkunterart"
SELF:oCCRB_WUArt4 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WUART4 , _GetInst() } }
SELF:oCCRB_WUArt4:HyperLabel := HyperLabel{#RB_WUArt4 , "Werkunterart 1" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WUArt4:TooltipText := "Kunstwerk gehört zu dieser Werkunterart"
SELF:oCCRB_WUArt5 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WUART5 , _GetInst() } }
SELF:oCCRB_WUArt5:HyperLabel := HyperLabel{#RB_WUArt5 , "Werkunterart 1" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WUArt5:TooltipText := "Kunstwerk gehört zu dieser Werkunterart"
SELF:oCCRB_WUArt6 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WUART6 , _GetInst() } }
SELF:oCCRB_WUArt6:HyperLabel := HyperLabel{#RB_WUArt6 , "Werkunterart 1" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WUArt6:TooltipText := "Kunstwerk gehört zu dieser Werkunterart"
SELF:oCCRB_WUArt7 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WUART7 , _GetInst() } }
SELF:oCCRB_WUArt7:HyperLabel := HyperLabel{#RB_WUArt7 , "Werkunterart 1" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WUArt7:TooltipText := "Kunstwerk gehört zu dieser Werkunterart"
SELF:oCCRB_WUArt8 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_WUART8 , _GetInst() } }
SELF:oCCRB_WUArt8:HyperLabel := HyperLabel{#RB_WUArt8 , "Werkunterart 1" , NULL_STRING , NULL_STRING}
SELF:oCCRB_WUArt8:TooltipText := "Kunstwerk gehört zu dieser Werkunterart"
SELF:oDCRBG_WUArt := RADIOBUTTONGROUP{SELF , ResourceID{ WDLGWERK_RBG_WUART , _GetInst() } }
SELF:oDCRBG_WUArt:HyperLabel := HyperLabel{#RBG_WUArt , "Werkunterart" , NULL_STRING , NULL_STRING}
SELF:oDCFT_Jahr := FIXEDTEXT{SELF , ResourceID{ WDLGWERK_FT_JAHR , _GetInst() } }
SELF:oDCFT_Jahr:HyperLabel := HyperLabel{#FT_Jahr , "Jahr:" , NULL_STRING , NULL_STRING}
SELF:oDCSLE_Jahr := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_JAHR , _GetInst() } }
SELF:oDCSLE_Jahr:HyperLabel := HyperLabel{#SLE_Jahr , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_Jahr:TextLimit := 4
SELF:oDCSLE_Jahr:TooltipText := "Entstehungsjahr des Kunstwerks"
SELF:oDCSLE_Jahr:Picture := "9999"
SELF:oDCFT_WertWerk := FIXEDTEXT{SELF , ResourceID{ WDLGWERK_FT_WERTWERK , _GetInst() } }
SELF:oDCFT_WertWerk:HyperLabel := HyperLabel{#FT_WertWerk , "Wert:" , NULL_STRING , NULL_STRING}
SELF:oDCSLE_WertWerk := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_WERTWERK , _GetInst() } }
SELF:oDCSLE_WertWerk:HyperLabel := HyperLabel{#SLE_WertWerk , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_WertWerk:TextLimit := 5
SELF:oDCSLE_WertWerk:TooltipText := "Wert des Kunstwerks in Euro"
SELF:oDCSLE_WertWerk:Picture := "9999"
SELF:oDCFT_WertVers := FIXEDTEXT{SELF , ResourceID{ WDLGWERK_FT_WERTVERS , _GetInst() } }
SELF:oDCFT_WertVers:HyperLabel := HyperLabel{#FT_WertVers , "Vers.-wert:" , NULL_STRING , NULL_STRING}
SELF:oDCSLE_WertVers := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_WERTVERS , _GetInst() } }
SELF:oDCSLE_WertVers:HyperLabel := HyperLabel{#SLE_WertVers , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_WertVers:TextLimit := 5
SELF:oDCSLE_WertVers:TooltipText := "Versicherungswert des Kunstwerks in Euro"
SELF:oDCSLE_WertVers:Picture := "9999"
SELF:oDCFT_LStelle := FIXEDTEXT{SELF , ResourceID{ WDLGWERK_FT_LSTELLE , _GetInst() } }
SELF:oDCFT_LStelle:HyperLabel := HyperLabel{#FT_LStelle , "Lagerort:" , NULL_STRING , NULL_STRING}
SELF:oDCSLE_LStelle := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_LSTELLE , _GetInst() } }
SELF:oDCSLE_LStelle:HyperLabel := HyperLabel{#SLE_LStelle , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_LStelle:TextLimit := 4
SELF:oDCSLE_LStelle:TooltipText := "Entstehungsjahr des Kunstwerks"
SELF:oDCSLE_LStelle:Picture := "9999"
SELF:oDCFT_WEDatum := FIXEDTEXT{SELF , ResourceID{ WDLGWERK_FT_WEDATUM , _GetInst() } }
SELF:oDCFT_WEDatum:HyperLabel := HyperLabel{#FT_WEDatum , "Zugang:" , NULL_STRING , NULL_STRING}
SELF:oDCSLE_WEDatum := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_WEDATUM , _GetInst() } }
SELF:oDCSLE_WEDatum:HyperLabel := HyperLabel{#SLE_WEDatum , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_WEDatum:TextLimit := 10
SELF:oDCSLE_WEDatum:TooltipText := "Zugangsdatum des Kunstwerks"
SELF:oDCSLE_WEDatum:Picture := "99.99.9999"
SELF:oCCPB_Cal := PUSHBUTTON{SELF , ResourceID{ WDLGWERK_PB_CAL , _GetInst() } }
SELF:oCCPB_Cal:HyperLabel := HyperLabel{#PB_Cal , "Kalender" , NULL_STRING , NULL_STRING}
SELF:oDCFT_Anmerk := FIXEDTEXT{SELF , ResourceID{ WDLGWERK_FT_ANMERK , _GetInst() } }
SELF:oDCFT_Anmerk:HyperLabel := HyperLabel{#FT_Anmerk , "Anmerkung:" , NULL_STRING , NULL_STRING}
SELF:oDCSLE_Anmerk := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_ANMERK , _GetInst() } }
SELF:oDCSLE_Anmerk:HyperLabel := HyperLabel{#SLE_Anmerk , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_Anmerk:TextLimit := 128
SELF:oDCSLE_Anmerk:TooltipText := "Anmerkung zum Kunstwerk"
SELF:oCCRB_Ausstell1 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_AUSSTELL1 , _GetInst() } }
SELF:oCCRB_Ausstell1:HyperLabel := HyperLabel{#RB_Ausstell1 , "uneingeschränkt" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Ausstell1:TooltipText := "Das Kunstwerk ist uneingeschränkt ausstellbar"
SELF:oCCRB_Ausstell2 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_AUSSTELL2 , _GetInst() } }
SELF:oCCRB_Ausstell2:HyperLabel := HyperLabel{#RB_Ausstell2 , "geringfügige Einschränkung" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Ausstell2:TooltipText := "Es sind geringfügige Arbeiten erforderlich"
SELF:oCCRB_Ausstell3 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_AUSSTELL3 , _GetInst() } }
SELF:oCCRB_Ausstell3:HyperLabel := HyperLabel{#RB_Ausstell3 , "kleine Einschränkung" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Ausstell3:TooltipText := "Es sind kleine Arbeiten erforderlich"
SELF:oCCRB_Ausstell4 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_AUSSTELL4 , _GetInst() } }
SELF:oCCRB_Ausstell4:HyperLabel := HyperLabel{#RB_Ausstell4 , "mittlere Einschränkung" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Ausstell4:TooltipText := "Es sind mittlere Arbeiten notwendig"
SELF:oCCRB_Ausstell5 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_AUSSTELL5 , _GetInst() } }
SELF:oCCRB_Ausstell5:HyperLabel := HyperLabel{#RB_Ausstell5 , "große Einschränkung" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Ausstell5:TooltipText := "Es sind erhebliche Arbeiten notwendig"
SELF:oCCRB_Ausstell6 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_AUSSTELL6 , _GetInst() } }
SELF:oCCRB_Ausstell6:HyperLabel := HyperLabel{#RB_Ausstell6 , "Restaurierungsbedarf" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Ausstell6:TooltipText := "Es besteht ein erheblicher Restaurierungsbedarf"
SELF:oCCRB_Ausstell7 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_AUSSTELL7 , _GetInst() } }
SELF:oCCRB_Ausstell7:HyperLabel := HyperLabel{#RB_Ausstell7 , "nicht ausstellbar" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Ausstell7:TooltipText := "Der Zustand lässt eine Ausstellung nicht mehr zu"
SELF:oCCRB_Ausstell8 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_AUSSTELL8 , _GetInst() } }
SELF:oCCRB_Ausstell8:HyperLabel := HyperLabel{#RB_Ausstell8 , "unzulässig" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Ausstell8:TooltipText := "Eine Ausstellung ist nicht zulässig"
SELF:oDCRBG_Ausstell := RADIOBUTTONGROUP{SELF , ResourceID{ WDLGWERK_RBG_AUSSTELL , _GetInst() } }
SELF:oDCRBG_Ausstell:HyperLabel := HyperLabel{#RBG_Ausstell , "Ausstellbarkeit" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Eigentum1 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_EIGENTUM1 , _GetInst() } }
SELF:oCCRB_Eigentum1:HyperLabel := HyperLabel{#RB_Eigentum1 , "Eigner 1" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Eigentum1:TooltipText := "Das Kunstwerk gehört diesem Eigentümer"
SELF:oCCRB_Eigentum2 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_EIGENTUM2 , _GetInst() } }
SELF:oCCRB_Eigentum2:HyperLabel := HyperLabel{#RB_Eigentum2 , "Eigner 2" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Eigentum2:TooltipText := "Das Kunstwerk gehört diesem Eigentümer"
SELF:oCCRB_Eigentum3 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_EIGENTUM3 , _GetInst() } }
SELF:oCCRB_Eigentum3:HyperLabel := HyperLabel{#RB_Eigentum3 , "Eigner 3" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Eigentum3:TooltipText := "Das Kunstwerk gehört diesem Eigentümer"
SELF:oCCRB_Eigentum4 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_EIGENTUM4 , _GetInst() } }
SELF:oCCRB_Eigentum4:HyperLabel := HyperLabel{#RB_Eigentum4 , "Eigner 4" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Eigentum4:TooltipText := "Das Kunstwerk gehört diesem Eigentümer"
SELF:oCCRB_Eigentum5 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_EIGENTUM5 , _GetInst() } }
SELF:oCCRB_Eigentum5:HyperLabel := HyperLabel{#RB_Eigentum5 , "Eigner 5" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Eigentum5:TooltipText := "Das Kunstwerk gehört diesem Eigentümer"
SELF:oCCRB_Eigentum6 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_EIGENTUM6 , _GetInst() } }
SELF:oCCRB_Eigentum6:HyperLabel := HyperLabel{#RB_Eigentum6 , "Eigner 6" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Eigentum6:TooltipText := "Das Kunstwerk gehört diesem Eigentümer"
SELF:oCCRB_Eigentum7 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_EIGENTUM7 , _GetInst() } }
SELF:oCCRB_Eigentum7:HyperLabel := HyperLabel{#RB_Eigentum7 , "Eigner 7" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Eigentum7:TooltipText := "Das Kunstwerk gehört diesem Eigentümer"
SELF:oCCRB_Eigentum8 := RADIOBUTTON{SELF , ResourceID{ WDLGWERK_RB_EIGENTUM8 , _GetInst() } }
SELF:oCCRB_Eigentum8:HyperLabel := HyperLabel{#RB_Eigentum8 , "Eigner 8" , NULL_STRING , NULL_STRING}
SELF:oCCRB_Eigentum8:TooltipText := "Das Kunstwerk gehört diesem Eigentümer"
SELF:oDCRBG_Eigentum := RADIOBUTTONGROUP{SELF , ResourceID{ WDLGWERK_RBG_EIGENTUM , _GetInst() } }
SELF:oDCRBG_Eigentum:HyperLabel := HyperLabel{#RBG_Eigentum , "Eigentümer" , NULL_STRING , NULL_STRING}
SELF:oDCFT_Bild := FIXEDTEXT{SELF , ResourceID{ WDLGWERK_FT_BILD , _GetInst() } }
SELF:oDCFT_Bild:HyperLabel := HyperLabel{#FT_Bild , "Bilddatei:" , NULL_STRING , NULL_STRING}
SELF:oDCSLE_Bild := SINGLELINEEDIT{SELF , ResourceID{ WDLGWERK_SLE_BILD , _GetInst() } }
SELF:oDCSLE_Bild:HyperLabel := HyperLabel{#SLE_Bild , NULL_STRING , NULL_STRING , NULL_STRING}
SELF:oDCSLE_Bild:TextLimit := 128
SELF:oDCSLE_Bild:TooltipText := "Name der Bilddatei für dieses Kunstwerk (einschl. Ordnerangabe)"
SELF:oDCGB_Werk := GROUPBOX{SELF , ResourceID{ WDLGWERK_GB_WERK , _GetInst() } }
SELF:oDCGB_Werk:HyperLabel := HyperLabel{#GB_Werk , "Kunstwerk" , NULL_STRING , NULL_STRING}
SELF:oCCPB_OK := PUSHBUTTON{SELF , ResourceID{ WDLGWERK_PB_OK , _GetInst() } }
SELF:oCCPB_OK:HyperLabel := HyperLabel{#PB_OK , "&OK" , NULL_STRING , NULL_STRING}
SELF:oCCPB_Cancel := PUSHBUTTON{SELF , ResourceID{ WDLGWERK_PB_CANCEL , _GetInst() } }
SELF:oCCPB_Cancel:HyperLabel := HyperLabel{#PB_Cancel , "&Abbruch" , NULL_STRING , NULL_STRING}
SELF:oDCFixedText1 := FIXEDTEXT{SELF , ResourceID{ WDLGWERK_FIXEDTEXT1 , _GetInst() } }
SELF:oDCFixedText1:HyperLabel := HyperLabel{#FixedText1 , "Fixed Text" , NULL_STRING , NULL_STRING}
SELF:oDCRBG_WArt:FillUsing({ ;
{SELF:oCCRB_WArt1, "RB_WArt1"}, ;
{SELF:oCCRB_WArt2, "RB_WArt2"}, ;
{SELF:oCCRB_WArt3, "RB_WArt3"}, ;
{SELF:oCCRB_WArt4, "RB_WArt4"}, ;
{SELF:oCCRB_WArt5, "RB_WArt5"}, ;
{SELF:oCCRB_WArt6, "RB_WArt6"}, ;
{SELF:oCCRB_WArt7, "RB_WArt7"}, ;
{SELF:oCCRB_WArt8, "RB_WArt8"} ;
})
SELF:oDCRBG_WUArt:FillUsing({ ;
{SELF:oCCRB_WUArt1, "RB_WUArt1"}, ;
{SELF:oCCRB_WUArt2, "RB_WUArt2"}, ;
{SELF:oCCRB_WUArt3, "RB_WUArt3"}, ;
{SELF:oCCRB_WUArt4, "RB_WUArt4"}, ;
{SELF:oCCRB_WUArt5, "RB_WUArt5"}, ;
{SELF:oCCRB_WUArt6, "RB_WUArt6"}, ;
{SELF:oCCRB_WUArt7, "RB_WUArt7"}, ;
{SELF:oCCRB_WUArt8, "RB_WUArt8"} ;
})
SELF:oDCRBG_Ausstell:FillUsing({ ;
{SELF:oCCRB_Ausstell1, "RB_Ausstell1"}, ;
{SELF:oCCRB_Ausstell2, "RB_Ausstell2"}, ;
{SELF:oCCRB_Ausstell3, "RB_Ausstell3"}, ;
{SELF:oCCRB_Ausstell4, "RB_Ausstell4"}, ;
{SELF:oCCRB_Ausstell5, "RB_Ausstell5"}, ;
{SELF:oCCRB_Ausstell6, "RB_Ausstell6"}, ;
{SELF:oCCRB_Ausstell7, "RB_Ausstell7"}, ;
{SELF:oCCRB_Ausstell8, "RB_Ausstell8"} ;
})
SELF:oDCRBG_Eigentum:FillUsing({ ;
{SELF:oCCRB_Eigentum1, "RB_Eigentum1"}, ;
{SELF:oCCRB_Eigentum2, "RB_Eigentum2"}, ;
{SELF:oCCRB_Eigentum3, "RB_Eigentum3"}, ;
{SELF:oCCRB_Eigentum4, "RB_Eigentum4"}, ;
{SELF:oCCRB_Eigentum5, "RB_Eigentum5"}, ;
{SELF:oCCRB_Eigentum6, "RB_Eigentum6"}, ;
{SELF:oCCRB_Eigentum7, "RB_Eigentum7"}, ;
{SELF:oCCRB_Eigentum8, "RB_Eigentum8"} ;
})
SELF:Caption := "Kunstwerk"
SELF:HyperLabel := HyperLabel{#wDlgWerk , "Kunstwerk" , NULL_STRING , NULL_STRING}
SELF:PostInit(oParent,uExtra)
RETURN
END CLASS
STATIC DEFINE WDLGWERK_SLE_AUTVNAME := 101
STATIC DEFINE WDLGWERK_SLE_AUTVNAME1 := 101
STATIC DEFINE WDLGWERK_FT_AUTFNAME := 102
STATIC DEFINE WDLGWERK_FT_AUTVNAME := 103
STATIC DEFINE WDLGWERK_GB_AUTOR := 104
STATIC DEFINE WDLGWERK_FT_TITEL := 105
STATIC DEFINE WDLGWERK_SLE_TITEL := 106
STATIC DEFINE WDLGWERK_FT_INHALT := 107
STATIC DEFINE WDLGWERK_SLE_INHALT1 := 108
STATIC DEFINE WDLGWERK_SLE_INHALT2 := 109
STATIC DEFINE WDLGWERK_SLE_TITEL3 := 110
STATIC DEFINE WDLGWERK_FT_WHOEHE := 111
STATIC DEFINE WDLGWERK_FT_WBREITE := 112
STATIC DEFINE WDLGWERK_FT_WTIEFE := 113
STATIC DEFINE WDLGWERK_SLE_WHOEHE := 114
STATIC DEFINE WDLGWERK_SLE_WHOEHE1 := 115
STATIC DEFINE WDLGWERK_SLE_WTIEFE := 116
STATIC DEFINE WDLGWERK_RB_WART1 := 117
STATIC DEFINE WDLGWERK_RB_WART2 := 118
STATIC DEFINE WDLGWERK_RB_WART3 := 119
STATIC DEFINE WDLGWERK_RB_WART4 := 120
STATIC DEFINE WDLGWERK_RB_WART5 := 121
STATIC DEFINE WDLGWERK_RB_WART6 := 122
STATIC DEFINE WDLGWERK_RB_WART7 := 123
STATIC DEFINE WDLGWERK_RB_WART8 := 124
STATIC DEFINE WDLGWERK_RBG_WART := 125
STATIC DEFINE WDLGWERK_RB_WUART1 := 126
STATIC DEFINE WDLGWERK_RB_WUART2 := 127
STATIC DEFINE WDLGWERK_RB_WUART3 := 128
STATIC DEFINE WDLGWERK_RB_WUART4 := 129
STATIC DEFINE WDLGWERK_RB_WUART5 := 130
STATIC DEFINE WDLGWERK_RB_WUART6 := 131
STATIC DEFINE WDLGWERK_RB_WUART7 := 132
STATIC DEFINE WDLGWERK_RB_WUART8 := 133
STATIC DEFINE WDLGWERK_RBG_WUART := 134
STATIC DEFINE WDLGWERK_FT_JAHR := 135
STATIC DEFINE WDLGWERK_SLE_JAHR := 136
STATIC DEFINE WDLGWERK_FT_WERTWERK := 137
STATIC DEFINE WDLGWERK_SLE_JAHR1 := 138
STATIC DEFINE WDLGWERK_FT_WERTVERS := 139
STATIC DEFINE WDLGWERK_SLE_JAHR2 := 140
STATIC DEFINE WDLGWERK_FT_LSTELLE := 141
STATIC DEFINE WDLGWERK_SLE_LSTELLE := 142
STATIC DEFINE WDLGWERK_FT_WEDATUM := 143
STATIC DEFINE WDLGWERK_SLE_WEDATUM := 144
STATIC DEFINE WDLGWERK_PB_CAL := 145
STATIC DEFINE WDLGWERK_FT_ANMERK := 146
STATIC DEFINE WDLGWERK_SLE_ANMERK := 147
STATIC DEFINE WDLGWERK_RB_AUSSTELL1 := 148
STATIC DEFINE WDLGWERK_RB_AUSSTELL2 := 149
STATIC DEFINE WDLGWERK_RB_AUSSTELL3 := 150
STATIC DEFINE WDLGWERK_RB_AUSSTELL4 := 151
STATIC DEFINE WDLGWERK_RB_AUSSTELL5 := 152
STATIC DEFINE WDLGWERK_RB_AUSSTELL6 := 153
STATIC DEFINE WDLGWERK_RB_AUSSTELL7 := 154
STATIC DEFINE WDLGWERK_RB_AUSSTELL8 := 155
STATIC DEFINE WDLGWERK_RBG_AUSSTELL := 156
STATIC DEFINE WDLGWERK_RB_EIGENTUM1 := 157
STATIC DEFINE WDLGWERK_RB_EIGENTUM2 := 158
STATIC DEFINE WDLGWERK_RB_EIGENTUM3 := 159
STATIC DEFINE WDLGWERK_RB_EIGENTUM4 := 160
STATIC DEFINE WDLGWERK_RB_EIGENTUM5 := 161
STATIC DEFINE WDLGWERK_RB_EIGENTUM6 := 162
STATIC DEFINE WDLGWERK_RB_EIGENTUM7 := 163
STATIC DEFINE WDLGWERK_RB_EIGENTUM8 := 164
STATIC DEFINE WDLGWERK_RADIOBUTTONGROUP1 := 165
STATIC DEFINE WDLGWERK_RBG_EIGENTUM := 165
STATIC DEFINE WDLGWERK_FT_BILD := 166
STATIC DEFINE WDLGWERK_SLE_AUTVNAME2 := 167
STATIC DEFINE WDLGWERK_GB_WERK := 168
STATIC DEFINE WDLGWERK_PB_OK := 169
STATIC DEFINE WDLGWERK_PB_CANCEL := 170
STATIC DEFINE WDLGWERK_SLE_BILD := 167
STATIC DEFINE WDLGWERK_SLE_AUTFNAME := 100
STATIC DEFINE WDLGWERK_SLE_INHALT3 := 110
STATIC DEFINE WDLGWERK_SLE_BREITE := 115
STATIC DEFINE WDLGWERK_SLE_WERTWERK := 138
STATIC DEFINE WDLGWERK_SLE_WERTVERS := 140
STATIC DEFINE WDLGWERK_FIXEDTEXT1 := 171
;// designer generated file, do not modify
;// WINDOW wDlgWerk from C:\X-Projekt\Kunstkatalog\Applications\Kunstkatalog\wDlgDaten.prg.rc
#define WDLGWERK_SLE_AUTFNAME 100
#define WDLGWERK_SLE_AUTVNAME 101
#define WDLGWERK_FT_AUTFNAME 102
#define WDLGWERK_FT_AUTVNAME 103
#define WDLGWERK_GB_AUTOR 104
#define WDLGWERK_FT_TITEL 105
#define WDLGWERK_SLE_TITEL 106
#define WDLGWERK_FT_INHALT 107
#define WDLGWERK_SLE_INHALT1 108
#define WDLGWERK_SLE_INHALT2 109
#define WDLGWERK_SLE_INHALT3 110
#define WDLGWERK_FT_WHOEHE 111
#define WDLGWERK_FT_WBREITE 112
#define WDLGWERK_FT_WTIEFE 113
#define WDLGWERK_SLE_WHOEHE 114
#define WDLGWERK_SLE_BREITE 115
#define WDLGWERK_SLE_WTIEFE 116
#define WDLGWERK_RB_WART1 117
#define WDLGWERK_RB_WART2 118
#define WDLGWERK_RB_WART3 119
#define WDLGWERK_RB_WART4 120
#define WDLGWERK_RB_WART5 121
#define WDLGWERK_RB_WART6 122
#define WDLGWERK_RB_WART7 123
#define WDLGWERK_RB_WART8 124
#define WDLGWERK_RBG_WART 125
#define WDLGWERK_RB_WUART1 126
#define WDLGWERK_RB_WUART2 127
#define WDLGWERK_RB_WUART3 128
#define WDLGWERK_RB_WUART4 129
#define WDLGWERK_RB_WUART5 130
#define WDLGWERK_RB_WUART6 131
#define WDLGWERK_RB_WUART7 132
#define WDLGWERK_RB_WUART8 133
#define WDLGWERK_RBG_WUART 134
#define WDLGWERK_FT_JAHR 135
#define WDLGWERK_SLE_JAHR 136
#define WDLGWERK_FT_WERTWERK 137
#define WDLGWERK_SLE_WERTWERK 138
#define WDLGWERK_FT_WERTVERS 139
#define WDLGWERK_SLE_WERTVERS 140
#define WDLGWERK_FT_LSTELLE 141
#define WDLGWERK_SLE_LSTELLE 142
#define WDLGWERK_FT_WEDATUM 143
#define WDLGWERK_SLE_WEDATUM 144
#define WDLGWERK_PB_CAL 145
#define WDLGWERK_FT_ANMERK 146
#define WDLGWERK_SLE_ANMERK 147
#define WDLGWERK_RB_AUSSTELL1 148
#define WDLGWERK_RB_AUSSTELL2 149
#define WDLGWERK_RB_AUSSTELL3 150
#define WDLGWERK_RB_AUSSTELL4 151
#define WDLGWERK_RB_AUSSTELL5 152
#define WDLGWERK_RB_AUSSTELL6 153
#define WDLGWERK_RB_AUSSTELL7 154
#define WDLGWERK_RB_AUSSTELL8 155
#define WDLGWERK_RBG_AUSSTELL 156
#define WDLGWERK_RB_EIGENTUM1 157
#define WDLGWERK_RB_EIGENTUM2 158
#define WDLGWERK_RB_EIGENTUM3 159
#define WDLGWERK_RB_EIGENTUM4 160
#define WDLGWERK_RB_EIGENTUM5 161
#define WDLGWERK_RB_EIGENTUM6 162
#define WDLGWERK_RB_EIGENTUM7 163
#define WDLGWERK_RB_EIGENTUM8 164
#define WDLGWERK_RBG_EIGENTUM 165
#define WDLGWERK_FT_BILD 166
#define WDLGWERK_SLE_BILD 167
#define WDLGWERK_GB_WERK 168
#define WDLGWERK_PB_OK 169
#define WDLGWERK_PB_CANCEL 170
#define WDLGWERK_FIXEDTEXT1 171
#define BS_AUTORADIOBUTTON 0x9
#define WS_EX_RIGHT 0x1000
#define ES_RIGHT 0x2
#define ES_NUMBER 0x2000
#define WS_GROUP 0x20000
#define BS_GROUPBOX 0x7
#define WS_EX_CLIENTEDGE 0x200
#define ES_AUTOHSCROLL 0x80
#define WS_BORDER 0x800000
#define WS_TABSTOP 0x10000
#define WS_CHILD 0x40000000
#define DS_CENTER 0x800
#define DS_MODALFRAME 0x80
#define WS_CAPTION 0xC00000
#define WS_POPUP 0x80000000
#define DS_3DLOOK 0x4
wDlgWerk DIALOGEX 0, 0, 571, 330
STYLE DS_3DLOOK|WS_POPUP|WS_CAPTION|DS_MODALFRAME|DS_CENTER
CAPTION "Kunstwerk"
FONT 8, "MS Shell Dlg"
BEGIN
CONTROL "", WDLGWERK_SLE_AUTFNAME, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL, 67, 22, 120, 12, WS_EX_CLIENTEDGE
CONTROL "", WDLGWERK_SLE_AUTVNAME, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL, 251, 22, 120, 12, WS_EX_CLIENTEDGE
CONTROL "Name:", WDLGWERK_FT_AUTFNAME, "STATIC", WS_CHILD, 16, 22, 40, 12
CONTROL "Vorname:", WDLGWERK_FT_AUTVNAME, "STATIC", WS_CHILD, 200, 22, 40, 12
CONTROL "Autor (Künstler)", WDLGWERK_GB_AUTOR, "BUTTON", WS_CHILD|BS_GROUPBOX|WS_GROUP, 11, 10, 368, 34
CONTROL "Titel:", WDLGWERK_FT_TITEL, "STATIC", WS_CHILD, 16, 59, 40, 12
CONTROL "", WDLGWERK_SLE_TITEL, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL, 67, 59, 304, 12, WS_EX_CLIENTEDGE
CONTROL "Inhalt:", WDLGWERK_FT_INHALT, "STATIC", WS_CHILD, 16, 76, 40, 12
CONTROL "", WDLGWERK_SLE_INHALT1, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL, 67, 76, 304, 12, WS_EX_CLIENTEDGE
CONTROL "", WDLGWERK_SLE_INHALT2, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL, 67, 90, 304, 12, WS_EX_CLIENTEDGE
CONTROL "", WDLGWERK_SLE_INHALT3, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL, 67, 103, 304, 12, WS_EX_CLIENTEDGE
CONTROL "Höhe:", WDLGWERK_FT_WHOEHE, "STATIC", WS_CHILD, 16, 122, 40, 12
CONTROL "Breite:", WDLGWERK_FT_WBREITE, "STATIC", WS_CHILD, 134, 122, 40, 12
CONTROL "Tiefe:", WDLGWERK_FT_WTIEFE, "STATIC", WS_CHILD, 252, 122, 40, 12
CONTROL "", WDLGWERK_SLE_WHOEHE, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL|ES_NUMBER|ES_RIGHT, 67, 122, 40, 12, WS_EX_RIGHT|WS_EX_CLIENTEDGE
CONTROL "", WDLGWERK_SLE_BREITE, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL|ES_NUMBER|ES_RIGHT, 185, 122, 40, 12, WS_EX_CLIENTEDGE
CONTROL "", WDLGWERK_SLE_WTIEFE, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL|ES_NUMBER|ES_RIGHT, 303, 122, 40, 12, WS_EX_RIGHT|WS_EX_CLIENTEDGE
CONTROL "Werkart 1", WDLGWERK_RB_WART1, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 22, 155, 10
CONTROL "Werkart 2", WDLGWERK_RB_WART2, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 34, 155, 10
CONTROL "Werkart 3", WDLGWERK_RB_WART3, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 47, 155, 10
CONTROL "Werkart 4", WDLGWERK_RB_WART4, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 59, 155, 10
CONTROL "Werkart 5", WDLGWERK_RB_WART5, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 71, 155, 10
CONTROL "Werkart 6", WDLGWERK_RB_WART6, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 84, 155, 10
CONTROL "Werkart 7", WDLGWERK_RB_WART7, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 96, 155, 10
CONTROL "Werkart 8", WDLGWERK_RB_WART8, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 108, 155, 10
CONTROL "Werkart", WDLGWERK_RBG_WART, "BUTTON", WS_CHILD|BS_GROUPBOX|WS_GROUP, 395, 10, 165, 113
CONTROL "Werkunterart 1", WDLGWERK_RB_WUART1, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 138, 155, 10
CONTROL "Werkunterart 1", WDLGWERK_RB_WUART2, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 150, 155, 10
CONTROL "Werkunterart 1", WDLGWERK_RB_WUART3, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 162, 155, 10
CONTROL "Werkunterart 1", WDLGWERK_RB_WUART4, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 175, 155, 10
CONTROL "Werkunterart 1", WDLGWERK_RB_WUART5, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 187, 155, 10
CONTROL "Werkunterart 1", WDLGWERK_RB_WUART6, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 199, 155, 10
CONTROL "Werkunterart 1", WDLGWERK_RB_WUART7, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 212, 155, 10
CONTROL "Werkunterart 1", WDLGWERK_RB_WUART8, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 400, 224, 155, 10
CONTROL "Werkunterart", WDLGWERK_RBG_WUART, "BUTTON", WS_CHILD|BS_GROUPBOX|WS_GROUP, 395, 126, 165, 113
CONTROL "Jahr:", WDLGWERK_FT_JAHR, "STATIC", WS_CHILD, 16, 140, 40, 12
CONTROL "", WDLGWERK_SLE_JAHR, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL|ES_NUMBER|ES_RIGHT, 67, 140, 40, 12, WS_EX_RIGHT|WS_EX_CLIENTEDGE
CONTROL "Wert:", WDLGWERK_FT_WERTWERK, "STATIC", WS_CHILD, 134, 140, 40, 12
CONTROL "", WDLGWERK_SLE_WERTWERK, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL|ES_NUMBER|ES_RIGHT, 185, 140, 40, 12, WS_EX_RIGHT|WS_EX_CLIENTEDGE
CONTROL "Vers.-wert:", WDLGWERK_FT_WERTVERS, "STATIC", WS_CHILD, 252, 140, 40, 12
CONTROL "", WDLGWERK_SLE_WERTVERS, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL|ES_NUMBER|ES_RIGHT, 303, 140, 40, 12, WS_EX_RIGHT|WS_EX_CLIENTEDGE
CONTROL "Lagerort:", WDLGWERK_FT_LSTELLE, "STATIC", WS_CHILD, 16, 159, 40, 12
CONTROL "", WDLGWERK_SLE_LSTELLE, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL|ES_NUMBER|ES_RIGHT, 67, 159, 80, 12, WS_EX_RIGHT|WS_EX_CLIENTEDGE
CONTROL "Zugang:", WDLGWERK_FT_WEDATUM, "STATIC", WS_CHILD, 185, 159, 40, 12
CONTROL "", WDLGWERK_SLE_WEDATUM, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL|ES_NUMBER|ES_RIGHT, 252, 159, 40, 12, WS_EX_RIGHT|WS_EX_CLIENTEDGE
CONTROL "Kalender", WDLGWERK_PB_CAL, "BUTTON", WS_CHILD|WS_TABSTOP, 303, 159, 40, 12
CONTROL "Anmerkung:", WDLGWERK_FT_ANMERK, "STATIC", WS_CHILD, 16, 177, 40, 12
CONTROL "", WDLGWERK_SLE_ANMERK, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL, 67, 177, 304, 12, WS_EX_CLIENTEDGE
CONTROL "uneingeschränkt", WDLGWERK_RB_AUSSTELL1, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 16, 214, 155, 10
CONTROL "geringfügige Einschränkung", WDLGWERK_RB_AUSSTELL2, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 16, 226, 155, 10
CONTROL "kleine Einschränkung", WDLGWERK_RB_AUSSTELL3, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 16, 239, 155, 10
CONTROL "mittlere Einschränkung", WDLGWERK_RB_AUSSTELL4, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 16, 251, 155, 10
CONTROL "große Einschränkung", WDLGWERK_RB_AUSSTELL5, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 16, 263, 155, 10
CONTROL "Restaurierungsbedarf", WDLGWERK_RB_AUSSTELL6, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 16, 276, 155, 10
CONTROL "nicht ausstellbar", WDLGWERK_RB_AUSSTELL7, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 16, 288, 155, 10
CONTROL "unzulässig", WDLGWERK_RB_AUSSTELL8, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 16, 300, 155, 10
CONTROL "Ausstellbarkeit", WDLGWERK_RBG_AUSSTELL, "BUTTON", WS_CHILD|BS_GROUPBOX|WS_GROUP, 11, 202, 180, 118
CONTROL "Eigner 1", WDLGWERK_RB_EIGENTUM1, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 203, 214, 155, 10
CONTROL "Eigner 2", WDLGWERK_RB_EIGENTUM2, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 203, 226, 155, 10
CONTROL "Eigner 3", WDLGWERK_RB_EIGENTUM3, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 203, 239, 155, 10
CONTROL "Eigner 4", WDLGWERK_RB_EIGENTUM4, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 203, 251, 155, 10
CONTROL "Eigner 5", WDLGWERK_RB_EIGENTUM5, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 203, 263, 155, 10
CONTROL "Eigner 6", WDLGWERK_RB_EIGENTUM6, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 203, 276, 155, 10
CONTROL "Eigner 7", WDLGWERK_RB_EIGENTUM7, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 203, 288, 155, 10
CONTROL "Eigner 8", WDLGWERK_RB_EIGENTUM8, "BUTTON", WS_CHILD|BS_AUTORADIOBUTTON, 203, 300, 155, 10
CONTROL "Eigentümer", WDLGWERK_RBG_EIGENTUM, "BUTTON", WS_CHILD|BS_GROUPBOX|WS_GROUP, 198, 202, 180, 118
CONTROL "Bilddatei:", WDLGWERK_FT_BILD, "STATIC", WS_CHILD, 395, 246, 40, 12
CONTROL "", WDLGWERK_SLE_BILD, "EDIT", WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL, 441, 246, 120, 12, WS_EX_CLIENTEDGE
CONTROL "Kunstwerk", WDLGWERK_GB_WERK, "BUTTON", WS_CHILD|BS_GROUPBOX|WS_GROUP, 11, 47, 368, 150
CONTROL "&OK", WDLGWERK_PB_OK, "BUTTON", WS_CHILD|WS_TABSTOP, 450, 305, 53, 15
CONTROL "&Abbruch", WDLGWERK_PB_CANCEL, "BUTTON", WS_CHILD|WS_TABSTOP, 507, 305, 53, 15
CONTROL "Fixed Text", WDLGWERK_FIXEDTEXT1, "STATIC", WS_CHILD, 395, 276, 54, 15
END
Re: Fehler beim Öffnen eine DialogWindow
Hi Frank,
Thanks, I tried your code and it works fine here, it displays the window as expected.
- What is the exact code the you use to create and show the dialog DlgWerkNeu?
- What is the objWerk class doing in your code? Does it make any change if you comment the line oWerk := objWerk{SELF} ?
- Which X# version are you using?
Thanks, I tried your code and it works fine here, it displays the window as expected.
- What is the exact code the you use to create and show the dialog DlgWerkNeu?
- What is the objWerk class doing in your code? Does it make any change if you comment the line oWerk := objWerk{SELF} ?
- Which X# version are you using?
Chris Pyrgas
XSharp Development Team
chris(at)xsharp.eu
XSharp Development Team
chris(at)xsharp.eu