I wish to create a query at runtime.  When the program attempt to open the query, the
error "Invalid session name sesTest" occurs.  I reckon the the session exists, but
ElevateDB disagrees.  The session name is copied from an existing query.

Does anyone have any idea of what I am doing wrong?

Thank you . .

Richard Harding . . .

var
  ChildQuery:      TQuery;
  ChildDataSource: TDataSource;

begin
  ChildDataSource := TDataSource.Create(Self);
  ChildDataSource.Name := 'ChildDataSource' + IntToStr(node.Level + 1);
  ChildQuery := TQuery.Create(Self);
  ChildDataSource.DataSet := ChildQuery;

  with ChildQuery do
  begin
     ChildQuery.SQL.Assign(dmData.qyChildNodes.SQL);
     ChildQuery.Params.Assign(dmData.qyChildNodes.Params);
     ChildQuery.SessionName := dmData.qyChildNodes.SessionName;  // Session name assigned
from existing query.
     ChildQuery.DatabaseName := dmData.qyChildNodes.DatabaseName;
     if LastDS = nil
        then ChildQuery.DataSource := dmData.dsChildNodes
        else ChildQuery.DataSource := LastDS;
     ChildQuery.Active := true;
  end;

  LastDS := ChildDataSource;
end;

Richard


I presume this is a simple typo

ChildQuery := TQuery.Create(Self);


Roy Lambert

Richard,

<< I wish to create a query at runtime.  When the program attempt to open
the query, the error "Invalid session name sesTest" occurs.  I reckon the
the session exists, but ElevateDB disagrees.  The session name is copied
from an existing query. >>

See Roy's response - it looks like you're creating a TQuery, not a
TEDBQuery.

--
Tim Young
Elevate Software
www.elevatesoft.com

Thanks Roy & Tim.

I spent a LONG time trying to work this out . . .

Richard . . .

Richard


Sometimes you're just to close to the problem. Next time walk at least 20ft away from the screen and then look


Roy Lambert