ThreadBoard ArchivesSite FeaturesActiveworlds SupportHistoric Archives |
Build7 (Delphi) (Sdk)
Build7 (Delphi) // SdkcanopusOct 21, 1998, 2:20pm
This is a multi-part message in MIME format.
--------------214FED21A0100088F15D14B3 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Attached is the Delphi version of the AWAPI library, Build 7. The only difference from Build 6 is that all PChar parameters have been changed to const PChar parameters. I tested this Build 7 library earlier today, using a version of Sample 2 that was written for Build 6. (Sample 2 makes a lot of use of string parameters.) It seemed to work fine. --------------214FED21A0100088F15D14B3 Content-Type: application/x-zip-compressed; name="Build7AWAPI.zip" Content-Transfer-Encoding: base64 Content-Disposition: inline; filename="Build7AWAPI.zip" UEsDBBQAAAAIAONYVSVRcZdBMgwAAF5BAAALAAAAYWtBV0FQSS5wYXPFGmtv28jxuwH/h4W/ RA5StzjgUCDCAaUk2uaFIlWSih9FK9DS2uYdJfpIyo4vyH/v7PK1b1Fy0uqAHDmz856d2R36 a/y7dWXNnLNZXHw7Pjo+2m6SEtXAIQF8fT/B6dNjggb+3W94WSJYuYzTU7TCyzTO4zLJNgWK NyuUrJ+yvERpcpfH+evxEbrPclQ+YmQty+QZo6ssT1cFAsbvqahkU+L8Pl5iKrfABZCgq2Sz yl6KD2iKiyJ+wPAUvhbzMknhaZzGBayjei1BbImsq8XUul5YURQ4o3lkL1zbu4gu0S/op59/ HjKrRnPHnQD475T4+Gjw/i/f80dUN/xiVMJ/OUrQHdrCE0Zg7G6ue/zenxKrytcnTKxt/QEW D4huAHP9C8dbeNbU/sBBZlYYXvnBhIf6V54dCAsD57Pj2he2hqTDe/PpSE+tUAFw1viGB1qz meuMrcjxvQYx95zPdhDai1HgX4V2sJg6njOdT7X4wHZtK7S1+JEdWRISLHMnWtYVNoysIJJw gX3hhFFAdYaXf86dwG6dNHYi59b2BOe0UMYpDUx0cwO3p5bjisDImZLsP48kLtqwNSuc6dS5 qLUmbCR51zPHgGad2MBcK4yqOEqrfUA4U6fVs3Ioa38FiZzIFUAja/xpEvgzHnoR+HNvwsP8 0a/2OAKLo0slIrDPAzsUcLRGLALn4lJQzoZksL1oMfHB855yhReRdJMR4cweO5Zbyw1VSxqr FkyyCJiLwLY9DW7kzgU3ja0AQvIJFBpbM2vkuE50w68A26FAjCMbHq2JMw959Gw+gq1HdDdy EZYpTBsHdpc3sGemQugu/SlJywsxzjQQ/EYR4spncoWcOKE1cu1Kqr2YB65gNejiXfCwK9sd EyVAvVDSw65yRRFuitD5ZWy7rirHK7N0VJbr+lfUsugymKtw5+6NpH+FiaDOzfxAzL2xBd74 HExdFU3tyhBIx6Kivpip05vFNfN8wzzfsnDrinmLbmY283oBGTAPWoj12YIiCvLDkCnxNZQt BzXoWni/Ed5vRXynSw1h9alBgk7jSysSNaIwIT1ohK+5t1vuLYTib3tjniCEAtgAau/zOV4D r4X3G+H9VsR3ltaQqT+xXQE2scNx4MzYflpjrLEC6Es7kEGIGhKYqBV3gmiTjXNtDa32hVQi wIPBzQJ258y1Iz5EbCShBNleKBwraph0UKnhc2j+oQgMLO9C4sD12gYIOk2h4ktgttpJjNRN tEHThsmdKuhWdOE8IfdGCoXFkVC4KZyzzVa5vQJO5gF3uKJQop41mUB/CCV4Z0GDgoI79j2v aqhW2CHO4cDBqU0BAbTCmcM4jkJD25t0icKAZAaCHRQmaEthdSkkoMF7FJdlntxtS1ygO5xm LyjOMdpkJYI7xwrdvdI7Sjj5hKozdJVlvhdZ0v5soLzr27XsEa6G0bCIwKnfVRxSueHsNV1E vgQ6D/ypvM6+jiRgyDi1BbJifvWFsz8F1GcyDsZpTCHX3NsN93bL47pCVB2FyeFhzMnl4Jxz WcwUPHWpQtzYlkwgpEC3numxLZDETtbm1plJsNml74l3mRY5modwJgxDtXGfIYF9mQi0nLtd T2UvrsdHp0P2Bmd/JgdO1T2uxlT9C0z/oIJDlWSKGYeCzsCU0wpF29PIZo7rDLyq0gqE7QnC SW3mIU2HEdVse5KsS3ubao0P+QX1IcaIdbxzXwXvKhaPJRWH1g7BIGbDC6hmm/FQsg3Y+FIo xBZxwYVzmUvO70xUG5BwaWqg9H4hQdvLDJtWHae6tciekpZoODR3NgOHZomGA+3hErSKBelW EkoKRIthXdsCmwZP6SRsc7GVmTVbko1Vg5TD1Rw5QjZg9KhoOZ1UAhgFvjUZW4xhBHp16cAl KZAZs+nFMa8R/vm5C2Xmgwj2VFAPbtZWExBJVn0lECVRcNXPYOd98uDU9kGBqq56SgyZ3dD6 xcl7dMjg7Rc0y+iYb0go4TfrMP+pHxuUdWU/4005y7MlYJ/gf3i1zXGHHsdpehcvfxdXDPIl +ogcEPOAc6aKhnhZZnmI/yhgtZXn8eu//nZ29tMHRP79N8ruG5rh/34gSH5rhFGJHlGGVj9o HHi/3SzJfBaExS+LhIx2B3fbJF0x/mqfhmhJRrrgjNazlAyit0Ydkue5zHFcYjSo5qyrbB0n G2A+Gz/GwJDOgxkBCSyKN0uMPoJ7mlQ4RQoVVFIWOS6y9BnObIN4tYKXAijHcb5KNnH6/YSt cFHm2SvavbKVAEubZN6xdFFgiEGnGuqvV5o9gG93r3uJSZjXSZomBYa4rAom2n2MAuqYatbV /X50lXEi7RA9x+kW76UERCDZPKj1qHPLRKhRpErSRhvKh9UF0kTN9C7L0oN8Qgjf4hT0lX6H Qc9ZsiJXGbIV6iKIBkw7Q8vTU6EKfiPUXlbij/R6g788kQ1DNDthuJz89YRhc4KSoroUlS8J ZOcjzvHZN9Go31sNlpVRDfkpfWWrNGuJsKPrVZV3OFOGlbmD982aU8Tbdkp3NLPRz/AZNbIV 8USbzgpufuR617psvYXwP8bPuFqdQV07aZC0Xgs+POnWQbMgz2Q1cdLJPxq6+82J1kOVcYKX hp0+orsqw/pkASadkvpNvCfEkAlkIc0AXq2aqE5FgbAKXtuB9ZGjXNqwSeLb6D3Gm1VK8rpS Z9+g1eSKmNFIndT4AURJH6R6EelncpQYQ9QuGbZKcK7RRElgTg49TVt8IR8+u8oVP8dlnO9X lfEXKOo96mb82giNX9bVF1RVqdO1jsekeCJ6F1WtWCTMSWHYg6+2hEK/gwa+BIc+4B52LJMy +RNvFt3oZnH3utjE6/aoQZ/7W6ZhuF3f0TBVWHVEtDa1PFerPUza2wcrnGJ6xDIpuYPHBn/p kz7NcugVz0m2LXqQpNAoNgXu6YR2dTeSOyyeDaPe3mwIWm++RWpPdzbLle7UbUFSK4Cy6CMg o3+R0dP39eLeHqvX1w7bvf6PLc6h+nyBkkruXSzBnwpYgYGgOZ53V7UeUcihKmfrPidh6ktm y/e2fbtJnnHOJWp/4rp49lYQ0z+r2UMpSkDKc7/AV75f3OfZerHE0BsH9F9zHSEXYrTG5WO2 Esfmy22eQ39LX0knS9L4LsVw2RKm6EJhyTZlXGfqYYWsZvCmYljzoJtrUL8VHF3LNSbjAmZE cNqj56+gratO+inePJSPpMwwuhpvMYRT/zsMI6ETsFvdElz5kMdrELTpk0a/wfnsMMcTSri8 P6WvCvohopgFd/Rm0Nr2+xQXBWygVV/9k/U6AXt71bIcP0CSwNGgz+7arBb3SdqvMtRrG2+Y TWc24/FRsn5K8Rr2Hf2LuwomGNhvvgN3QbBsE6fonfVytkrTd7QNgp/f1UzeDY0zIA0DROnJ ynfy1vshYyKjIpVInSo/aJak0+idLFjWTD94MrGtqWR2hunUrhSoCPUs95hitaIIc0l5lqEs TjfxMrmD0sis9hyKmbUmzFTO6Tc467QXvV95RM36TWMkg79q1rLM3iM4s68qNjr2Oqv6TupM lnUSZOm9J3rmnULYqJn/qHA1vGWpB4zlzJFrxlR6Ud9lvmUsmYwgWY1D5llmkylHjaDvNSky 2dsKUuiweetAySiYcFcIVU+djJy+qGqjbi61VN+7d5SUWNHtzKMr1EN2r6JSi1HVM+OAy1xH WGLFieXtwzDjJtOy763KXmO0A3Sh/A3aKK/BZpcztHrGB4aTJ9ez3+cyu6NWcxz1EjWDq37m EGI9a8PMsB/7hoHiHGicMZq5M7QGxvuPI41nUImtXvSBKcaT69nvNe405xjPUi/yoBxjifWs D84xkYGif5jmrmbmHanM1jihNbPtSLVsD0wejlrLXDv47cVclyU/bEps2pBUqKyLdpBs4lUR 6RKoz7zYvM00fGSBe82ozTL1rBQHHe102+S1mkrnNt0IvM/Go7QG9+yYlptFKLmonLL3iH3H GVdgSET+n0fyO04gHTvFGeGA6X0/cdoDz3ee9RsPrYwsWZO3fBUwSSV81dL2GKp0anQm71lb G4myLrs+MJh3HkctM+//NcKcSISPmvvbv1iY3NZJkKXv+rJhdhxHLTM3fQYxM24pFZ1U/73E zLMhVJVU/XcVM8+W0sB0zw8w5tbG8awqNcDOjo/+C1BLAQIUABQAAAAIAONYVSVRcZdBMgwA AF5BAAALAAAAAAAAAAEAIAC2gQAAAABha0FXQVBJLnBhc1BLBQYAAAAAAQABADkAAABbDAAA AAA= --------------214FED21A0100088F15D14B3-- canopusOct 21, 1998, 5:11pm
Sample 2 uses an infinite loop, with aw_wait providing the time interval for the
callbacks to aw_query and the CellBegin and CellObject events. The Delphi sample program leaves it open how to break out of the loop. The best method is to make Button2 a 'Stop' button. But Button2 doesn't work in the usual way, giving you the false impression that the Aw.dll is preventing the window from regaining control, because as soon as you wait for the callback events to occur, the Sample 2 window no longer responds to your mouse and keyboard. Enabling the Form's Boolean Stop field, and placing a 'break' test inside the loop isn't enough. You must also put 'Application.ProcessMessages' in the loop ahead of the 'if Stop then break' test. Now pressing the Stop button stops the endless replaying of the 10 midi files. [View Quote] > Attached is the Delphi version of the AWAPI library, Build 7. The only > difference from Build 6 is that all PChar parameters have been changed > to const PChar parameters. I tested this Build 7 library earlier today, > using a version of Sample 2 that was written for Build 6. (Sample 2 > makes a lot of use of string parameters.) It seemed to work fine. > > ------------------------------------------------------------------------ > > Name: Build7AWAPI.zip > Build7AWAPI.zip Type: Zip Compressed Data (application/x-zip-compressed) > Encoding: base64 |