Вопрос № 104964: Хочу написать выгонялку для 1с, подскажите как можно сделать, с чего начать. идея такая: получать список пользователей, которые на данный момент используют файл .md и убивать их процессы,но не знаю как реализовать.если можно с подробным объяснением....Вопрос № 104997: Здравствуйте уважаемые эксперты. Подскажите пожалуйста как подсчитать сумму строк вычисляемого поля в DbGrid? SQL запрос не подходит поскольку для расчёта
этого вычисляемого поля используется много условий, т.е. нужно как-то перебрать все ячейки грид...
Вопрос № 104.964
Хочу написать выгонялку для 1с, подскажите как можно сделать, с чего начать. идея такая: получать список пользователей, которые на данный момент используют файл .md и убивать их процессы,но не знаю как реализовать.если можно с подробным объяснением.
Отправлен: 10.10.2007, 15:53
Вопрос задал: Dreamofsky (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 10)
Отвечает: Dubrovin
Здравствуйте, Dreamofsky!
я это реализовываю так ))))
написал dll которая цыпляется к 1С при запуске
в длл работает таймер, который скажем каждые 5 сек проверяет файл двф (созданый при первом запуске) находящийся в Каталоге базы
а в файле все подключеный пользователи и те команды которые я хочу выполнить конкретно и у клиента
Ответ отправил: Dubrovin (статус: 1-ый класс)
Ответ отправлен: 10.10.2007, 16:23
Вопрос № 104.997
Здравствуйте уважаемые эксперты. Подскажите пожалуйста как подсчитать сумму строк вычисляемого поля в DbGrid? SQL запрос не подходит поскольку для расчёта этого вычисляемого поля используется много условий, т.е. нужно как-то перебрать все ячейки грида. Просто в интернете ничего такого не нашёл. Если можно по-подробнее.
Отправлен: 10.10.2007, 21:40
Вопрос задал: Romiros (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)
Отвечает: Igor_
Здравствуйте, Romiros!
Может быть имеется в виду сумма вычисляемого поля в DataSet, который отображается в гриде?
Нужно просто пройти по набору данных и посчитать сумму.
function TForm1.findSum(ds: TDataSet; fieldName: string): double;
var
res: double;
begin
res := 0;
ds.First;
while (not ds.Eof) do begin
res := res + ds.FieldByName(fieldName).AsFloat;
end;
result := res;
end;
Ответ отправил: Igor_ (статус: 4-ый класс)
Ответ отправлен: 11.10.2007, 10:34