wince, qt: remove EventTrace method

git-svn-id: trunk@29829 -
This commit is contained in:
paul 2011-03-14 02:38:46 +00:00
parent dd4583c8bf
commit 1f7c7a9d74
2 changed files with 0 additions and 24 deletions

View File

@ -197,7 +197,6 @@ type
pTRect = ^TRect;
procedure EventTrace(message : string; data : pointer);
function HwndFromWidgetH(const WidgetH: QWidgetH): HWND;
function DTFlagsToQtFlags(const Flags: Cardinal): Integer;
function GetQtVersion: String;
@ -302,11 +301,6 @@ begin
Result := Result or QtTextExpandTabs;
end;
procedure EventTrace(message: string; data: pointer);
begin
end;
function QtObjectFromWidgetH(const WidgetH: QWidgetH): TQtWidget;
var
V: QVariantH;

View File

@ -53,7 +53,6 @@ type
function WM_To_String(WM_Message: Integer): string;
function WindowPosFlagsToString(Flags: UINT): string;
procedure EventTrace(Message: String; Data: TObject);
procedure AssertEx(const Message: String; const PassErr: Boolean;
const Severity: Byte);
procedure AssertEx(const PassErr: Boolean; const Message: String);
@ -373,23 +372,6 @@ begin
Result := FlagsStr;
end;
{------------------------------------------------------------------------------
Procedure: EventTrace
Params: Message - Event name
Data - Object which fired this event
Returns: Nothing
Displays a trace about an event
------------------------------------------------------------------------------}
procedure EventTrace(Message: String; Data: TObject);
Begin
If Data = Nil Then
//DebugLn(Format('Trace:Event [%S] fired', [Message]))
Else
//DebugLn(Format('Trace:Event [%S] fired for %S',[Message, Data.Classname]));
End;
{------------------------------------------------------------------------------
Function: AssertEx
Params: Message - Message sent