prabhakar_thummala
27-Oct-2006, 06:53 PM
Hi,
I have problem with [sndUseOnlyActiveWindow]. When an exception occurs it goes thru the ExceptionNotify event (shown below). It is supposed to send the screenshot for the ActiveWindow only. But it is sending the complete screenshot.
Could somebody please help?
(I am using Eurekalog Ver 5.1.10)
procedure TForm1.EurekaLog1ExceptionNotify(
EurekaExceptionRecord: TEurekaExceptionRecord; var Handled: Boolean);
begin
with EurekaExceptionRecord.CurrentModuleOptions do
begin
ExceptionDialogOptions := [];
CommonSendOptions := [];
if CheckBox1.Checked then
begin
CommonSendOptions := CommonSendOptions + [sndSendScreenshot];
if CheckBox2.Checked then
CommonSendOptions := CommonSendOptions + [sndUseOnlyActiveWindow];
end;
EMailSendMode := esmSMTPClient;
SMTPHost := 'valid host';
SMTPFrom := 'valid text';
EMailAddresses := 'valid email ID';
EMailSubject := 'Test';
end;
end;
Thanks in advance,
Prabhakar Thummala.
I have problem with [sndUseOnlyActiveWindow]. When an exception occurs it goes thru the ExceptionNotify event (shown below). It is supposed to send the screenshot for the ActiveWindow only. But it is sending the complete screenshot.
Could somebody please help?
(I am using Eurekalog Ver 5.1.10)
procedure TForm1.EurekaLog1ExceptionNotify(
EurekaExceptionRecord: TEurekaExceptionRecord; var Handled: Boolean);
begin
with EurekaExceptionRecord.CurrentModuleOptions do
begin
ExceptionDialogOptions := [];
CommonSendOptions := [];
if CheckBox1.Checked then
begin
CommonSendOptions := CommonSendOptions + [sndSendScreenshot];
if CheckBox2.Checked then
CommonSendOptions := CommonSendOptions + [sndUseOnlyActiveWindow];
end;
EMailSendMode := esmSMTPClient;
SMTPHost := 'valid host';
SMTPFrom := 'valid text';
EMailAddresses := 'valid email ID';
EMailSubject := 'Test';
end;
end;
Thanks in advance,
Prabhakar Thummala.