1{ Parsed from SecurityInterface.framework SFChooseIdentityPanel.h } 2 3 4{$ifdef TYPES} 5type 6 SFChooseIdentityPanelPtr = ^SFChooseIdentityPanel; 7{$endif} 8 9{$ifndef _SFCHOOSEIDENTITYPANEL_H_} 10{$ifdef CLASSES} 11 12type 13 SFChooseIdentityPanel = objcclass external (NSPanel) 14 private 15 {$if (defined(__LP64__))} 16 _reserved_SFChooseIdentityPanel: id; 17 {$else} 18 _panelMessage: NSTextField; 19 _identityPopup: NSPopUpButton; 20 _certificateView: SFCertificateView; 21 _cancelButton: NSButton; 22 _okButton: NSButton; 23 _indexOfChosenIdentity: cint; 24 _currCertRefDisplayed: SecCertificateRef; 25 _identities: NSArray; 26 _parentWindowForSheet: NSWindow; 27 _panel: NSWindow; 28 _clientDidEndSelector: SEL; 29 _clientDelegate: id; 30 _clientContextInfo: pointer; 31 _reserved_SFChooseIdentityPanel_: id; 32 {$endif} 33 public 34 class function sharedChooseIdentityPanel: SFChooseIdentityPanel; message 'sharedChooseIdentityPanel'; 35 function runModalForIdentities_message (identities: NSArray; message_: NSString): NSInteger; message 'runModalForIdentities:message:'; 36 procedure beginSheetForWindow_modalDelegate_didEndSelector_contextInfo_identities_message (docWindow: NSWindow; delegate: id; didEndSelector: SEL; contextInfo: pointer; identities: NSArray; message_: NSString); message 'beginSheetForWindow:modalDelegate:didEndSelector:contextInfo:identities:message:'; 37 function identity: SecIdentityRef; message 'identity'; 38 procedure setPolicies (policies: id); message 'setPolicies:'; 39 function policies: NSArray; message 'policies'; 40 procedure setDefaultButtonTitle (title: NSString); message 'setDefaultButtonTitle:'; 41 procedure setAlternateButtonTitle (title: NSString); message 'setAlternateButtonTitle:'; 42 procedure setShowsHelp (showsHelp: ObjCBOOL); message 'setShowsHelp:'; 43 function showsHelp: ObjCBOOL; message 'showsHelp'; 44 procedure setHelpAnchor (anchor: NSString); message 'setHelpAnchor:'; 45 function helpAnchor: NSString; message 'helpAnchor'; 46 procedure setInformativeText (informativeText: NSString); message 'setInformativeText:'; 47 function informativeText: NSString; message 'informativeText'; 48 procedure setDomain (domainString: NSString); message 'setDomain:'; 49 function domain: NSString; message 'domain'; 50 end; 51 52 53type 54 SFChooseIdentityPanelDelegate = objccategory external (NSObject) 55 function chooseIdentityPanelShowHelp (sender: SFChooseIdentityPanel): ObjCBOOL; message 'chooseIdentityPanelShowHelp:'; 56 end; 57{$endif} 58 59{$endif} 60