Если убрать выделенную строку, то, при использовании публичной переменной, будет вылетать ошибка: Access Violation at adress..... Проблема в том, что данная процедура заново загружает все переменные с текстового файла, которые уже были загружены на 1-й форме.
Код:
procedure TForm2.FormShow(Sender: TObject);
begin
<<<<<<<<<<<<<<<<<<<<
Core:=TCore.Create; <
<<<<<<<<<<<<<<<<<<<<
if Core.Conf.MaxMem='-Xmx256m' then ComboBox1.ItemIndex:=0
else if Core.Conf.MaxMem='-Xmx512m' then ComboBox1.ItemIndex:=1
else if Core.Conf.MaxMem='-Xmx1g' then ComboBox1.ItemIndex:=2
else if Core.Conf.MaxMem='-Xmx2g' then ComboBox1.ItemIndex:=3
else if Core.Conf.MaxMem='-Xmx4g' then ComboBox1.ItemIndex:=4;
end;