Exception raised when setting caption property in next form by user-defined procedure

Question

There are little bit problem. I have an exception like this one "Project project1 raised exception class 'External: SIGSEGV'. In file '.\include\control.inc' at line 3251: GetTextMethod := TMethod(@Self.GetTextBuf);

Code, which trigger exception:

procedure load_translation(language: string);
var 
 iit: integer;
begin  
 Form1.Caption:='Form 1';
 Form2.Caption:='Form 2';   //as well as Unit2.Form2.Caption:='Form 2';
end;

procedure TForm1.Image1Click(Sender: TObject);
begin
  language:='en';
  load_translation(language);
end; `

I have a second Form, which already designed (not in runtime), so Exception raised when setting Text property of TEdit in custom component (Lazarus) not applicable in my case.

debug output:

<-stack-list-arguments 1 0 0> ^done,stack-args=[frame={level="0",args=[{name="this",value="<error reading variable>"},{name="result",value="0x0"}]}] (gdb) <-stack-list-locals 1> ^done,locals=[{name="LEN",value="5987780"},{name="GETTEXTMETHOD",value="{CODE = 0xc, DATA = 0x3676c0}"},{name="GETTEXT",value="0x25cf9d8"},{name="RESULT",value="0x25cf9d8"}] (gdb)