Запись в журнал событий в Delphi

Question

Как получить приложение для записи отладочного текста в окно журнала событий в Delphi IDE (Borland Developer Studio 2006)?

Как изменить цвет текста?

Answer 1

OutputDebugString ( 'Hello, World');

Я думаю, что вам может понадобиться добавить Windows в ваш список "использования". Не уверен на 100% в этом ...

Насколько мне известно, цвет текста не может быть изменен: это особенность среды IDE Delphi, которая добавляет в это окно дополнительные сообщения для запуска / остановки потока, загрузки / выгрузки DLL, со своим собственным конкретным цветом.

Answer 2

Да, вы можете использовать OutputDebugString.

Если вы хотите получить более мощные функции для контроля и управления выводом отладки, такие как фильтр выделения, вам следует использовать DebugView .

Примечание. DebugView не может записать журнал отладки при запуске приложения в Delphi IDE.

Answer 3

procedure Write2EventLog(Source,Msg: string);
var h: THandle;
    ss: array [0..0] of pchar;
begin
    ss[0] := pchar(Msg);
    h := RegisterEventSource(nil,  // uses local computer
             pchar(Source));          // source name
    if h <> 0 then
      ReportEvent(h,           // event log handle
            EVENTLOG_ERROR_TYPE,  // event type
            0,                    // category zero
            0,        // event identifier
            nil,                 // no user security identifier
            1,                    // one substitution string
            0,                    // no data
            @ss,     // pointer to string array
            nil);                // pointer to data
    DeregisterEventSource(h);
end;

Answer 4

Помимо сказанного (т. Е. OutputDebugString и использования DebugView вместо встроенного средства просмотра журнала), вы можете изменить цвет сообщений в представлении журнала с помощью параметров. Самый простой способ сделать это - щелкнуть правой кнопкой мыши на панели журнала и выбрать «Свойства» в контекстном меню. На появившейся вкладке вы можете установить цвет для «Выводить строки отладки» в разделе «Цвета». Очевидно, что это изменит цвет всех сообщений, отправляемых через OutputDebugString - это не позволит индивидуальную окраску. Для этого вам лучше использовать фильтры DebugView.