ThreadBoard ArchivesSite FeaturesActiveworlds SupportHistoric Archives |
Build 20, Delphi? Anyone? (Sdk)
Build 20, Delphi? Anyone? // SdkgrimbleApr 4, 2001, 2:39pm
xelagApr 4, 2001, 5:43pm
Nightwalker:
If you have build 19 of Canopus' Delphi SDK, you need to change one thing and add 2 in the akAWAPI.pas change AW_BUILD = 19; to AW_BUILD = 20; Then, in the type AW_ATTRIBUTE, you need to look for these attributes: .... AW_WORLDLIST_NAME, AW_WORLDLIST_STATUS, AW_WORLDLIST_USERS, AW_EJECT_SESSION, AW_EJECT_DURATION, .... and add, after AW_WORLDLIST_USERS, AW_WORLDLIST_MORE: .... AW_WORLDLIST_NAME, AW_WORLDLIST_STATUS, AW_WORLDLIST_USERS, AW_WORLDLIST_MORE, AW_EJECT_SESSION, AW_EJECT_DURATION, .... As last addition, look for type AW_WORLD_STATES =( AW_WORLDSTATUS_UNKNOWN, AW_WORLDSTATUS_PUBLIC, AW_WORLDSTATUS_PRIVATE ); Add at the end AW_WORLDSTATUS_STOPPED (dont forget tp add a comma after AW_WORLDSTATUS_PRIVATE): type AW_WORLD_STATES =( AW_WORLDSTATUS_UNKNOWN, AW_WORLDSTATUS_PUBLIC, AW_WORLDSTATUS_PRIVATE, AW_WORLDSTATUS_STOPPED ); That's all as far as changes in the wrapper. If you use the world list, you have to change the way you handle the callback AW_CALLBACK_WORLD_LIST. Supposing your callback is called cbkWorldList(rc: Integer); procedure cbkWorldList(rc: Integer); var BtInstance, BtSession: Integer; NeedMore: Boolean; begin BtInstance := aw_instance; BtSession := aw_session; NeedMore := aw_bool(AW_WORLDLIST_MORE) <> 0; // here test NeedMore: if NeedMore then begin // more worlds to come // call again aw_world_list() for your BotInstance end else begin // all worlds have been received // process your world list end; end; Cheers, XelaG [View Quote] |