Occurs when server sends notices to an application.

Syntax:

type
  TDatabaseNoticeEvent = procedure (Sender: TEDBDatabase; Message: string) of object;
property OnNotice: TDatabaseNoticeEvent;

Description:

Write an OnNotice event handler to take application-specific actions immediately after server notice are sent. Verbosity level you can change by setting client_min_messages server parameter. Check EnterpriseDB help for details.

Example:

Example shows how to make simple log.

procedure TForm1.EDBDatabase1Notice(Sender: TEDBDatabase;
  Message: String);
begin
 logMemo.Lines.Append(DateTimeToStr(Now) + Trim(Message));
end;