From: SMTP%"ALLAN@otago.ac.nz" 30-JUL-1991 21:44:34.21 To: hagood@scri1.scri.fsu.edu CC: Subj: Benincosa Exts Date: Wed, 31 Jul 91 13:27 GMT +1200 From: Allan Udy Subject: Benincosa Exts To: hagood@scri1.scri.fsu.edu X-VMS-To: IN%"hagood@scri1.scri.fsu.edu" Benincosa GetFile(centerV;centerH;fType;fCreator; iconID;prompt;fileName; pathName;err) GetFile displays a modified SFGetFile dialog for opening a file, centered around the coordinates centerV and centerH. You may specify an optional type and/or creator for limiting the list of files to that type and/or creator. If the type or creator is % PutFile(centerV; centerH; iconID; prompt; SFPrompt; origName; fileName; pathName; err) PutFile displays a modified SFPutFile dialog for saving or creating a file, centered around the coordinates centerV and centerH. SetFInfo(theFile; fType; fCreator) err SetFInfo is a function which sets the file signature of theFile to the type and creator specified. This is primarily useful if you want to change the creator of a file, since the 4D Create document command will set the type. Any errors are returned in ModSTR(resType; resID; index; theStr; readOrWrite) err ModSTR is a function which reads or modifies a STR or STR# resource. Specify the type of the resource to read in resType. If resType is not "STR " (you must include the space at the end) or "STR#", ModSTR does nothing and returns an error code of 1 (ba (This file must be converted with BinHex 4.0) :%8*PEQPZBfpcB5"PH(3ZBh"d!&""3e4$8%08!*!%$6F!N!5NqJ%"1FF!!!ceJ%C hD(GSH@KkDRPkLAU+HkKDLS#+H*!!LACkJ)#VLAL(L)GSH)GRHhKRHRCiL)QUN!# (ClL(CiLDL@C`H(L*Qi#,J(Q3!*UkJ+ZUQT!!US#DQDU`UAU+USUAS*ZELiZ3!*! !S)Z3!*!!HC!!QU#DUj!!QhU,S*Z3!*!!UkQ,N!#DL)#!QiU!X+#3!*PiH(BJ!!) M4&9eD)GRH*!!Q)H3!(QCQC!!HCQD!*!$F!!!S!#3!`B`)e4@CPGfGhGSH@GQGiG kGNKB5TN)F)#B!)#R!!S!!*!!!!!)N!!!#3!!S!#3"JU%)`",,G`Kh3")h%Y+8*' dYB5BU8+rEpM4l12YG9lIdrAUD%belI`!8X00-aDA$TF#RaF5eaI$bDS(Q"Z0pKE #kh@qM3UGZ0qCZ)3m6aE$mRcT'l!4@I,p6IAj3QefF+NfPfXLA)RG(ikqKHN-QdY (Xl@YPbCh4dECe*[Lke$9[8QlIL[BQp@qpfbbTfrL`lrqF+kGRAHi`X#j`TX8Dh% Tmf(F'3PAj&#[K$BA@ihe[S%3ZFqTf2RH[TICS3MDHEeHRQkUR#bLT`XjG1&M#ca i5V,B3X2Pp#("UV'02QH$)rfNEcpY63SeA3KIHl9eZ"pbGaJEG2AbiD[9di4!q*e C3e9Y'bB@1SS99KlKRpk&cM4lV3K'[[GVDe*1FDAA!XN!dNfdZ%S+68G#U+NX293 d#NjmE9iE$&DV$Le1AI@Z9M`PkAk1E946Z0M`SI#4D,$bpA1ckRA!CKjGi!VTS&A S#[DREb%1q[jHcRi@$mrDfX+l-bp95K*QI*Le10&&YSX#fXYID`NG$E8V$(K2ZFD XP@AlXfKm-U9JlE,Y6B-'HcTfmUHr0kX0MV+8,,9LMNbP8l%hN3pUAh!YUcYlQJ- pC!ceYlkQ9'aS3mI[Vm@U4jIF6D96h`-Hp,YDR[LfUafXV-bl6$hGrQIkA'(8l%8 R'`TFR-jTZ-U6JK[$4$FUMBbcUmNbj'eX!JZa1k--HKme"3))!dT!CX3GK%*!)lm P#a[3+8Dqij06E91a3V,MN`M91aF!8KChhZfF&dFXCfGifkZEbG#&K(%hBT!!3Ej qR3-dmlHD2C,C$B9AKYT!ED`NdKXRNdC8@#G@%Z3QZMD8-*J31YJ#@ZPe`TPBi1f QjXZ!%+#b!5Z!GAbkl-r3CJI5mbpRdDi"h28(+[%dHbPl(@DP4AcXll@$Z,QkhZ$ HB@i%R4H1*2G1EeG5C25"*k[%RY2EfX,#,"f-VSh914XI5K'S3KbdA!Y%-Q1hc*I F#J&MYG)!ci,d6qSdE@``[XA'idHRbDUKB4AFU90bTZERIB`FUeKJlRKeRT8Y(Td qX+H9fXVI*ql,UjRj`c(FUCJT3"eVSpP3KQG2@DPKQYMjPlK160E(c!aRa,Bb`RC hN!$CM,kmRi4h!j@Cp([HpYSVR(a-M%m$Kj1*&ZH(aH&i1*5La+A"LCmVBTp1MNq &LC',TY0ZUI""rDC',aF,ql(aGP%!QmZYP&`kA"aI$f8@6`X@INj"&X6Jhq4[FMK j1,VEH,&b-M6DDILiXA"Tm$La8DH4&i02)a3D8DGU,&Dk%EBA@&Z)4VIb`(GKmB4 3lprqqc9BFSEU+-I,Nd+VmXRDC8lpc)PTJ*DBL3fdILQp@0)QAFcckRR'qM[*Y6S $EGk@l[aI4Pc2S#q6p1de0lGdGHGJ#EC"UiUCS'2!!P)C%[@!P[QMEQE68h&h#a[ [GP-BZ5CfFEri[%m@1'`m*jY#RiZ6ZE`6lY+2'iR%h2$iQ,1a2"&T0&9U&(ELcc* Tj#V0kEqfFrKK#Yp&fbEcaM,(frmi9Q[Kr+mkAU4I6eAhaZMkH4$"Qd04Um3fIp+ Ui-RQ4Tp9M`b+P#UP*a$&Tr[LdH%Va,@m`EQ,HcXjaPDibYr(UVAPXj@r2CbYeTb Y3+lX"AX-dGV44fYDTI@BpEcDMe[1S%@(R2@6,5'SC(Y+JpT9$c#'jS3h14$C -D,$fY9,NIjpI*MK8IdREc2iiTVh8fPRmH,`3)H4F8Zebi5*frRFEEl["`-'rfq# 0Dr8'YHbQ$%8B(fX+rGhie*rV1CBc$[8ipl1,#Z-#Te19'S@X@&E9[9fehfBCm3j imrlfpc8jar@K(h[UCXE'VVMkd+b&KY0RrI'`E[KeRTdUR8Tq`L%UR6YhJlLI1hB qer)QpAj"jraDlCLQ2KaEQdP(SU+fe`iUrS&R'jLqc,)Ck&TJMB6CGlJ4T"jAhXU M+ZFq0ZG[qr(dL[8@JHAGLeQ(D!3Xlf9ME(P9!9F[ZbF@DpT2%M4aMIRA[FidTI4 (L4KQVfr6SD[@mNl1id+'SQIA""BFU-cdcqk#,r+K9FUSNNYF",QK+DZfP9QfUB1 eJ!bd3-jHeKjZ81VI0(6[Qbp*YDdRNhN4Z3!MREX0"X*NkkPl1k[Vql#FM"'FHCq F!fj1$Fa1SD!dLCJAYV8jf0XdkYTc*UFmmlqhI$+NSlRl@e6b4N%@Uq#NER$mmmq 3!)9DSbXlI%&K(M$,(XVY'eE@%YKTp[`UG2LiX@*&4'r#,*Ta8mI&TIXN#N(la5$ BLM9F%SCKGJ!R@!*r$-qhUq5EFYCJa6pTD4T!GQYc2pdT`H%rm"farX#`5lE[lqG RA@$Flfmfpr1#8rM0kYAX6kAka%&D6iX,[1%2C(VS%4kR8j-EP4T2RQ6P6VieIVZ lK&kARe1[[FfkKC`@-G6'VlAZiD[dr2UG3M(cB5Uc0VCm,U(p@fK*#icCfrYI-RF EGGpZEbq`Y`,kY(h#a4@ap`4MRAbEZT8Slq@fCVVJ%pl-qfS8&M3Jh4d%&2(38N[ 8SFQ!CHRhTh4lA2&h3)Y(hXclMDB@klkk[VZ+++G[0$,Pb6T'kINIcp(cVRXG[,l bESp#i&a'Mk-bPSTbMd8cYlAV*f$lZE5d-ZE5lH@06eZ&e96ZMRqQfpm3S"GefV5 K@%8Q5V6$HQhcGEQIJA-Dh'%@!pj%@ZKJ#4RVh)&")cf8NCdK)cfNNCk55-[8NC! !KqX&AIV+[l8+U)qm064iRH8Y(i0(+3b`%-V9CPc"m*i"p+3`(28`(ak1q2XbILd $@KJ"N[!SI8##p"XJXri%3@d86Cl#%m"D%k1q"84E3`&LAQZL@XD%FXpMeA2mr4b YjQhZ%H(9(b@TqB#I22`1Fp*UTk'H`qD4MSr(JZC+0(U[iEfI6K$PA&hSFXA0I"h Nh3mDC5d2(,+D'3M+I5A0EP5DA5rld1JERMrKIEq!-eP+BMiZQp[$GkmH'rMeEpq 'p&qI$HNk!rdVeSf"(Mhi`E1J09XSB&9ZSj!![rJ$RrJ(+cEiP,JB[%*II`kd1"' qVP%I(&U(+!rT0ai',`-Qq)rpF#Ihb*h@4`q2LjkM+6$rf(8!A@hm2j!!#rK)Aq@ 'K$mdE#+)VDUaKLe@6bbNp,'XSDf0X5,9S12S3kNJ"NIj442CMGq2K$a2&N@rP%8 p&jJ'l%!M%Hdi',5bFA)hQbL8%c@B%d`i"DCL#4hFi&1NHmQ2N8r"amPBq1p43UG mm$%bH&XM&qYGiZe%+Zk[-+q%AH8H6"#&apj8)9Ri(D2[9F4mc(cL#(%%1))I+#+ Ya"$%%6A1#0Fqm%5&343VQB'pP%&(Gi'UfId,DUJUlec%&$!,4md5+Zi[Y*[Sk!k d6DR('mD,98UR(erN(eB)8[c'iC`ddGHKCj!!p+bF*UXRq*V*Hpc4Nh1I$REIrV9 HhU[EeAYQZN[Z$rC!4()JHP$je`pP+iILE9`QB+9Xf,T@cc@eE$8kUrLpUdH+R"l f!dhq#Y!'pD*%r%iiV*aIfH8jeBdVY9J@"2p9Cl["366KK40RJdURJUC,6`9cZm% hK3UP2&SH5iH*fH,3r3q(LlAZ1VaD&HiH*pALd,CjH,3XAdH,YDK[SCfX"eH,YG* hH,2pTZm@IkcSm@HrMaCr5F2%rjiZeC[dmAak$VSYRfc`m@IA2$aI'19MXmAR3dT rVMdBHj!!pH0&(MRG34(1!Ml`%@RAk-+q(lBIUjE'mbh9TeqX2CDSpRJ!dj)0&2C 2)ri`%r*)QMfHX42rQ(bBHl$eC4-Vm*2r@(kN2Y,$ri1[TLkqP![VBIUFRAkmDf@ krPN8p*jGI!iciGGK`8djBFDIZF"B96b1(M+qK&2bcp*iiGK38qcZ#9cNl[PVGhb eZlq"[rmN0YSl1V`!*fFDXK(,j`UiGfKG9`qSFb3%IC8MSG&51KdJL"2@j`YJ2hC mZ%)qXKFi@q(Td+YD6mB$*)RYH`KmL9#jRq[EqA8U$Aec!'HKErK)CT,)bQYr+)C Al%'%Hhr!3c6q%#6p+Jb1SN8BIHD-2r`5H`T+Ger@!c1)a&$6I9!CeL-43q9ji$2 k+'+r8J-l+KM6lm"QEC,rlE@6pPV,`!Hb3*eY[H@,2m0)N!!$RJ9qBaq)GCHDbme Nr@6e!a#0EmaLkC!!FB'&$J#3"'1`,$!!!3!03Q9ZD@jMEh0K,Q9iG!%!N!-)8%9 B9$4%69LM)3K9Sb(-C3!!ea,SH3!#!!!C`3#3"JcY!*!%bFi!!!: