also can not get url
memo1.Lines.Add(chrom.Browser.MainFrame.Url);
Error Access Violation
Code: Select all
procedure TForm1.Button1Click(Sender: TObject);
var
chrom:tchromium;
begin
Chrom:=Tchromium.Create(cefwindowparent1);
GlobalCEFApp := TCefApplication.Create;
chrom.Initialized;
GlobalCEFApp.UserAgent:='Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:47.0) Gecko/20100101 Firefox/47.0';
chrom.CreateBrowser(cefwindowparent1);
chrom.Initialized;
GlobalCEFApp.WindowlessRenderingEnabled:=True;
PostMessage(Handle, CEF_AFTERCREATED, 0, 0);
chrom.LoadURL('https://yandex.ru');
memo1.Lines.Add(chrom.Browser.MainFrame.Url); //Access Violation
end;