Страница 1 из 1

Журнал регистрации

Добавлено: 07 окт 2013, 15:12
fcdk_pavel
Доброго времени суток!
Подскажите как и каким объектами сделать журнал регистрации для созданого проекта в Delphi
Что-то типа такого как в 1С(конечно-же намного попроще).Самое главное чтобы было в нем: кто и когда заходил в программу.

Re: Журнал регистрации

Добавлено: 08 окт 2013, 10:50
somewhere
Объявить запись, вида
[syntax=delphi]
TJournalRecord record
Username : String[32];
Time : TDateTime;
Action : String[64];
end;
[/syntax]
и создать типизированный файл из этих записей. При определенных событиях дополнять файл данными.

Re: Журнал регистрации

Добавлено: 09 окт 2013, 09:45
fcdk_pavel
а где именно объявить такую запись
TJournalRecord record
Username : String[32];
Time : TDateTime;
Action : String[64];
end;

Re: Журнал регистрации

Добавлено: 09 окт 2013, 10:41
Хыиуду
Видимо, в коде того модуля, который вызывается при запуске программы

Re: Журнал регистрации

Добавлено: 09 окт 2013, 10:52
Naeel Maqsudov
Да ну, какие модули, какие записи!
Прямо в файле проекта, прямо после BEGIN сделать

Код: Выделить всё

try
  Assign(f,'c:\logs\журнал.txt');
  Append(f);
  Writeln(f,<тут слепить текст, в т.ч. пользуясь GetEnv, чтобы получить имя домена, компьютера и пользователя>);
  Close(f);
finally
end;
ну, и переменную "f" объявить как "Text";

Re: Журнал регистрации

Добавлено: 09 окт 2013, 11:37
somewhere
Naeel Maqsudov, а если надо по пользователю отобрать события - парсить текст?

Re: Журнал регистрации

Добавлено: 09 окт 2013, 11:39
Naeel Maqsudov
Судя по вопросу - не надо :)
Хотите быть святее папы римского? ;)

Re: Журнал регистрации

Добавлено: 09 окт 2013, 12:39
somewhere
Если это журнал, а не лог - то по умолчанию предполагается структура. Записей то будет много и их будут просматривать.