Error (LEADDlgWeb Control) example for Delphi
procedure TForm1.Button1Click(Sender: TObject);
begin
LEADDlgWeb1.EnableMethodErrors:= true;
try
LEADDlgWeb1.ShowPNGWebTunerDlg( Nil );
except
ShowMessage('Calling ShowPNGWebTunerDlg method failed'#10'Error No ' + IntToStr(LEADDlgWeb1.Error) + #10 + LEADDlgWeb1.ErrorMsg);
end;
end;