OmniThread: How to pass a TRect in SetParameter?

Question

In a program using the OmniThread library, how can I pass a TRect in SetParameter? Example:

procedure TestParameters(const ATask: IOmniTask);
begin
  // how can I access the TRect here?
end;

FTestTask := CreateTask(TestParameters, 'TestParameters')
               .MonitorWith(OTLMonitor)
               .SetParameter('FormRect', Self.ClientRect) // does not work
               .Run;

Is there a general rule how to use different types in SetParameter?

@DavidHeffernan Can you give me a code example? If you write an answer with a code example that works, I'll accept it as solution. — user1580348, Sep 23 '14 at 09:13
I cannot right now. There are lots in the OTL docs and examples. — David Heffernan, Sep 23 '14 at 09:15

score 4 · Accepted Answer · answered Sep 23 '14 at 09:19

Use TOmniValue.FromRecord<T> and TOmniValue.ToRecord<T>.

procedure TestParameters(const ATask: IOmniTask);
var
  formRect: TRect;
begin
  formRect := ATask.Param['FormRect'].ToRecord<TRect>;
end;

FTestTask := CreateTask(TestParameters, 'TestParameters')
               .MonitorWith(OTLMonitor)
               .SetParameter('FormRect', TOmniValue.FromRecord<TRect>(ClientRect))
               .Run;

OmniThread: How to pass a TRect in SetParameter?

1 Answers1

Linked