SetMainObjectOID (TObserverController)
De Wiki1000
procedure setMainObjectOID(const iOID:TOID);
Cette méthode peut être utilisé pour positionné l'objet source de l'observeur.
Exemple :
Pour synchroniser un observateur (dsObject2) avec sa source (dsObject1) dans une interface de saisie en utilisant un invoker :
object testwfclassea: TL5FormContainer
.....
object DsObject1: TDsObject
ClassName = 'WFClasseA'
OrderBy = 'unCode'
end
object DataSource1: TDataSource
DataSet = DsObject1
end
object DsObject2: TDsObject
ClassName = 'TWFClasseAObserver'
MinBufferSize = 0
end
object DataSource2: TDataSource
DataSet = DsObject2
end
object Invoker1: TInvoker
ClassName = 'TWFClasseAObserver'
MethodName = 'setMainObjectOID'
ParamIns = <
item
Index = 0
ParamName = 'iOID'
ValueType = ivkvtBookMark
Control = DataSource1
end>
Triggers = <
item
Control = DsObject1
EventStyle = evsOnDataSetAfterScroll
end>
DataSource = DataSource2
FormAfterModal = False
FormSetOid = True
end
end
Voir aussi :
| Whos here now: Members 0 Guests 0 Bots & Crawlers 1 |