var CDS :TClientdataset;
begin

  with tmywait.create1('234',selfscript) do
  begin
    showmessage('1');
  end;
  cds := tclientdataset.create(selfscript);
  try
    //if not readtable(
  finally
    cds.free
  end;

end.