Recent

Author Topic: Project SRSProject raised exception class external : SIGSEGV  (Read 2122 times)

anaidsor84

  • Newbie
  • Posts: 3
Hi,

i am beginner in lazarus and fpcef3. I want develop a browser using Chromium Os. Thus i have installed Lazarus version 1.6.4 (Windows 10, 64 bit) and FPCEF3-3.2924.

Following is the code (i follow tutorial from a blog):

Code: Pascal  [Select][+][-]
  1. unit srsunit;
  2.  
  3. {$mode objfpc}{$H+}
  4.  
  5. interface
  6.  
  7. uses
  8.   Classes, SysUtils, FileUtil, cef3lcl, Forms, Controls, Graphics, Dialogs,
  9.   EditBtn, cef3types, cef3intf, cef3gui, cef3lib;
  10.  
  11. type
  12.  
  13.   { TForm1 }
  14.  
  15.   TForm1 = class(TForm)
  16.     Chromium: TChromium;
  17.     edtURL: TEditButton;
  18.     procedure ChromiumAddressChange(Sender: TObject;
  19.       const Browser: ICefBrowser; const Frame: ICefFrame; const url: ustring);
  20.     procedure ChromiumLoadEnd(Sender: TObject; const Browser: ICefBrowser;
  21.       const Frame: ICefFrame; httpStatusCode: Integer);
  22.     procedure edtURLButtonClick(Sender: TObject);
  23.     procedure FormCreate(Sender: TObject);
  24.   private
  25.     { private declarations }
  26.   public
  27.     { public declarations }
  28.   end;
  29.  
  30. var
  31.   Form1: TForm1;
  32.  
  33. implementation
  34.  
  35. {$R *.lfm}
  36.  
  37. { TForm1 }
  38.  
  39. procedure TForm1.FormCreate(Sender: TObject);
  40. begin
  41.   CefResourcesDirPath:='Resources';
  42.   CefLocalesDirPath:='Resources\locales';
  43.   CefInitDefault;
  44.   edtURL.Text:='http://lazplanet.blogspot.com';
  45. end;
  46.  
  47. procedure TForm1.ChromiumAddressChange(Sender: TObject;
  48.   const Browser: ICefBrowser; const Frame: ICefFrame; const url: ustring);
  49. begin
  50.  
  51. end;
  52.  
  53. procedure TForm1.ChromiumLoadEnd(Sender: TObject; const Browser: ICefBrowser;
  54.   const Frame: ICefFrame; httpStatusCode: Integer);
  55. begin
  56.    edtURL.Text:=UTF8Encode(Browser.MainFrame.Url);
  57. end;
  58.  
  59. procedure TForm1.edtURLButtonClick(Sender: TObject);
  60. begin
  61.      Chromium.Load(UTF8Decode(edtURL.Text));
  62. end;
  63.  
  64. end.
  65.                          


After i run (F9), i got the error Project SRSProject raised exception class external : SIGSEGV.

Please help me. Thank you.

anaidsor84

  • Newbie
  • Posts: 3
Re: Project SRSProject raised exception class external : SIGSEGV
« Reply #1 on: July 26, 2017, 08:17:45 am »
the message after run.

anaidsor84

  • Newbie
  • Posts: 3
Re: Project SRSProject raised exception class external : SIGSEGV
« Reply #2 on: July 26, 2017, 10:25:03 am »
i have tried disabled firewall and antivirus (McAfee and Avast). Still got same problem.

I also change debugger by using Alternative GDB -
 GDB version 7.7 for windows 64 bit (https://sourceforge.net/projects/lazarus/files/Lazarus%20Windows%2064%20bits/Alternative%20GDB/GDB%207.7/).

But failed.


 

TinyPortal © 2005-2018