+
+- (AEArrayDataPointer)sendAEWithRequestedKeyForArray:(NSString*)key eventClass:(NSString*)eventClass eventID:(NSString*)eventID appPSN:(ProcessSerialNumber)psn
+{
+ //Add error checking...
+ AEEventClass eClass = *((unsigned long*)[eventClass UTF8String]);
+ AEEventID eID = *((unsigned long*)[eventID UTF8String]);
+
+ const char *sendString = [[NSString stringWithFormat:@"'----':obj { form:'prop', want:type('prop'), seld:type('%s'), from:'null'() }", [key UTF8String]] UTF8String];
+ AEArrayDataPointer result = nil;
+
+ AppleEvent sendEvent, replyEvent;
+ AEIdleUPP upp = NewAEIdleUPP(&MyAEIdleCallback);
+
+ DescType resultType;
+ Size resultSize, charResultSize;
+
+ AEBuildError buildError;
+ OSStatus err;
+ OSErr err2, err3;
+
+ //NSLog(@"_sendString: %s", sendString);
+
+ err = AEBuildAppleEvent(eClass, eID, typeProcessSerialNumber,(ProcessSerialNumber*)&psn, sizeof(ProcessSerialNumber), kAutoGenerateReturnID, 0, &sendEvent, &buildError, sendString);
+
+ //[self printCarbonDesc:&sendEvent];
+
+ if (err) {
+ NSLog(@"%d:%d at \"%@\"",(int)buildError.fError,buildError.fErrorPos,[sendString substringToIndex:buildError.fErrorPos]);
+ }
+
+ err = AESend(&sendEvent, &replyEvent, kAEWaitReply, kAENormalPriority, kNoTimeOut, upp, NULL);
+
+ //[self printCarbonDesc:&replyEvent];
+
+ if (err) {
+ NSLog(@"Send Error: %i",err);
+ } else {
+ SInt32 count, resultCount;
+
+ AECountItems(&replyEvent,&count);
+ result=malloc(sizeof(AEDesc)*count);
+ AEGetArray(&replyEvent, kAEDescArray, result, sizeof(AEDesc)*count, NULL, NULL, &resultCount);
+
+ free(result);
+ }
+
+ AEDisposeDesc(&sendEvent);
+ AEDisposeDesc(&replyEvent);
+
+ return result;
+}
+