[EMAIL PROTECTED] wrote: > Send Delphi mailing list submissions to > [email protected] > > To subscribe or unsubscribe via the World Wide Web, visit > http://lists.elists.org/cgi-bin/mailman/listinfo/delphi > or, via email, send a message with subject or body 'help' to > [EMAIL PROTECTED] > > You can reach the person managing the list at > [EMAIL PROTECTED] > > When replying, please edit your Subject line so it is more specific > than "Re: Contents of Delphi digest..." > > > Today's Topics: > > 1. pascal scripting help (Chris Stebbing) > > > ---------------------------------------------------------------------- > > Message: 1 > Date: Sun, 02 Nov 2008 21:55:51 +1100 > From: Chris Stebbing <[EMAIL PROTECTED]> > Subject: pascal scripting help > To: Delphi List <[email protected]> > Message-ID: > <[EMAIL PROTECTED]> > > Content-Type: text/plain; charset="us-ascii" > > Hello All, > > I am totally confused and am hoping that someone, anyone, can help me. > > I have successfully imported and have access to the following class > from my script. > TIISScriptCondList=class(TStringList) > function getFScriptCondbyName(const Name:String):TScriptCond; > public > { Public declarations } > destructor Destroy; override; > property byName[const Name:String]:TScriptCond read > getFScriptCondbyName; default; > > function CreateNew(const Name:String):TScriptCond; > end;{TIISValveList} > I can access the following in my script sCondition.byName['Fred'] > and all is well. > > However, the following class will not work. I keep getting the error > "Unknown identifier 'BYUID'" when trying to do something > like sSensor.byuid[1001] > TSensorList = class (TDeviceList) > function GetFSensor(const Index: Integer): TmSensor; > function GetFSensorByUID(const UID: Integer): TmSensor; > function GetFByName(const Name:String): TmSensor; > public > property Sensor[const Index: Integer]: TmSensor read > GetFSensor{ write SetmSensor}; default; > property ByUID[const UID:integer]: TmSensor read GetFSensorByUID; > property ByName[const Name: string]: TmSensor read GetFByName; > end; > I am using the parser and have "use the unit at compile time" checked > for both. The import file created appears to be similar for both > classes. This one has me completely stumped. > > Any help would be greatly appreciated. > > Cheers, > Chris. > > > I imagine that you want something like sSensor := ByUid[1001]
Mick _______________________________________________ Delphi mailing list -> [email protected] http://lists.elists.org/cgi-bin/mailman/listinfo/delphi
