home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 15 / AACD15.ISO / AACD / Programming / MultiDesktop / win_lib.fd < prev    next >
Encoding:
Text File  |  1997-03-27  |  16.2 KB  |  500 lines
  1. ##base _MultiWindowsBase
  2. ##bias 30
  3. ##private
  4. InitWindowsUser(task)
  5. TerminateWindowsUser(task)
  6. ##public
  7. * ==== Applikations-Identifizierung ========================================
  8. AppInfo(name,version,catName,oldH,oldV, ?? font,npFont  .. icon .. guide .. ,tagList)
  9. ##private
  10. DOut(fileHandle,text,arg1,arg2,arg3) (a0,a1,a2,a3,a4)
  11. ##public
  12. * ==== Informationen über User =============================================
  13. GetUserInfo()
  14. GetUserLevel()
  15. * ==== Informationen über Programm =========================================
  16. GetProgName()
  17. GetProgDir()
  18. GetWBStartup()
  19. GetArguments()
  20. GetToolTypes()
  21. GetLocale()
  22. GetCatalog()
  23. GetGuide()
  24. GetPreferences()
  25. * ==== Fonts ===============================================================
  26. * ---- Fonts der Applikation -------------------------
  27. GetTextAttr()
  28. GetBoldTextAttr()
  29. GetTextFont()
  30. GetTextFontName()
  31. GetTextFontHeight()
  32. GetNonPropTextAttr()
  33. GetNonPropTextFont()
  34. GetNonPropTextFontName()
  35. GetNonPropTextFontHeight()
  36. * ---- Default-Fonts aus MultiWindows-Prefs ----------
  37. GetDefaultTextAttr()
  38. GetDefaultTextFont()
  39. GetDefaultTextFontName()
  40. GetDefaultTextFontSize()
  41. GetDefaultNonPropTextAttr()
  42. GetDefaultNonPropTextFont()
  43. GetDefaultNonPropTextFontName()
  44. GetDefaultNonPropTextFontSize()
  45. * ---- System-Fonts von MultiWindows -----------------
  46. GetTopazTextFont()
  47. GetTopazTextAttr()
  48. GetPassword5TextFont()
  49. GetPassword5TextAttr()
  50. GetPassword9TextFont()
  51. GetPassword9TextAttr()
  52. * ==== Workbench-App-Objekte ===============================================
  53. ##private
  54. CreateAppObject(type,data,ownerType,owner)
  55. DeleteAppObject(appObject)
  56. FindAppObject(appID)
  57. ##public
  58. CreateAppIcon(appID,title)
  59. DeleteAppIcon(appID)
  60. CreateAppMenuItem(appID,title)
  61. DeleteAppMenuItem(appID)
  62. CreateAppWindow(windowID)
  63. DeleteAppWindow(windowID)
  64. * ==== Screens =============================================================
  65. ##private
  66. ScanDisplayModes()
  67. ##public
  68. CreateScreen(screenID,title,width,height,depth,modeID,type,flags,tagList)
  69. DeleteScreen(screenID)
  70. CheckScreenID(screenID)
  71. FindScreenEntry(screenID)
  72. * ---- Screen-Funktionen ---------------------------------------------------
  73. ScreenFont(screenID)
  74. ScreenBack(screenID)
  75. ScreenMove(screenID,leftEdge,topEdge)
  76. ScreenMoveDelta(screenID,deltaX,deltaY)
  77. ScreenTitle(screenID,title)
  78. ScreenDefaultTitle(screenID,title)
  79. * ==== Informationen über Screen ===========================================
  80. GetScreenIconifyStatus(screenID)
  81. GetScreenInnerLeftEdge(screenID)
  82. GetScreenInnerTopEdge(screenID)
  83. GetScreenInnerWidth(screenID)
  84. GetScreenInnerHeight(screenID)
  85. GetScreenLeftEdge(screenID)
  86. GetScreenTopEdge(screenID)
  87. GetScreenWidth(screenID)
  88. GetScreenHeight(screenID)
  89. GetScreenDepth(screenID)
  90. GetScreenAddress(screenID)
  91. GetScreenRastPort(screenID)
  92. GetScreenViewPort(screenID)
  93. GetScreenBitMap(screenID)
  94. GetScreenBitplane(screenID,number)
  95. GetScreenLayerInfo(screenID)
  96. GetScreenCMap(screenID)
  97. GetScreenCTable(screenID)
  98. GetScreenModeID(screenID)
  99. GetScreenViewModes(screenID)
  100. GetScreenDisplayInfo(screenID)
  101. GetScreenTitle(screenID)
  102. GetScreenDefaultTitle(screenID)
  103. * ==== Windows =============================================================
  104. CreateWindow(windowID,title,x,y,width,height,flags,screenID,$$$)
  105. DeleteWindow(windowID)
  106. ActWindow(windowID)
  107. CheckWindowID(windowID)
  108. FindWindowEntry(windowID)
  109. * ---- Ikonifizierung ------------------------------------------------------
  110. IconifyWindow(windowID)
  111. UnIconifyWindow(windowID)
  112. * ---- Window-Funktionen ---------------------------------------------------
  113. WindowFront(windowID)
  114. WindowBack(windowID)
  115. WindowMove(windowID,leftEdge,topEdge)
  116. WindowMoveDelta(windowID,deltaX,deltaY)
  117. WindowSize(windowID,width,height)
  118. WindowSizeDelta(windowID,deltaX,deltaY)
  119. WindowBox(windowID,leftEdge,topEdge,width,height)
  120. WindowActivate(windowID)
  121. WindowZoom(windowID)
  122. WindowTitle(windowID,title)
  123. WindowSTitle(windowID,windowTitle,screenTitle)
  124. * ==== Informationen über Fenster ==========================================
  125. * ---- Daten über Font Sensitive System ermitteln --------------------------
  126. ##private
  127. TestFont(font,hPtr,vPtr)
  128. INewX(we,oldX)
  129. INewY(we,oldY)
  130. INewWidth(we,oldWidth)
  131. INewHeight(we,oldHeight)
  132. ##public
  133. NewX(oldX)
  134. NewY(oldY)
  135. NewWidth(oldWidth)
  136. NewHeight(oldHeight)
  137. WNewX(winID,oldX)
  138. WNewY(winID,oldY)
  139. WNewWidth(winID,oldWidth)
  140. WNewHeight(winID,oldHeight)
  141. GetWindowIconifyStatus(windowID)
  142. GetWindowInnerLeftEdge(windowID)
  143. GetWindowInnerTopEdge(windowID)
  144. GetWindowInnerWidth(windowID)
  145. GetWindowInnerHeight(windowID)
  146. GetWindowLeftEdge(windowID)
  147. GetWindowTopEdge(windowID)
  148. GetWindowWidth(windowID)
  149. GetWindowHeight(windowID)
  150. GetWindowOriginalWidth(windowID)
  151. GetWindowOriginalHeight(windowID)
  152. GetWindowFactorX(windowID)
  153. GetWindowFactorY(windowID)
  154. GetWindowAspectX(windowID)
  155. GetWindowAspectY(windowID)
  156. * ---- Fensterdaten ermitteln ----------------------------------------------
  157. GetWindowAddress(windowID)
  158. GetWindowScreen(windowID)
  159. GetWindowScreenEntry(windowID)
  160. GetWindowRastPort(windowID)
  161. GetWindowTextFont(windowID)
  162. GetWindowTextFontName(windowID)
  163. GetWindowTextFontHeight(windowID)
  164. GetWindowViewPort(windowID)
  165. GetWindowBitMap(windowID)
  166. GetWindowBitplane(windowID,number)
  167. GetWindowLayer(windowID)
  168. GetWindowLayerInfo(windowID)
  169. GetWindowCMap(windowID)
  170. GetWindowCTable(windowID)
  171. GetWindowUserPort(windowID)
  172. GetWindowDrawInfo(windowID)
  173. GetWindowVisualInfo(windowID)
  174. GetWindowAreaInfo(windowID)
  175. GetWindowAreaBuffer(windowID)
  176. GetWindowTmpRas(windowID)
  177. GetWindowWallpaper(windowID)
  178. GetWindowWallpaperName(windowID)
  179. GetWindowPointer(windowID)
  180. GetWindowPointerName(windowID)
  181. * ==== Wallpapers ==========================================================
  182. ##private
  183. LoadWallpaper(name)
  184. UnLoadWallpaper(wallpaper)
  185. UseWallpaper(windowEntry,wallpaper)
  186. ShowWallpaperWindow(window,wallpaper)
  187. ShowWallpaperRastPort(rasPort,wallpaper,iLeftEdge,iTopEdge,iWidth,iHeight)
  188. RestoreBackground(windowEntry,x,y,width,height)
  189. ##public
  190. Wallpaper(name)
  191. * ==== Pointers ============================================================
  192. ##private
  193. LoadPointer(name)
  194. UnLoadPointer(pointer)
  195. UsePointer(windowEntry,pointer)
  196. NextPointer(windowEntry)
  197. SetPointerColors()
  198. ##public
  199. Pointer(name)
  200. StdPointer(number)
  201. AnimPointer()
  202. * ==== Locale ==============================================================
  203. LocaleSFormat(buffer,formatString,args)
  204. LocaleDFormat(buffer,formatString,dateStamp)
  205. L(stringNumber)
  206. * ==== Online-Hilfe ========================================================
  207. ##private
  208. CreateHelpText(windowEntry,string)
  209. DeleteHelpText(helpText)
  210. ShowHelpText(windowEntry,helpText)
  211. ##public
  212. HelpOn()
  213. HelpOff()
  214. DeveloperOn()
  215. DeveloperOff()
  216. * ---- Guide-Funktionen ----------------------------------------------------
  217. OpenGuide()
  218. CloseGuide()
  219. ShowGuide()
  220. * ==== Gadget-Funktionen ===================================================
  221. ##private
  222. BackupRP(windowEntry)
  223. RestoreRP(windowEntry)
  224. ##public
  225. * ---- Buttons -------------------------------------------------------------
  226. AddButton(gadgetID,helpID,x,y,width,height,text,flags)
  227. * ---- Toggle-Select-Buttons -----------------------------------------------
  228. AddToggle(gadgetID,helpID,x,y,width,height,text,flags,selected)
  229. AskToggle(gadgetID)
  230. UpdateToggle(gadgetID,selected)
  231. * ---- Cycles --------------------------------------------------------------
  232. AddCycle(gadgetID,helpID,x,y,width,height,text,flags,labelArray,active)
  233. AskCycle(gadgetID)
  234. UpdataCycle(gadgetID,newSelection)
  235. * ---- Listviews -----------------------------------------------------------
  236. AddListview(gadgetID,helpID,x,y,width,height,text,flags,labelArray,selected)
  237. AskListviewSelection(gadgetID)
  238. AskListviewSelectionLabel(gadgetID)
  239. UpdateListviewSelection(gadgetID,selected)
  240. * - Einträge hinzufügen ------------------------
  241. AddListviewEntrySort(gadgetID,label,sortFlags)
  242. AddListviewEntryNumber(gadgetID,label,number)
  243. SetListviewList(gadgetID,list)
  244. GetListviewList(gadgetID)
  245. * - Einträge entfernen -------------------------
  246. RemListviewEntryLabel(gadgetID,label)
  247. RemListviewEntryNumber(gadgetID,number)
  248. RemListviewEntries(gadgetID)
  249. * - Einträge sortieren -------------------------
  250. SortListviewEntries(gadgetID,sortFlags)
  251. * - Einträge updaten ---------------------------
  252. ChangeListviewEntrySelected(gadgetID,label)
  253. ChangeListviewEntryNumber(gadgetID,number,newLabel)
  254. * ---- Mutual Excludes -----------------------------------------------------
  255. AddMX(gadgetID,helpID,x,y,width,height,text,flags,labelArray,active)
  256. AskMX(gadgetID)
  257. UpdateMX(gadgetID,newSelection)
  258. * ---- String/Integer/Hook -------------------------------------------------
  259. AddString(gadgetID,helpID,x,y,width,height,text,flags,string,maxChars)
  260. AddHookString(gadgetID,helpID,x,y,width,height,text,flags,string,max,stringHook)
  261. AskString(gadgetID)
  262. UpdateString(gadgetID,newString)
  263. AddInteger(gadgetID,helpID,x,y,width,height,text,flags,number,min,max)
  264. AskInteger(gadgetID)
  265. UpdateInteger(gadgetID,newNumber)
  266. AddHex(gadgetID,helpID,x,y,width,height,text,flags,number,min,max)
  267. AskHex(gadgetID)
  268. UpdateHex(gadgetID,newNumber)
  269. AddFloat(gadgetID,helpID,x,y,width,height,text,flags,number,min,max)
  270. AskFloat(gadgetID)
  271. UpdateFloat(gadgetID,newNumber)
  272. * ---- Slider --------------------------------------------------------------
  273. AddHSlider(gadgetID,helpID,x,y,width,height,text,flags,level,min,max)
  274. AddVSlider(gadgetID,helpID,x,y,width,height,text,flags,level,min,max)
  275. AskSlider(gadgetID)
  276. UpdateSlider(gadgetID,newPosition)
  277. UpdateSliderLimits(gadgetID,min,max)
  278. * ---- Scroller ------------------------------------------------------------
  279. AddHScroller(gadgetID,helpID,x,y,width,height,text,flags,top,visible,total)
  280. AddVScroller(gadgetID,helpID,x,y,width,height,text,flags,top,visible,total)
  281. AskScroller(gadgetID)
  282. UpdateScroller(gadgetID,top,visible,total)
  283. * ---- Palette -------------------------------------------------------------
  284. AddPalette(gadgetID,helpID,x,y,width,height,text,flags,depth,cOffset,color)
  285. AskPalette(gadgetID)
  286. UpdatePalette(gadgetID,newSelection)
  287. * ---- Checkbox, Clickbox --------------------------------------------------
  288. AddCheckbox(gadgetID,helpID,x,y,width,height,text,flags,checked)
  289. AskCheckbox(gadgetID)
  290. UpdateCheckbox(gadgetID,checked)
  291. AddClickbox(gadgetID,helpID,x,y,width,height,text,flags,selected)
  292. AskClickbox(gadgetID)
  293. UpdateClickbox(gadgetID,selected)
  294. * ---- TX/NM ---------------------------------------------------------------
  295. AddTX(gadgetID,helpID,x,y,width,height,text,flags,text)
  296. AskTX(gadgetID)
  297. UpdateTX(gadgetID,newText)
  298. AddNM(gadgetID,helpID,x,y,width,height,text,flags,number)
  299. AskNM(gadgetID)
  300. UpdateNM(gadgetID,newNumber)
  301. * ---- Text/Number ---------------------------------------------------------
  302. AddText(gadgetID,helpID,x,y,width,height,text,flags,text,justification)
  303. AskText(gadgetID)
  304. UpdateText(gadgetID,newText)
  305. AddNumber(gadgetID,helpID,x,y,width,height,text,flags,format,number,justification)
  306. AskNumber(gadgetID)
  307. UpdateNumber(gadgetID,newNumber)
  308. * ---- Status --------------------------------------------------------------
  309. AddStatus(gadgetID,helpID,x,y,width,height,text,flags,level,min,max)
  310. AddStatus100(gadgetID,helpID,x,y,width,height,text,flags,percent)
  311. AskStatus(gadgetID)
  312. UpdateStatus(gadgetID,newStatus)
  313. UpdateStatusLimits(gadgetID,min,max)
  314. * ---- Wheel ---------------------------------------------------------------
  315. AddWheel(gadgetID,helpID,x,y,width,height,text,flags,level,min,max)
  316. AskWheel(gadgetID)
  317. UpdateWheel(gadgetID,newLevel)
  318. * ---- SelectBox -----------------------------------------------------------
  319. AddSelectBox(gadgetID,helpID,x,y,width,height,text,flags,labelArray,active)
  320. AskSelectBox(gadgetID)
  321. UpdateSelectBox(gadgetID,newSelection)
  322. * ---- Image/Icon ----------------------------------------------------------
  323. AddImage(gadgetID,helpID,x,y,w,h,text,flags,name)
  324. AddIcon(gadgetID,helpID,x,y,w,h,text,flags,number)
  325. * ==== Gadget-Funktionen ===================================================
  326. ##private
  327. GetGadget(gadgetID,type,kind)
  328. CenterImage(image,width,height)
  329. CountGadgets(firstGadget)
  330. ##public
  331. RemGadget(gadgetID)
  332. FindGadget(gadgetID)
  333. DisableGadget(gadgetID)
  334. DisableGadgetArray(idArray)
  335. EnableGadget(gadgetID)
  336. EnableGadgetArray(idArray)
  337. Redraw()
  338. * ---- Action-Lists --------------------------------------------------------
  339. MakeAction(targetID,sourceCode,targetCode)
  340. UnMakeAction(gadgetID)
  341. * ==== Frames ==============================================================
  342. AddFrame(id,leftEdge,topEdge,width,height,type)
  343. RemFrame(id)
  344. * ==== Menüs ===============================================================
  345. ##private
  346. PixelLength(textFont,string)
  347. ##public
  348. * ---- Erstellung von Menüs ------------------------------------------------
  349. AddMenu(menuID,helpID,text,flags)
  350. AddItem(itemID,helpID,text1,text2,commSeq,flags)
  351. AddBarItem(itemID)
  352. AddCheckItem(itemID,helpID,text1,text2,commSeq,flags,checkIt)
  353. AddToggleItem(itemID,helpID,text1,text2,commSeq,flags,checkIt)
  354. AddSubItem(itemID,helpID,text1,text2,commSeq,flags)
  355. AddSubBarItem(itemID)
  356. AddSubCheckItem(itemID,helpID,text1,text2,commSeq,flags,checkIt)
  357. AddSubToggleItem(itemID,helpID,text1,text2,commSeq,flags,checkIt)
  358. AddStdItems()
  359. * ---- Verändern von Menüs -------------------------------------------------
  360. InsertMenu(prevID,menuID,helpID,text,flags)
  361. InsertItem(prevID,itemID,helpID,text1,text2,commSeq,flags)
  362. InsertBarItem(prevID,itemID,helpID,text1,text2,commSeq,flags)
  363. InsertCheckItem(prevID,itemID,helpID,text1,text2,commSeq,flags,checkIt)
  364. InsertToggleItem(prevID,itemID,helpID,text1,text2,commSeq,flags,checkIt)
  365. InsertSubItem(prevID,itemID,helpID,text1,text2,commSeq,flags)
  366. InsertSubBarItem(prevID,itemID,helpID,text1,text2,commSeq,flags)
  367. InsertCheckItem(prevID,itemID,helpID,text1,text2,commSeq,flags,checkIt)
  368. InsertToggleItem(prevID,itemID,helpID,text1,text2,commSeq,flags,checkIt)
  369. * ---- Menü-Funktionen -----------------------------------------------------
  370. ##private
  371. FindMenuOrItem(findID,typePtr)
  372. FindItemOrSubItem(findID)
  373. ModifyItem(itemID,modifyFlags,flag)
  374. ##public
  375. AskItem(itemID)
  376. CheckItem(itemID)
  377. UnCheckItem(itemID)
  378. AskSubItem(itemID)
  379. CheckSubItem(itemID)
  380. UnCheckSubItem(itemID)
  381. ShowMenu()
  382. HideMenu()
  383. KillMenu()
  384. FindMenu(menuID)
  385. FindItem(itemID)
  386. FindSubItem(itemID)
  387. RemMenu(menuID)
  388. RemItem(itemID)
  389. RemSubItem(subID)
  390. * ---- ItemAction-Lists ----------------------------------------------------
  391. MakeItemAction(targetID,flags)
  392. UnMakeItemAction(gadgetID)
  393. * ==== Sonstiges ===========================================================
  394. ConvertToRawKey(code,buffer)
  395. ConvertToVanillaKey(code,qualifier)
  396. * ==== MultiMessage-Verwaltung =============================================
  397. ##private
  398. GetSignalList()
  399. ##public
  400. GetSignalMask()
  401. GetErrorMessage()
  402. GetSystemMessage(wait)
  403. GetTimerMessage(wait)
  404. GetAppMessage(wait)
  405. GetWindowMessage(windowID,wait)
  406. GetMultiMessage(wait)
  407. CheckMultiMessageSignals(signalMask)
  408. * ==== Zeichenfunktionen ===================================================
  409. ##private
  410. CreateTmpRas(windowEntry)
  411. CreateAreaInfo(windowEntry)
  412. DeleteTmpRas(windowEntry)
  413. DeleteAreaInfo(windowEntry,count)
  414. GetRP()
  415. NewXY(xPtr,yPtr)
  416. ##public
  417. CorrectionOn()
  418. CorrectionOff()
  419. * ---- Font-Cache ----------------------------------------------------------
  420. CacheFont(name,height)
  421. FlushFont(name,height)
  422. FlushFonts()
  423. * ---- Setzen von Stiften, Draw-Modes, Styles, Fonts und Patterns ----------
  424. SetFgPen(pen)
  425. SetBgPen(pen)
  426. SetOlPen(pen)
  427. SetPens(fgPen,bgPen)
  428. SetFgDrawInfoPen(const)
  429. SetBgDrawInfoPen(const)
  430. SetOlDrawInfoPen(const)
  431. SetDrawMode(mode)
  432. SetStyle(style)
  433. SetWindowFont(name,height)
  434. SetTextSpacing(spacing)
  435. SetWriteMask(mask)
  436. SetLinePattern(pattern)
  437. SetMonoPattern(pattern,lines)
  438. SetColorPattern(pattern,lines)
  439. * ---- Abfragen von Stiften, Draw-Modes, Styles und Fonts ------------------
  440. GetFgPen()
  441. GetBgPen()
  442. GetOlPen()
  443. GetPixel(x,y)
  444. GetDrawMode()
  445. GetStyle()
  446. GetTextSpacing()
  447. * ---- Zeichenfunktionen ---------------------------------------------------
  448. Plot(x,y)
  449. MoveTo(x,y)
  450. DrawTo(x,y)
  451. Line(x1,y1,x2,y2)
  452. DrawPolygon(array,count)
  453. Rectangle(x1,y1,x2,y2)
  454. FilledRectangle(x1,y1,x2,y2)
  455. Ellipse(x,y,ra,rb)
  456. Circle(x,y,r)
  457. Paint(x,y)
  458. Print(x,y,text)
  459. * ---- Area-Funktionen -----------------------------------------------------
  460. ##private
  461. AInit()
  462. ##public
  463. AMoveTo(x,y)
  464. ADrawTo(x,y)
  465. ADrawPolygon(array,count)
  466. AEllipse(x,y,a,b)
  467. ACircle(x,y,a)
  468. AEnd()
  469. ShowAreaLines()
  470. HideAreaLines()
  471. * ---- Farbpalette ---------------------------------------------------------
  472. SetPalette(color,red,green,blue)
  473. SetGreyScale(color,red,green,blue)
  474. SetGrey(color,grey)
  475. GetPalette(color,redPtr,greenPtr,bluePtr)
  476. GetGrey(color)
  477. * ----
  478.  
  479. -----
  480. BitMapCopy8  (byteweise)
  481. BitMapCopy16 (wordweise)
  482. BitMapCopy32 (longwordweise, 32bit-Ram auf A2630-Karte)
  483. BitMapCopy   (bitweise, dann je nach Möglichkeit 8, 16 oder 32)
  484.    mit Fast/Chip-Kopie !!!!
  485. BitMapCopyAgnus() Chip-Chip-Copy
  486. --------
  487.  
  488. * ====
  489.  
  490.  
  491. Scoll (SuperBitmap etc.)
  492.  
  493. --- ??
  494.  
  495. OpenInformationBox(title,text)
  496. CloseInformationBox()
  497. HandleInformationMM(multiMessage)
  498.  
  499. ##end
  500.