Merhaba Turgut, 

Clomosy de AddNewProDateTime yok 

https://www.docs.clomosy.com/System_Library#Date_and_Time_Functions ;

Burada yer alanları kullanabilirsin

75. ve 76. satırda hatalar alıyorum :
//------------------------------------------------------------------

//  uManagerForm – Liste ve Filtre

//------------------------------------------------------------------

var

  FrmMgr          : TclForm;

  lstMeetings     : TclListView;

  dtStart, dtEnd : TclProDateTime;  

  cmbUser         : TclComboBox;

  btnFilter       : TclButton;

  qData           : TclSqlQuery;

/*--------------- personel listesini doldur ----------------------*/

void LoadUsers;

var

  q : TclSqlQuery;          // ← semikolon ZORUNLU

{

  q = Clomosy.DBSQLServerQueryWith(

        'SELECT ID, FullName FROM Users ORDER BY FullName');

  cmbUser.Clear;

    while (not q.EOF) {

    cmbUser.AddItem(q.FieldByName('FullName').AsString,

                    q.FieldByName('ID').AsString);

    q.Next;

  };

}

/*---------------  tarih + personel filtresi  --------------------*/

void ApplyFilter;

var

  sql : String;

  uid : String;

{

  sql =

    'SELECT M.ID as RECORD_GUID,' +

    '       U.FullName + '' - '' + M.CompanyName as MAIN_TEXT,' +

    '       CONVERT(nvarchar, M.MeetingDate, 104) + '' '' +' +

    '       CONVERT(nvarchar, M.MeetingDate,108) as SUB_TEXT ' +

    'FROM Meetings M ' +

    'LEFT JOIN Users U ON U.ID = M.UserID ' +

    'WHERE 1=1';

  /* Tarih aralığı */

  sql =

    sql + ' AND M.MeetingDate BETWEEN ' +

    QuotedStr(FormatDateTime('yyyy-MM-dd', dtStart.DateTime) + ' 00:00') +

    ' AND ' +

    QuotedStr(FormatDateTime('yyyy-MM-dd', dtEnd.DateTime) + ' 23:59');

  /* Personel filtresi */

  uid = cmbUser.GetValueIndex(cmbUser.ItemIndex);

  if uid <> '' {

    sql = sql + ' AND M.UserID = ' + uid;

  }

  try

    qData.SQL.Text = sql;

    qData.Open;

    lstMeetings.clLoadListViewDataFromDataset(qData);

  except

    ShowMessage('Sorgu hatası: ' + LastExceptionMessage);

  }   

} 

/*---------------   formu oluştur   ------------------------------*/

void CreateForm;

{

  FrmMgr = TclForm.Create(Self);

  FrmMgr.clSetCaption('Yönetici Paneli');

  dtStart = FrmMgr.AddNewProDateTime(FrmMgr,'dtStart');

  dtEnd   = FrmMgr.AddNewProDateTime(FrmMgr,'dtEnd');

  cmbUser = FrmMgr.AddNewComboBox(FrmMgr,'cmbUser');

  btnFilter = FrmMgr.AddNewButton(FrmMgr,'btnFilter','Uygula');

  FrmMgr.AddNewEvent(btnFilter,tbeOnClick,'ApplyFilter');

  lstMeetings = FrmMgr.AddNewListView(FrmMgr,'lstMeetings');

  lstMeetings.Align = alClient;

  /* SQL Server bağlantısı */

  qData = TclSqlQuery.Create(null);

  Clomosy.DBSQLServerConnect(

    'SQL Server',

    'TURGUT-KIR\\ATIKER',

    'sa',

    '1',

    'TURGUT25',

    1433);

  qData.Connection = Clomosy.DBSQLServerConnection;

  /* ilk açılışta bugünün verileri */

  dtStart.DateTime = Date;

  dtEnd.DateTime   = Date;

  LoadUsers;

  ApplyFilter;

  FrmMgr.Run;

}

/*---------------   RunUnit giriş noktası   ----------------------*/

void RunUnit;

{

  if (FrmMgr == null) {

    CreateForm;

  } else {

    FrmMgr.clShow;

  };

}