Ну сторого говоря это не функция, а SQL-запрос и выполнять его нужно соответствующими средствами.
Можно примерно так сделать:
Код:
Q := TAdoQuery.Create(nil);
Q.Conneaction := AdoConnection1;
Q.SQL.Text := 'select SUM(REMONT) as SumRemont from ZAJVKA';
Q.Open;
Label1.Caption := Q['SumRemont'];