CD-ROM Magazin 1995 July/August

home *** CD-ROM | disk | FTP | other *** search

/ CD-ROM Magazin 1995 July/August / CDROMMAG.ISO / asym / prg / mtb30 / beispiel / cbt_tips.tbk (.txt) < prev next >

Wrap

Asymetrix ToolBook File | 1994-10-03 | 306.3 KB | 4,134 lines

strChecked description only description and example topicName description and script Unbenannt enterpage pageName templateButtons label subtopicname topicName chosen cancel keychar cancel -- initialize dialog box "Unbenannt" "topicName" B"description buttonclick -- sent user presses OK pageName = chosen "templateButtons" -- the specified label "subtopicname" close -- handles OK escape keyEnter origPage original label strChecked in,false ThreeDeeRect strChecked strChecked bottomLine strChecked topLine 0 J strChecked strChecked Themenname: bottomLine strChecked topLine strChecked topicName strChecked Unbenannt templateButtons chosen templates buttonclick buttonclick -- store selected a property chosen "templates" Description and Script chosen strChecked Description and Script strChecked Beschreibung und &Skript Description Only strChecked Nur &Beschreibung Description and Example strChecked Beschreibung und B&eispiel strChecked Vorlage ausw templates strChecked Description and script strChecked strChecked strChecked Dies ist eine beliebige Beschreibung. Hier k nnte eine Beschreibung von jedem Objekt stehen, z.B. der Kaffeetasse, aus der ich momentan mein morgentliches Brei schl strChecked to handle buttonup do this do that description only strChecked strChecked description and script strChecked Dies ist eine beliebige Beschreibung. Hier k nnte eine Beschreibung von jedem Objekt stehen, z.B. der Kaffeetasse, aus der ich momentan mein morgentliches Brei schl rfe. Ich habe schon soviel Kaffe getrunken, da ich bald in die Zukunft werde blicken k nnen. Description and example strChecked strChecked strChecked Dies ist eine beliebige Beschreibung. Hier k nnte eine Beschreibung von jedem Objekt stehen, z.B. der Kaffeetasse, aus der ich momentan mein morgentliches Brei schl rfe. Ich habe schon soviel Kaffe getrunken, da ich bald in die Zukunft werde blicken k nnen. strChecked to handle buttonup do this do that buttonclick buttonclick strChecked cancel buttonclick buttonclick strChecked Abbrechen Description and Script description and script {{{{{{{p{ Auto-scroll field Converting to Binary, Hex, Octal intro <Introduction> Ziehen von Objekten label strChecked Ziehen von Objekten gen Sie das untenstehende Skript in ein Objekt ein, das mit der Maus gezogen werden soll.o drag a group, change the references from arget to handle buttondowj loc local stack bnds,mouseOffset linkdll "user" int getsystemmetrics(int) -- pr ft, ob der Benutzer die Maustasten vertauscht hat. if getsystemmetrics(23) >0 set leftMouseButton to keyRightButton else set leftMouseButton to keyLeftButton set bnds to bounds of target set mouseOffset to item 1 of loc - item 1 of bnds,\ item 2 of loc - item 2 of bnds leftMouseButton=keyLeftButton while keystate(leftMouseButton)is down newloc = sysMousePosition if newLoc <> loc set position of target to \ item 1 of newLoc-item 1 of mouseOffset,\ item 2 of newLoc-item 2 of mouseOffset set loc to newLoc end b;origLoc newloc getsystemmetrics getsystemmetrics checkObject dropTarget buttondown labelPosition b;origLoc initQuiz c;origLoc moved c;origLoc label topLeft topRight c;origLoc point bottomLine sized description only subtopicname in,ms ThreeDeeRect bottomLine topLine explanation strChecked strChecked strChecked strChecked strChecked strChecked Converting to Binary, Hex, Octal origPage original Umwandeln von Bin r-, Hexadezimal- und Oktalwerten label strChecked Umwandeln von Bin r-, Hexadezimal- und Oktalwertennnal-Format Die Funktionalit t des Befehls format wurde auf die Umwandlung zwischen Bin r-, Hexadezimal- und Oktal- Zahlensystemen erweitert. Im folgenden werden die neuen Formatzeichenfolgen aufgef r: "@b" Oktal: "@o" Hexadezimal: "@h" Dezimal: "@d" Diese Zeichenfolgen werden den normalen Zahlenformat-Zeichenfolgen vorangestellt. Zur Umwandlung einer Variablen "n" von Dezimal in Hexadezimal k nnten Sie also den folgenden Befehl verwenden: format number n as "@h0" Um die Variable wieder in Dezimal umzuwandeln, verwenden Sie folgenden Befehl: format number n as "@d0" conditions return numberEntered end doConversion wwwwp wwwwp wwwww wwwwwp dragApple dragOrange resize intro SubtopicName strChecked strChecked 2&A"A"A <Introduction> origPage 10,14 selectChars original <Einf hrung> label strChecked hrungon strChecked Schnellkurs f r rechnerunterst tzte Schulunggg strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked X h J strChecked strChecked strChecked ,"<"J strChecked strChecked H#X#J strChecked strChecked H$X$J strChecked strChecked H%X%J strChecked strChecked H&X&J strChecked strChecked J'Z'J strChecked strChecked strChecked Klinik f r rechnerunterst tzte Schulungulung L)\)J strChecked strChecked strChecked strChecked n;$ \ f<c C strChecked ,-<-J strChecked strChecked T.d.J strChecked strChecked strChecked strChecked strChecked strChecked h1x1J strChecked strChecked P2`2J strChecked strChecked D3T3J strChecked strChecked strChecked 505J strChecked strChecked 3 ~ B right lights .&, " lights right seconds lights value S" = S" = notifyBefore strChecked P9`9J strChecked right strChecked B:R:J strChecked strChecked 6;F;J strChecked strChecked F<V<J strChecked strChecked H=X=J strChecked strChecked Dieses Buch enth lt Tips und Arbeitsverfahren f r rechnerunterst tzte Schulung. Klicken Sie auf ein bestimmtes Thema in der Liste, um es anzuzeigen. Zum Anzeigen von Themen einer bestimmten Kategorie w hlen Sie die gew nschte Kategorie aus. Verwenden Sie die Schaltfl che f r Suchen, um Themen nach Schl sselw rtern zu durchsuchen. Verwenden Sie den Fensterteiler, um die Gr e des linken Steuerfelds zu ndern. Hinweis: Sie k nnen diesem Buch neue Themen hinzuf gen, indem Sie F3 dr cken (um zur Autorenebene zu wechseln) und die Themen-Schaltfl im unteren linken Fensterbereich verwenden... <About this book> Binary Insertion of Textline scriptChooserDialog Navigation Check for State Abbreviation Auto-scroll field origPage original hlscheibe label strChecked hlscheibe Eine W hlscheibe ist n tzlich, wenn Sie zu einer Eingabe auffordern wollen, die innerhalb eines bestimmten Bereichs liegt. Die W hlscheibe sendet folgende Botschaften: startDialMove: wird gesendet, wenn der Benutzer auf den Zeiger klickt dialMove: wird fortlaufend gesendet, w hrend der Zeiger gezogen wird endDialMove: wird gesendet, wenn der Zeiger losgelassen wird Jede dieser Botschaften gibt die aktuelle Position des Zeigers als Parameter an. Verwenden Sie die Eigenschafts bersicht, um den Bereich und den Ma stab festzulegen..ulegen....n......... Die W hlscheibe sendet die DialMove-Botschaft, wenn Sie den Zeiger ziehen. Das Feld unterhalb der W hlscheibe verarbeitet die dialMove-Botschaft in einer Benachrichtigungs-Behandlungsroutine.. myStartAngle myendAngle myTallTicSpacing scaleDial tbk_wid_name dialPos dialMin dialMax startAngle endAngle numTics tallTicSpacing tbk_wid_props tbk_wid_values myNumTics mydialMin mydialMax strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked F V J strChecked strChecked V!f!J strChecked strChecked f"v"J strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked .'>'J strChecked strChecked >(N(J strChecked strChecked N)^)J strChecked strChecked ^*n*J strChecked strChecked n+~+J strChecked strChecked strChecked &-*.O+ 6.f.i myRotation struct structInfo strChecked strChecked strChecked 70433333333333333 strChecked 805.6666666666667 :1J1J strChecked strChecked 10099999999999999 strChecked <3L3J strChecked strChecked 950tO4 strChecked $545J strChecked strChecked 80199999999999999 Display dialMove -- picks up message that dial sends notifybefore dialMove pos @7P7J strChecked 55.28428455531338 dialMove dialMove enddialMove description and example SubtopicName in,ms ThreeDeeRect bottomLine topLine explanation .&, " scrolling rectangle explanation enterpage notifyBefore fref = "explanation" txtOver = Beispiel: in,sculpted ThreeDeeRect bottomLine topLine ew Scripts author reader author rectangle enterpage notifybefore author reader author dotted enterpage notifybefore buttonclick buttonclick Zstack hiddenObjects s = o = py objects author reader enterpage strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked Skripten anzeigen Objekte kopieren strChecked Beschriftungen label strChecked Beschriftungen Dieses Beispiel veranschaulicht das Verwenden eines wirkungsvollen Online-Quiz zu den Elementen einer Abbildung. Hier wird der Benutzer zum Ziehen von Beschriftungen an die richtige Position aufgefordert. Jede der untenstehenden Beschriftungen ist ein Widget, das Ziehoperationen automatisch verarbeitet. Das Fahrrad ist ein Bitmap-Objekt, das von einer Gruppe durchsichtiger Grafikobjekte berlagert wird. Wenn die Beschriftung auf ein Grafikobjekt in der Gruppe abgelegt wird, sendet die Beschriftung eine Botschaft an die Gruppe. Die Gruppe pr ft wiederum, ob der Name des Grafikobjekts mit dem Namen der Beschriftungsgruppe bereinstimmt. Ziehen Sie die Beschriftungen an die entsprechenden Fahrradteile. strChecked target group strChecked chainRings strChecked toptube strChecked headTube strChecked deraileur 0 J strChecked gradeMe 1, #? 1, #? target group grade grade Richtige Antworten: showWrongAnswers buttonclick buttonclick grade = "Richtige Antworten:" && 2&& "von" && E& "." showWrongAnswers strChecked Ergebnisse showAnswers target group showRightAnswers buttonclick buttonclick showRightAnswers strChecked Antworten anzeigen Initialize initQuiz buttonclick initQuiz enterPage -- initQuiz handled Hnotify handlers buttonclick notifyBefore strChecked Initialisieren toptube 3030,3315 origLoc strChecked strChecked label strChecked Querstange bottomLine strChecked topLeft strChecked point strChecked topRight strChecked strChecked headTube 5919,3315 origLoc strChecked strChecked label strChecked Kopfstange bottomLine strChecked topLeft strChecked point strChecked topRight strChecked strChecked chainRings 5041,3315 origLoc strChecked strChecked label strChecked Kettenringe bottomLine strChecked topLeft strChecked point strChecked topRight strChecked strChecked deraileur 4178,3315 origLoc strChecked strChecked label strChecked Gangschaltung bottomLine strChecked topLeft T!d!J strChecked point strChecked topRight strChecked strChecked initQuiz enterPage author reader 3030,3315 Zuordnungs-Quiz label strChecked Zuordnungs-Quiz Das untenstehenden Widget ist n tzlich bei der Erstellung eines Zuordnungs-Quiz. Die beiden Felder unten verwenden die Drag & Drop-Befehle von OpenScript, um Linien von einer Spalte zur anderen zu ziehen. Das Widget verwendet die Benutzereigenschaft answers, eineListe von Nummern, die den Eintr gen in der linken Spalte entspricht und diese jeweils einem Eintrag in der rechten Spalte zuordnet. Wenn z.B. der Benutzer die Eintr ge 1 und 2 in der linken Spalte den Eintr gen 3 und 6 in der rechten Spalte zuordnet, liefert die Benutzereigenschaft answers den Wert "2,6". Sie k nnen answers auch auf eine Liste festlegen, die das Zeichnen von Linien zu den entsprechenden Gegenst cken hervorruft.....uft.assen...lassen. Ziehen Sie von links nach rechts, um jedem K nstler einen entsprechenden Kunststil zuzuordnen..c MatchingQuiz MatchingQuiz tbk_wid_name answers tbk_wid_props tbk_wid_values strChecked false "textlinefrompoint allowDrag BlineNum "textlinefrompoint beginDrag BlineNum endDrag reader author author enterpage allowDrag smp = tlfp = textlinefrompoint( beginDrag lineNum endDrag notifyBefore lineNum strChecked Monet Raphael Picasso Courbet Redon zanne right .&, " "textlinefrompoint BlineNum edrawLine objectDropped false "textlinefrompoint targName allowDrop reader author author enterpage objectDropped sourceObj smp = tlfp = textlinefrompoint( drawLine lineNum allowDrop targName = notifyBefore lineNum strChecked Realismus Symbolismus Post-Impressionismus Klassik Impressionismus Romantik Kubismus strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked T d J strChecked strChecked strChecked .">"J strChecked strChecked j#z#J strChecked strChecked strChecked D%T%J strChecked strChecked strChecked strChecked strChecked Z(j(J strChecked strChecked strChecked 4*D*J strChecked strChecked strChecked strChecked gradeMe V, #? FManswers rightanswers score Richtige Antworten: studentAnswers matchingQuiz buttonclick buttonclick studentAnswers = answers "matchingQuiz" rightanswers = 5,4,6,7,1,2,3 answerCount = (rightAnswers) score = 0 "Richtige Antworten:" && O&& "von" }& "." strChecked Ergebnisse showAnswers GManswers matchingQuiz buttonclick buttonclick answers matchingQuiz 5,4,6,7,1,2,3 strChecked Antworten anzeigen Initialize GManswers matchingQuiz buttonclick GManswers matchingQuiz enterPage -- initQuiz handled Hnotify handlers buttonclick answers "matchingQuiz" notifyBefore F3V3J strChecked Initialisieren enterPage reader author leavepage character paragraph Abfragen von Informationen mit der Maus label strChecked Abfragen von Informationen mit der Maus In einer Schulungsanwendung wollen Sie dem Lernenden oft die M glichkeit geben, neue Informationen durchzuarbeiten. In diesem Beispiel werden Objekte hervorgehoben, wenn sich der Mauszeiger ber sie hinwegbewegt, und der Name des hervorgehobenen Objekts wird in einem Feld angezeigt. Beachten Sie, da gruppierte Objekte innerhalb der Hauptgruppe (z.B. die Hawaiischen Inseln) als geschlossene Einheit hervorgehoben werden. Beachten Sie auch, da nur die benannten Objekte und Gruppen hervorhehoben werden. Das Objekt, das die Great Lakes im oberen rechten Bereich der Landkarte darstellt, hat keinen Namen... Bewegen Sie den Mauszeiger ber die rechtsstehende Landkarte. Der US-Bundesstaat, der sich jeweils unterhalb des Mauszeigers befindet, wird hervorgehoben. Die Namen des Staates und der Hauptstadt erscheinen in den Feldern unterhalb der Landkarte... US map strChecked strChecked Washington Olympia capital strChecked Montana Helena capital strChecked Oregon Salem capital strChecked California Sacramento capital strChecked Nevada Carson City capital strChecked Idaho Boise capital strChecked Salt Lake City capital strChecked Wyoming Cheyenne capital strChecked Arizona Phoenix capital strChecked New Mexico Santa Fe capital strChecked Colorado Denver capital strChecked Texas Austin capital strChecked Oklahoma Oklahoma City capital strChecked Kansas Topeka capital strChecked Nebraska Lincoln capital strChecked South Dakota Pierre capital strChecked North Dakota Bismarck capital strChecked Minnesota St. Paul capital strChecked Des Moines capital strChecked Missouri Jefferson City capital strChecked Arkansas Little Rock capital strChecked Louisiana Baton Rouge capital strChecked Wisconsin Madison capital strChecked Illinois Springfield capital strChecked Kentucky Frankfort capital strChecked Indiana Indianapolis capital strChecked Tennessee Nashville capital strChecked Mississippi Jackson capital strChecked Alabama Montgomery capital strChecked Georgia Atlanta capital strChecked Florida d't'J Tallahassee capital strChecked North Carolina Raleigh capital strChecked South Carolina Columbia capital strChecked Columbus capital strChecked Pennsylvania d+t+J Harrisburg capital strChecked West Virginia X,h,J Charleston capital strChecked Virginia N-^-J Richmond capital strChecked Maryland 8.H.J Annapolis capital strChecked Delaware &/6/J Dover capital strChecked New York Albany capital strChecked New Jersey Trenton capital strChecked Vermont Montpelier capital strChecked New Hampshire Concord capital strChecked Maine &HnH} Augusta capital strChecked Massachusetts H4JBJ Boston capital strChecked Connecticut Hartford capital strChecked Rhode Island Providence capital strChecked Alaska d7t7J Juneau capital strChecked Hawaii Honolulu capital strChecked strChecked &:6:* >:N:J strChecked strChecked strChecked *<:<* B<R<J strChecked Michigan Lansing capital strChecked strChecked f>v>* strChecked state/capital display capital state updateDisplay message sent Hthe map notifyBefore updateDisplay stateName,capital sls = strChecked state >ANAJ strChecked capital strChecked XBhBJ strChecked US-Bundesstaat strChecked Hauptstadt updateDisplay author pointerObj "hand" -- returns the dialPos angle = rotation dialMin = dialMax = startAngle = endAngle = angleRange = -- sets its proper value syssuspendMessages = coords = "face" ctr = ( ,)/2,\ radians) angleFromPoint (((Atan2(y-cy,x-cx)+2.5* )/(2* ))*360) -- handles dragging around dialMove endDialMove )/2,\ (ctr, dstart = +360)) dend = 4> 180 k360 > k360) numTics syssuspendmessages = )/2,\ radius = (( ) - ( ))/2 tts = tallTicSpacing )/360 * (2 * PI) - (PI / 2) t = sz = .15 <= 10 curField = curfield 500,200 centerPosition + ((1+sz*2) * + ((1+sz*2) * )*(i/ sz = .075 )), \ + ((1+sz) * + ((1+sz) * t = myNumTics sz = mydialMax dialmin mydialMin myTallTicSpacing numtics myStartAngle myendAngle -- General handler. -- Supports single -- Joseph Brick, Oct 93. -- Notes about routine: -- ToolBook allows unrestricted values following . This a fully -- rotates these }. All other }are oriented along a 90 degree -- axis. just moves Owithout -- rotating their -- A note on storing polar coordinates: order converts Cartesian -- (stored %integers) h (manipulated %real numbers), When converted acan suffer rounding errors {may become more skewed each Iyou To avoid routines -- change shape distance running option, will have reset the Hsending storePolar -- Parameters: -- obj: Object be rotated. Can use toolbook {. Required. -- ctr: which P. Default structInfo[] xangle,yangle, ,cx,cy,radAngle,MouseAngle,longestH,storedAngle x,y,fp Zstack v,vtemp,loc Zgraphic curObj = myRotation -- If xprovided, base b = cx = b + ( cy = b + ( a list objlist = total vCount = 0 objCount = 0 -- loop goes once curObjType = -- If -- kover: objList -- fsetable maliable = ( isArcOrPie = ( b = b + ( b + ( curVCount = -- Add {reference -- -- walk through current y distances dx = x-cx dy = y-cy -- find length vector: undefined )x=0,y=0: dx=0 h = 0 (dx,dy) +(dy,dx)- (rot/360)*(2* [vcount+i][1] = h 2] = array fa row -- Each stores a vertice. ,cx,cy, x,y,fp \ supplied /360) * 2* b = b + ( b + ( they already propsStored = uprops = G,ctr section resets repetition specified: -- -- adjust Hnewangle, x,y coorinates: countV = curIndex = rd = ( ][2]+ 1][1] x(j = 1 (rd)*h f(rd)*h cxObj = ( cyObj = ( (rd)*h f(rd)*h v1 = v iterate sized sysSuspendMessages = sz = b(sz), b(sz) -- stub notify handlers, sends notifyAfter enddialMove Zstack bnds,mouseOffset X"user" getsystemmetrics( * has swapped I buttons. =23) >0 leftMouseButton = targ = newloc = newLoc <> objectFromPoint( "base" dropTarget checkObject oorigLoc labelPosition value notifyBefore initQuiz moved -- 13,14 -- 11,12 9,10 sized pupp = syspageunitsperpixel pwidth = * 10 pheight = * 10 topLeft = mask = topRight = pnt = U"point" bottomLine = lbl = b = sz = v = sz > sz > syssuspendmessages = distToP = ( sz - Zstack bnds,mouseOffset X"user" getsystemmetrics( * has swapped I buttons. =23) >0 leftMouseButton = targ = newloc = newLoc <> objectFromPoint( "base" dropTarget checkObject oorigLoc labelPosition value notifyBefore initQuiz moved -- 13,14 -- 11,12 9,10 sized pupp = syspageunitsperpixel pwidth = * 10 pheight = * 10 topLeft = mask = topRight = pnt = U"point" bottomLine = lbl = b = sz = v = sz > sz > syssuspendmessages = distToP = ( sz - Zstack bnds,mouseOffset X"user" getsystemmetrics( * has swapped I buttons. =23) >0 leftMouseButton = targ = newloc = newLoc <> objectFromPoint( "base" dropTarget checkObject oorigLoc labelPosition value notifyBefore initQuiz moved -- 13,14 -- 11,12 9,10 sized pupp = syspageunitsperpixel pwidth = * 10 pheight = * 10 topLeft = mask = topRight = pnt = U"point" bottomLine = lbl = b = sz = v = sz > sz > syssuspendmessages = distToP = ( sz - Zstack bnds,mouseOffset X"user" getsystemmetrics( * has swapped I buttons. =23) >0 leftMouseButton = targ = newloc = newLoc <> objectFromPoint( "base" dropTarget checkObject oorigLoc labelPosition value notifyBefore initQuiz moved -- 13,14 -- 11,12 9,10 sized pupp = syspageunitsperpixel pwidth = * 10 pheight = * 10 topLeft = mask = topRight = pnt = U"point" bottomLine = lbl = b = sz = v = sz > sz > syssuspendmessages = distToP = ( sz - 4s_color,s_targ cap = capital nm = updateDisplay nm, Zlogical refresh -- we are still . If so, don't blank out -- (otherwise flashes annoyingly) newObj = objectFromPoint( xsent going ,mode. notifyBefore state, just a stub handler, so no error occurs around deal message. -- a that displays value. xpix = sysPageUnitsPerPixel sliderMin = sliderMax = scale = sliderBounds = x1 = nearestPupp( x2 = b = oldP = nearestPUPP( w = dx = pos - oldMouseX = sliderPos = mysliderPos startSliderMove newMouseX = newP = b(x1, 7-dx),x2-w) `-x1)* )/(x2-x1-w)+ sliderMove endSliderMove notifyBefore helptext statusbar -- adds the navigation -- called on whenever 1combobox value -- Note: each will be like such: -- <label zhangs out beyond edge used populate ZallTopics X"tb30dlg.dll" sortTextLines( sls = '= TRUE curPageID = "All" -- walk every content backgrounds, -- a list their labels. bckgrnds = "intro,description example, only" backRef = pageRef = -- numbers category trailing -- update sortedText = foundPage = 0 curID = extractID( foundpage = i -- adjust oselectedTextLines = selectedTextlines -- U, navigate that '= sls clicked. buttonclick stl = -- change cursor resize entering default leaving handler resizes the splitter dragged ZstartPos X"user" getsystemmetrics( ( has swapped mouse buttons. >23) >0 leftMouseButton = width navigation minwidth = 1220 maxwidth = 6000 leftWindow = rightWindow = leftWindowWidth = clientSize wholeWindowWidth = clientsize leftMost = minWidth rightMost = j(maxWidth, splitterBounds = DC's ;windows, since we'll be drawing -- on hDCLeft = getDC(clientHandle hDCright = a pen hPen = createPen(0,2,0) ! on ;DC's, storing old selected hOldObjectleft = selectObject( hOldObjectMain = modes oldROP2right = setROP2( oldROP2left = windowRef = curDC = oldP = mousePosition oldp <> -- erase drawLine ,endPos we need switch DC's, release them deleteObject( releaseDC( hDCleft RightBorder = currentpage leftwindow syspageUnitsPerPixel sizePage -- draws a specified DC endpos fromPoint = PageUnitsToClient( toPoint = moveTo( lineTo( Standard ToolBook messages enterApplication -- link needed dll's linkDLL "tb30win. displayBitsPerPixel() -- these gdi calls are used drawing separator getDeviceCaps( moveTo( lineTo( setROP2( gcreatePen( deleteObject( gselectObject( Xuser ggetDC( releaseDC( e"Verwenden dieser &Vorlage" alias "helpTemplate" fhelptext\ "Zeigt Hilfe zur Verwendung backcolor (a " " handler, below) depending on -- the colors displayed. numColors() > 16 darkerBlue() lighterBlue() "navigationBar" -- initialize combobox "categories" "<Alle Themen>" populate " "Topics" hideControls leaveApplication buttons modifying showControls "CategoryButtons" "Navigation" 7 - 60 deleted, updates category array (struct[][]) userProperty -- Each row Bhas a list numbers belonging that }. This -- walks through , finding every instance found, removes "description example, only" Zx[][] x = categoryStruct pageID = dimensions(x) itemOffset( 8,x[i][2]) x[i][2] a content -- ensure label property -- holds each fref = "subTopicName" -- necessary "explanation" -- scrollbars, txtOver = Utility handlers -- returns extractName t tabOffset = following a extractID t lastTabLoc = U(t) instances stripChar chr,strng hdc = windowhandle retval = %,24) 212,79.1875,71.6875 180,75.125,100 backColor value bckgrnds = "intro, curBack = Handlers dealing structure during authoring debugging purposes) showCategoryStruct Zx[][] x = x[i][1] 9& x[i][2] & handers twoDquicksort fArray[][],n,dtype 4stbk_noSwap twoDquicksrt 6, 1, E),n, U l, r,n, r > l x, l, ((l+r) lst = l (l+1) test = i][n] < l][n] i][n] < l][n] i][n] < l][n] stbk_noswap , l, -1,n, , lst+1,r,n, a, b Ztemp = farray[a][i] b][i] b][i] = mydir = sen = sysErrorNumber se = ss = bref = u&"tmplhelp.tbk") 1= ss "Das Buch TMPLHELP.TBK wurde nicht gefunden" vref = defaultpage "cbt4" r= se -- Displays scripted }on the allowing users their scrips buttonclick Zretval sysRuntime = TRUE "Skripten k nnen )-Version von Multimedia ToolBook nicht angezeigt werden." -- reference appear dlgPage = "scriptChooserDialog" -- list o = getObjectList( currentobject nameRef(currentObject) & ) = 1 obref = "scriptObjects" %modal -- display "friendly obtype = obname = -- returns a list two numbers: the followed zpossible. grade ZnumRight,totalNum objs = 1 = label -- initializes quiz notifyBefore initQuiz objCount = -- use you want store state answers -- that subject gave Zretval & "," & -- restores stored value. ls = tl = labelPosition -- moves labels their proper spots. showRightAnswers ls = objName = objLabel = wrong original showWrongAnswers ls = origLoc bnds = checkObject labelObj "Correct!" "Nope." showing ,mode showObjs hideObjs ls = dropTarget notifyBefore 4s_lheight notifyAfter linkStuff fontChange answers sized moved -- getting, setting the responses value answerList valCount = drawLine i, valcount+1 -- drawing bleftN,rightN,setProp angLine = leftRef = rightRef = leftTLBE = textLineBeginEnd( rightTLBE = leftX = H+ 30 leftY = rightX = K- 30 rightY = v = Y+150, ;-150, -- returns a list 3 numbers: -- 1: twips beginning -- 2: -- 3: b = tlc = lh = lineheight scr = ind = leftmarg = relativeLine = n- n < 1 5-lh) * lh > 0,0,0 leftBound = leftMarg rightbound = +stringLen( midLine = * lh - (stringHeight() t,rightBound, Bunder a point -- differs that will only there actually a textLineFromPoint mp b = lh = vmp = b) > lh * ( -scr) tlineNum = ( b +lh) b + ind hmp = windows stuff linkstuff X"gdi" getTextExtent( gselectObject( deleteObject( gcreateFont( linkDLL "user" ggetDC( releaseDC( makefont fontName,pitch, weight = 700 ghfont,hOldObject,hdc hDC = sysClientHandle) syspageunitsperpixel fheight = ((1440/ /72)) -- pixels hFont = =,0,0,0, ,0,0,0,0,0,0,0,0, "Fehler: Es wurde keine logische Schriftart erstellt." -- kills destroyFont sysclientHandle, a given fref = makeFont $ length str,strlen strLen retval = ( k65536) * "aaa",3) y65536) * nearestPUPP val,xpix sliderPos value Zscale sliderMin = sliderMax = mysliderPos sysPageUnitsPerPixel sliderBounds = "bar" x1 = nearestPupp( x2 = thumb = b = oldP = w = percentage = ( newP = x1 + (x2-x1-w)* sliderMove adjustNumbers sls = numTics = ts = otallTicSpacing numFields = 0/ ts inc = ( j) / 3),10) curfield = xCenter U(i*ts) ),10)+1 '= sls w = && "ist ung ltig." mySliderMax && " mySliderMin high = U"0" low = U"0" myTallTicSpacing > 50 einen Wert zwischen 1 und 50 haben." thumbwidth = x1 = x2 = U"base" x2 - x1) / leftMost = x1 curLine = curline myNumTics notifyBefore endSliderMove clocktime totalSecs = ototalTime -- test Ihas changed oldTime = curTime coords = "face" ctr = ( ,)/2,\ radius = (( Y) - ( e))/2 secsAngle = ( "sweep" handVertices( ,angle, j(.99, ") * (2 * PI) - (PI / 2))), \ j(.99, Y) * (2 * PI) - (PI / 2))),\ f(0 - (PI / 2))),\ (0 - (PI / 2))) myTotalTime value num = timeFormat = adjustment = 1 "minutes" "hours" 93600 && "ist kein g ltiges Zeitformat." myRound( *.25) "quarter" *.5) "half" =num*.75) "threeQuarters" "zero" "(" & & ")" val = %".0" %".00" timeLimit totaltimeLimit = clockTime startTime timeStart timeGetTime() notifyBefore qs = ttl = ct = - qs) y1000 b(0,ct) ct <= 0 endtime -- stub, so nothing handles message, we don't notifyAfter X"mmsystem" -- ToolBook sends message just 4displaying -- the dropdown a comboBox enterDropDown updateDropDownList -- puts Fcategories Tlist ZmainStruct[][] = categoryStruct arraySize = dimensions( [i][1] odropDownItems "<Alle Themen>" & a combobox selectChange value selcted -- navigation populate " i][1]= amainstruct[i][2] -- kill , so goes leaveDropDown categories the "prompt" , selecting current Mbelongs that -- category. ( Ncan more than one myID = myTopic = label "Kategorien f r Thema"&& &&"ausw hlen:" ZmainStruct[][] = categoryStruct fref = arraySize = dimensions( si][1] -- o i, -- selectedTextLine itemOffset( i][2]) > 0 -- kunless we are on selectedTextlines -- update compileCategories t = selectedTextLines -- walk through -- ) > 0 -- xalready assigned, i][2])=0 i][2] -- -- exists itemLoc = i][2]) i][2] structure %Aam'n pointerObj ={rotation pointerObj angle dialMax startAngle endAngle /dialMax dialMin QendAngle startAngle 1-dialMin dialPos pointerObj angle startAngle dialMax endAngle /dialMax dialMin QendAngle startAngle coords 1-dialMin >{rotation dialPos angleFromPoint pointerObj endDialMove angle >9dialPos |angleFromPoint startAngle dialMax endAngle /dialMax 9adialMove >{rotation dialMin QendAngle startAngle coords 1-dialMin Field buttondown .&, " C333333 C333333 centerPosition curField startAngle dialMax endAngle /dialMax mtallTicSpacing myNumTics dialMin QendAngle startAngle coords 1-dialMin numTics centerPosition LnumTics mydialMax LnumTics dialMax mydialMin LnumTics LnumTics dialmin mydialMax dialMax mydialMin dialMin myTallTicSpacing Lnumtics Lnumtics tallTicSpacing .myStartAngle Lnumtics Lnumtics startAngle Lnumtics myendAngle Lnumtics endAngle myNumTics numTics .myStartAngle startAngle myendAngle endAngle myTallTicSpacing tallTicSpacing Q+struct objlist group myRotation structInfo myRotation curObjType arc,pie line,curve,angledline,polygon,irregularPolygon,pie,arc storePolar myRotation rotation false propsStored group uprops myRotation objlist structInfo maliable Q+struct storePolar structInfo curObjType struct P+struct arc,pie rotation pointerObj Lnumtics structInfo Q+struct Lnumtics sized dialMove enddialMove b;origLoc newloc getsystemmetrics getsystemmetrics checkObject dropTarget buttondown labelPosition b;origLoc initQuiz c;origLoc moved c;origLoc label topLeft topRight c;origLoc point bottomLine sized b;origLoc newloc getsystemmetrics getsystemmetrics checkObject dropTarget buttondown labelPosition b;origLoc initQuiz c;origLoc moved c;origLoc label topLeft topRight c;origLoc point bottomLine sized b;origLoc newloc getsystemmetrics getsystemmetrics checkObject dropTarget buttondown labelPosition b;origLoc initQuiz c;origLoc moved c;origLoc label topLeft topRight c;origLoc point bottomLine sized s_targ s_color -capital PupdateDisplay mouseenter newObj s_color s_targ PupdateDisplay page,background mouseleave s_targ s_color PupdateDisplay author updateDisplay sliderMove startSliderMove sliderMax sliderMin nearestPUPP mysliderPos HendSliderMove sliderMax sliderBounds sliderMin mysliderPos nearestPupp sliderPos newMouseX oldMouseX buttondown startSliderMove yhelptext statusbar mouseEnter statusbar mouseLeave .&, #> ,%H.% .&, #> .&+ + bckgrnds extractID tb30dlg.dll sortedText curID intro,description and script,description and example,description only pageRef curPageID wsortTextLines sortTextLines backRef label populate extractID buttonclick resize mouseEnter default mouseLeave selectObject curDC deleteObject splitterBounds endPos getDC hDCright createPen }releaseDC splitter hOldObjectleft getsystemmetrics leftWindow oldROP2left minwidth rightWindow gsizePage -setROP2 getsystemmetrics oldROP2right windowRef hOldObjectMain hDCLeft edrawLine leftMost maxwidth wholeWindowWidth rightMost RightBorder buttondown lineTo fromPoint y!moveTo toPoint drawLine "hideControls helpTemplate reader displayBitsPerPixel tb30win.dll <Alle Themen> false categories lighterBlue getDC releaseDC Topics Zeigt Hilfe zur Verwendung dieser Vorlage an. Verwenden dieser &Vorlage numColors darkerBlue navigationBar backcolor Tvpopulate getDeviceCaps moveTo lineTo setROP2 ,"TkN createPen deleteObject selectObject enterApplication helpTemplate leaveApplication CshowControls author 1,!J<Y topics CategoryButtons Navigation showControls "hideControls reader topics CategoryButtons Navigation hideControls itemOffset description and script,description and example,description only pageID categoryStruct categoryStruct destroy .&, " subTopicName description and script,description and example,description only scrolling explanation label enterPage subTopicName description and script,description and example,description only label topic label leavePage extractName extractID ,%H.% itemOffset stripChar }releaseDC 4getDeviceCaps getDC retval numColors Q@darkerBlue R@lighterBlue bckgrnds intro,description and script,description and example,description only curBack backColor categoryStruct showCategoryStruct stbk_noSwap |CtwoDquicksrt twoDquicksort stbk_noSwap |CtwoDquicksrt twoDquicksrt .&, " mydir Das Buch TMPLHELP.TBK wurde nicht gefunden tmplhelp.tbk helpTemplate obref dlgPage -nameRef scriptObjects scriptChooserDialog currentobject Skripten k nnen in der Runtime-Version von Multimedia ToolBook nicht angezeigt werden. buttonclick obtype obname nameRef z% lYs label grade label initQuiz w, #> label answers ,%H.% label !LlabelPosition label answers objName !LlabelPosition objLabel label showRightAnswers objName objLabel label b;origLoc label showWrongAnswers label label checkObject showObjs hideObjs zshowObjs author lYhideObjs reader reader zshowObjs lYhideObjs enterPage false dropTarget enterPage s_lheight leavepage linkStuff s_lheight FManswers GManswers s_lheight fontChange fontChange character fontChange paragraph FManswers right GManswers sized FManswers right GManswers moved false answerList edrawLine answers answerList answers leftRef rightRef false right angLine rightY leftTLBE rightTLBE answerList textLineBeginEnd answerList leftY drawLine lineheight stringLen leftBound rightbound midLine /$stringHeight textLineBeginEnd lineheight stringLen textLineFromPoint getDC releaseDC SIgetTextExtent selectObject deleteObject createFont linkstuff ,!JHY selectObject hOldObject }releaseDC getDC Fehler: Es wurde keine logische Schriftart erstellt. createFont hfont weight makefont .&, " selectObject deleteObject hOldObject }releaseDC hfont destroyFont UdmakeFont destroyFont s_lheight /$stringHeight lineheight UdmakeFont destroyFont retval jogetTextExtent stringLen jogetTextExtent stringHeight nearestPUPP sliderMove sliderMax sliderMin mysliderPos sliderMax sliderBounds sliderMin nearestPupp thumb nearestPUPP sliderPos sliderMax curfield numTics mtallTicSpacing sliderMin DxCenter LnumTics adjustNumbers xCenter mySliderMax sliderMin W\adjustNumbers sliderMin ist ung ltig. sliderMax sliderMax sliderMax mySliderMin W\adjustNumbers ist ung ltig. sliderMin ,%H.% myTallTicSpacing W\adjustNumbers tallTicSpacing numTics mu einen Wert zwischen 1 und 50 haben. curLine sliderMax sliderMin thumb sliderMax sliderBounds W\adjustNumbers sliderMin myNumTics nearestPupp nearestPUPP leftMost numTics myTallTicSpacing tallTicSpacing mySliderMin sliderMin myNumTics numTics mySliderMax sliderMax mysliderPos sliderPos sliderMove endSliderMove secsAngle totalTime kDcurTime sweep oldTime handVertices jDcurTime coords radius totalSecs clocktime ?handVertices myTotalTime totalTime 1, #b 1, #> minutes timeFormat quarter ist kein g ltiges Zeitformat. seconds threeQuarters myTotalTime hours MVmyRound totalTime myRound totaltimeLimit minutes totaltimeLimit timeFormat ist kein g ltiges Zeitformat. clockTime seconds totalTime totalTime hours timeLimit seconds totaltimeLimit timeLimit timeStart timeGetTime startTime buttonstilldown timeStart timeStart kDcurTime clocktime timeGetTime curTime totaltimeLimit 4endtime endtime timeStart kDcurTime clockTime leavepage timeGetTime mmsystem enterpage HHupdateDropDownList enterDropDown <Alle Themen> categoryStruct updateDropDownList <Alle Themen> topics Tvpopulate categoryStruct selectChange leaveDropDown myTopic itemOffset prompt categories hlen: categoryStruct label Kategorien f r Thema enterPage itemOffset categories itemLoc categoryStruct categoryStruct compileCategories Ad~`~`~ Schieber label strChecked Schieber Ein Schieber ist n tzlich, wenn Sie den Benutzer zu einer Angabe auffordern, die innerhalb eines gegebenen Bereichs liegt. Das Schieber-Widget sendet die folgenden Botschaften: startSliderMove: wird gesendet, wenn der Benutzer auf das Bildlauffeld klickt sliderMove: wird fortlaufend gesendet, w hrend das Bildlauffeld gezogen wird endSliderMove: wird gesendet, wenn die Maus losgelassen wird und das Bildlauffeld feststeht. Jede dieser Botschaften bergibt als Parameter die aktuelle Position des Bildlauffelds im Schieber. Verwenden Sie die Eigenschafts bersicht, um den Bereich und den Ma stab festzulegen.. Der Schieber sended die endSliderMove-Botschaft, sobald das Bildlauffeld an eine neue Position verschoben wird. Diese Botschaft wird von der Gruppe verarbeitet, die den Fisch anzeigt. * : J strChecked (Grad Centigrade)) slider mySliderMin mySliderMax mysliderPos myNumTics scaledSlider tbk_wid_name numTics tallTicSpacing sliderMin sliderMax sliderPos tbk_wid_props tbk_wid_values myTallTicSpacing strChecked strChecked thumb hSliderThumb txClassName button id 103 of page id 15 glide width false hilight myTrackPos Shuttle helptext strChecked Schaltfl strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked l $ , T d J strChecked strChecked l 4!<! d!t!J strChecked strChecked l D"L" strChecked strChecked l T#\# strChecked strChecked l d$l$ strChecked strChecked l t%|% strChecked ,&<&J strChecked strChecked <'L'J strChecked strChecked L($J strChecked strChecked l ,)4) $l)J strChecked strChecked l <*D* l*|*J strChecked strChecked l L+T+ strChecked strChecked strChecked l X-^- strChecked 15.333333333333343 D.T.J strChecked 20.666666666666674 strChecked 25.50000000000001e-014 strChecked 30.33333333333333 l P0V0 strChecked 35.66666666666666 <1L1J strChecked 40099999999999999 strChecked strChecked l H3P3 strChecked 10000 04@4J strChecked hlen Sie die richtige Temperatur f r ein tropisches Aquarium. fishy Zu kalt! Genau richtig. problem health Zu warm! endSliderMove jmyhealth sickfish health jmyhealth health notifyBefore endSliderMove sliderPos >= 24 <=29 ohealth "good" "poor" M < 24 "Zu kalt!" "problem" z > 29 "Zu warm!" "Genau richtig." value ls = "fish" "sickfish" myhealth strChecked 4:D:J strChecked strChecked strChecked strChecked V>f>J strChecked strChecked strChecked Z@j@J strChecked strChecked strChecked JBZBJ strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked 6GFGJ strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked dOtOJ strChecked strChecked strChecked *Q:QJ strChecked strChecked jRzRJ strChecked strChecked strChecked 8THTJ strChecked strChecked dUtUJ strChecked strChecked strChecked strChecked strChecked JXZXJ strChecked strChecked jYzYJ strChecked sickfish strChecked strChecked strChecked strChecked <^L^J strChecked strChecked strChecked @`P`J strChecked strChecked strChecked 0b@bJ strChecked strChecked strChecked strChecked ld|dJ strChecked strChecked strChecked strChecked strChecked $g4gJ strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked 8nHnJ strChecked strChecked lo|oJ strChecked strChecked strChecked 6qFqJ strChecked strChecked strChecked strChecked strChecked @tPtJ strChecked strChecked lu|uJ strChecked strChecked strChecked *w:wJ strChecked strChecked Nx^xJ strChecked strChecked strChecked strChecked 4Xzdz problem strChecked Zu warm!chtig. Initialize fishy sliderPos health slider initialize initialize buttonClick initialize enterpage initialize sliderPos health "fishy" buttonClick notifyBefore ,}<}J strChecked Initialisieren endSliderMove startSliderMove sliderMove enterpage Stoppuhr label strChecked Stoppuhr Verwenden Sie das Stoppuhr-Widget, wenn Sie den Zeitraum zum Beantworten der Frage oder zum Anzeigen von Informationen einschr nken wollen. Sie k nnen die auf der Uhr zur Verf gung stehende Gesamtzeit und das Zeit-Limit individuell anpassen. Die Skripten der Schaltfl che "Initialisieren" legen z.B. die auf der Stoppuhr verf gbaren Gesamtzeit auf 60 Sekunden und das Zeit-Limit auf 45 Sekunden fest. Sie k nnen auch Stunden und Minuten angeben. Verwenden Sie die Eigenschafts bersicht, um Optionen festzulegen. Wenn die Zeit abgelaufen ist, sendet die Stoppuhr die endTime-Botschaft.. Eine Benachrichtigungs-Behandlungsroutine in der Schaltfl che "Initialisieren" startet die Stoppuhr, sobald die Seite aufgeschlagen wird. Wenn die Zeit abgelaufen ist, sendet die Stoppuhr die endTime-Botschaft, die in diesem Beispiel von der Schaltfl che "Initialisieren" verarbeitet wird. timer QuizTimer tbk_wid_name totalTime timeLimit tbk_wid_props tbk_wid_values mytotalTime totaltimeLimit strChecked curTime strChecked sweep strChecked strChecked 8 H J strChecked strChecked strChecked quarter strChecked strChecked threequarters strChecked 45505 strChecked timeFormat strChecked (Seconds)) Initialize timer timeLimit 45 seconds startTime totalTime 60 seconds initialize initialize buttonClick initialize enterPage Die Zeit ist abgelaufen. endTime initialize totalTime "timer" timeLimit startTime buttonClick notifyBefore endTime "Die Zeit ist abgelaufen." strChecked Initialisieren endtime enterpage buttonstilldown leavepage scriptChooserDialog .&+ + scriptObjects enterpage cancel keychar scriptObjects cancel selectedtextlines "scriptObjects" keyEnter editscript close origPage original scriptChooserDialog label Skript anzeigen h ipt: bottomLine topLine scriptObjects editScript buttondoubleclick editScript stl = selectedTextLines t = -- the full {reference hiding -- each obj = 9,t)+1 U(t) Group "pile o fruit" Group id 52 of Page id 155 Button "New pile" Button id 30 of Page id 155utton "thumb" Button id 3 of Page id 159 Group "slider" Group id 67 of Page id 159 id 157 Field "left" Field id 1 of Page id 157 Group "MatchingQuiz" Group id 43 of Page id 157d 156 Button "gradeMe" Button id 7 of Page id 156 Group "target group" Group id 6 of Page id 156 buttonclick buttonclick ew Script cancel buttonclick buttonclick Abbrechen strChecked strChecked strChecked strChecked strChecked strChecked strChecked &Ausgew hltes Skript anzeigen: strChecked .&+ + categories categoryStruct enterPage ,%H.% extractName frefText extractID categories stwoDQuickSort categoryStruct updateCategories categories the " ZmainStruct[][] = categoryStruct fref = arraySize = dimensions( ni][1] i][2] selectedTextlines -- recreates structure updateCategories frefText = t = i][1] = extractName(t) i][2] = extractID(t) twoDQuickSort origPage original label strChecked bottomLine strChecked topLine strChecked Categories strChecked Umwandeln von Werten 128 tzliche Funktionen 158,151 Widgets 160,159,157,156,141 Drag & Drop 151,15555ag and Drop 155 Drop 155141 Drag and Drop 1556,141 Drag and Drop 155 and Drop 155 Drag and Drop 155rag and Drop 155and Drop 155op 155Drag and Drop 155 Drag and Drop 155 Manipulation 132,131,130,129 Useful Functions 132,129,115 Widgets 141,140,139,140,139 Untitled bel ts 15 Useful Objects Useful Objects 95,96 Date functions cancel categories Geben Sie eine neue Kategorie ein. Unbenannt buttonclick -- prompts qcategory buttonclick ("Geben Sie eine neue Kategorie f"Unbenannt" "categories" strChecked &Neu... ,%H.% cancel extractName frefText false categories Geben Sie einen neuen Namen f r diese Kategorie ein. Ein Thema mit diesem Namen ist bereits vorhanden. found buttonclick -- allows user rename a category buttonclick fref = "categories" frefText = stl = selectedTextLines t = tabLoc = ("Geben Sie einen neuen Namen f r diese Kategorie tabloc-1 found = -- asure xalready used. i <> extractName( "Ein Thema mit diesem ist bereits vorhanden." -- update strChecked &Umbenennen... w, #> Cancel extractName categories Kategorie l schen buttonclick a category buttonclick fref = "categories" stl = selectedTextlines t = "Kategorie l schen" && & extractName(t) & & "?" f"OK" "Cancel" strChecked schen updateCategories buttonclick buttonclick updateCategories close strChecked buttonclick -- closes dialog box buttonclick strChecked &Abbrechen strChecked Ausgew hlte Kategorie bearbeiten: MS Sans Serif Mammals House Pets Smell Bad categories 4,5,0 4,5,0 4,6,7,0 4,5,0 Farm Animals Household Pets Stinky Animals categoryStruct topicsPerCategory Data Valadation 10,9,4,5,6,0,7 13,12,11 DOS Utilities File Maintenance 16,15,14 Functions Menus Navigation Programming Aids Resources Sorting and Searching Useful Objects Courier New g"g#%~k V-g"[ Data Valadation 76,75,80,74,71,28,73,72 78,79,103,77 DOS Utilities 84,85,81,83,86 File Maintenance 100,82,99 Functions 108,88,87 Menus Navigation Programming Aids 98,106,97 Resources 92,94,93 Sorting and Searching 82,107,109 Useful Objects 95,96 MS Sans Serif '&%~k Arial 6O*K~k Courier New 6O*K~k urier New SubtopicName script SubtopicName script Menus Navigation Sorting and Searching 130,82,109 String Manipulation 132,131,130,129 Useful Functions 132,129,115 Widgets 141,140,139,138 Useful Objects 95,96 MS Sans Serif System Sans Serif Sans Serif Arial r]g"= r]g"= MS Sans Serif Arial Umwandeln von Werten tzliche Funktionen 158,151 Widgets 160,159,157,156,141 Drag & Drop 151,155 DOS Utilities File Maintenance Navigation Sorting and Searching String Manipulation Useful Functions 158,151 Widgets 160,159,157,156,141 Drag and Drop Arial Arial System Calling Windows Functions Conversion help Data Validation Date functions Debugging DOS Utilities File Maintenance Navigation Sorting and Searching String Manipulation Useful Functions Widgets 40,139 Arial strChecked Arial MS Sans Serif Courier Arial mes New Roman DOS Utilities File Maintenance Navigation Sorting and Searching String Manipulation Useful Functions 158,151 Widgets 159,157,156,141 Drag and Drop Page id 143 Neues Thema navigationBar Page id 1 categoryPicker Page id 3 categoryMaintenance Page id 8 Kategorien-Verwaltung newTopic Page id 121 w Topic scriptChooserDialog T Tips Themenkategorien Tips f r rechnerunterst tzte Schulung description and script tline SubtopicName in,ms ThreeDeeRect bottomLine topLine script false keydown .&, " script scrolling rectangle enterpage key,isShift,isCtrl cl = caretLocation notifyBefore fref = txtOver = Skript: script buttonclick -- puts the contents lipboard buttonclick fref = scr = py Script in,ms ThreeDeeRect bottomLine topLine explanation .&, " scrolling rectangle explanation enterpage notifyBefore fref = "explanation" txtOver = enterpage strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked Skript kopieren Ziehen von Objekten in Beh lter-Objekte label strChecked Ziehen von Objekten in Beh lter-Objektee Dieses Beispiel veranschaulicht die Einsatzm glichkeit von benutzerdefinierten Symbolen und den Drag & Drop-Befehlen von OpenScript. Wenn Sie einen Apfel oder eine Orange ziehen, wird das Objekt verborgen und der Cursor verwandelt sich in die entsprechende Frucht. Ziehen Sie die pfel und Orangen in den jeweils richtigen Korb. oranges strChecked strChecked Orange targetType strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked apples strChecked strChecked Apfel targetType strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked strChecked Orangen strChecked New pile pile o fruit buttonclick pile o fruit enterPage buttonclick "pile o fruit" notifyBefore strChecked chte wieder aufh pile o fruit buttondown beginDrag Sie haben den Korb verfehlt! pfel und Orangen sollen nicht in den gleichen Korb gelegt werden! targetType objectType endDrag drag >silently beginDrag endDrag destObj targetType "Sie haben den Korb verfehlt!" Y <> objectType pfel und Orangen sollen nicht ]gleichen dgelegt werden!" strChecked Apfel objectType strChecked Orange objectType strChecked Apfel objectType strChecked Orange objectType strChecked Apfel objectType strChecked Orange objectType strChecked Apfel objectType strChecked Orange objectType strChecked &"6"J Apfel objectType strChecked Orange objectType strChecked Apfel objectType strChecked Orange objectType strChecked B%R%J Apfel objectType strChecked "&2&J Orange objectType strChecked Apfel objectType strChecked $ 4 Y Orange objectType strChecked ^(n(J B R Y Apfel objectType strChecked >)N)J ` p Y Orange objectType strChecked Apfel objectType strChecked Orange objectType strChecked enterPage &File &Open... Ctrl+O &Save Ctrl+S Save &As... saveas &Run... E&xit Alt+F4 &Edit &Undo Ctrl+Z Cu&t Ctrl+X &Copy Ctrl+C &Paste Ctrl+V paste A&uthor F3 author &Help &Contents F1 index strChecked Navigation rightBounds sizeStuff splitter sizePage sizePage xpix = sysPageUnitsPerPixel rightBounds = B"splitter" "sizeStuff" -- keep focuswindow = origPage original Navigation label strChecked strChecked Kategorie ausw hlen: strChecked Themen dieser Kategorie::e: sizeStuff strChecked strChecked categories strChecked <Alle Themen> Wertentions <Alle Themen> Drag & Drop tzliche Funktionen Umwandeln von Werten WidgetstsUseful Functions Widgetsbugging DOS Utilities Drag and Drop File Maintenance Navigation Sorting and Searching String Manipulation Useful Functions Widgetsul Objectsns Useful Objects navButtons strChecked .&+ + extractID topics tcount buttonclick buttonclick fref = t = asure isn't empty tcount = stl = selectedTextLines beginning -- -- navigate extractID( , so focuswindow reverts strChecked previous .&+ + extractID topics buttonclick -- navigates buttonclick fref = asure there t = stl = selectedTextLines going -- -- extractID( y, so focusWindow reverts strChecked search ,%H.% cancel bckgrnds description and script,description and example,description only searchPhrase <Benutzerdefinierte Suche> categories Keine Instanzen von topics wurden gefunden. Geben Sie das Schl sselwort ein, nach dem gesucht werden soll. explanation backRef Tvpopulate buttonclick buttonclick Zfoundlist ("Geben Sie das Schl sselwort ein, nach dem gesucht werden soll." searchPhrase = ZallTopics bckgrnds = "description example, only" backRef = pref = "explanation" ) = 0 "Keine Instanzen von" && && "wurden gefunden." populate combobox "categories" "<Benutzerdefinierte Suche>" strChecked topics strChecked <Einf hrung> 145 Abfragen von Informationen mit der Maus 158 Beschriftungen 156 Schieber 159 Stoppuhr 160 Umwandeln von Bin r-, Hexadezimal- und Oktalwerten 128 hlscheibe 141 Ziehen von Objekten 151 Ziehen von Objekten in Beh lter-Objekte 155 Zuordnungs-Quiz 157iz categoryButtons strChecked CategorySetup categoryPicker buttonclick buttonclick "categoryPicker" %modal strChecked Themenkategorien CategoryMaintenance categoryMaintenance buttonclick buttonclick "categoryMaintenance" %modal strChecked Kategorien-Verwaltung <Alle Themen> categories newTopic buttonup newTopic %modal combobox "categories" = "<Alle Themen>" selectchange "< strChecked Neues Thema w, #> .&, " Thema Die letzte Seite dieses Hintergrunds kann nicht gel scht werden. schen? categories Abbrechen label buttonclick buttonclick "Thema" && & label && "l schen?" f"OK" "Abbrechen" "Die letzte Seite dieses Hintergrunds kann nicht gel scht werden." selectchange combobox "categories" "!2!J strChecked Thema l schen splitter strChecked strChecked origPage original label strChecked strChecked origPage original label strChecked bottomLine strChecked topLine strChecked categories strChecked Umwandeln von Werten tzliche Funktionen Widgets Drag & Dropoperifizieren von Daten Datumsfunktionen Testen von Skripten DOS-Werkzeuge Dateiverwaltung Seitenwechsel Sortieren und Suchen Bearbeiten von Zeichenfolgen tzliche Funktionen Widgets Drag & Drop prompt strChecked Kategorien f r Thema "Ziehen von Objekten" ausw hlen:al- und Oktalwerten" ausw hlen: compileCategories buttonclick buttonclick compileCategories close strChecked buttonclick -- dismiss dialog box buttonclick close strChecked &Abbrechen Scripts examples in library.tbk. Scripts examples in library.tbk. Page