madExcept 4.0.20 report leak too early

delphi package - automated exception handling

madExcept 4.0.20 report leak too early

Postby KobyNudler » Tue Sep 11, 2018 9:55 am

since version madExcept 4.0.20 there is a lot of false report resource leak


look for code

the problem is under the vcl and got this

unit Unit1;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

function MessageBoxTimeOutW(hWnd: HWND; lpText: PWideChar; lpCaption: PWideChar;uType: UINT; wLanguageId: WORD; dwMilliseconds: DWORD): Integer; stdcall;
var
Form1: TForm1;
implementation
{$R *.dfm}
function MessageBoxTimeOutW; external user32 name 'MessageBoxTimeoutW';


procedure TForm1.Button1Click(Sender: TObject);
begin
MessageBoxTimeoutW(Application.handle,'Auto Load','Please wait', MB_OK, 0, 2500) ; //20
end;

end.


if no add visual appearnce work fine


while i do add , the crash exist

i said again , in the early version it was not exist .
Attachments
mad2.jpg
mad2.jpg (131.04 KiB) Viewed 31 times
mad1.jpg
mad1.jpg (203.38 KiB) Viewed 31 times
KobyNudler
 
Posts: 6
Joined: Sat Oct 08, 2016 1:55 pm

Return to madExcept

Who is online

Users browsing this forum: No registered users and 3 guests