| 12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455 |
- {
- Copyright 2005-2006 Log4Delphi Project
- Licensed under the Apache License, Version 2.0 (the "License");
- you may not use this file except in compliance with the License.
- You may obtain a copy of the License at
- http://www.apache.org/licenses/LICENSE-2.0
- Unless required by applicable law or agreed to in writing, software
- distributed under the License is distributed on an "AS IS" BASIS,
- WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
- See the License for the specific language governing permissions and
- limitations under the License.
- }
- unit TIBXLogInserterUnit;
- interface
- uses
- TDBLogInserterUnit, TLoggingEventUnit;
- type
- TIBXLogInserter = class (TDBLogInserter)
- protected
- public
- constructor Create(ASQL : String);
- destructor Destroy; Override;
- procedure Insert(AEvent : TLoggingEvent); Override;
- end;
- implementation
- uses
- SysUtils, TLogLogUnit;
- constructor TIBXLogInserter.Create( ASQL : String);
- begin
- inherited Create;
- end;
- destructor TIBXLogInserter.Destroy;
- begin
- end;
- procedure TIBXLogInserter.Insert(AEvent : TLoggingEvent);
- begin
- end;
- end.
-
|