DCEF3. GetSourceProc

[Delphi_ProGer]

Сообщение от 3D Hunter

в процедуре CallbackGetSource обрамите код в критическую секцию trtlcriticalsection.А вызов Showmessage('Get source'); так же заключите в эту же секцию.

Не помогло

[Пепел Феникса]

а если применить прерывистое ожидание с Application.ProcessMessages(или как там) попробовать.

[Delphi_ProGer]

Пепел Феникса, оно там есть.

procedure CallbackGetSource(const src: ustring);
begin
  cs.Enter;
    SourceText:=src;
    //ShowMessage(SourceText);
  cs.Leave;
end;

//==============================================================================
function GetSource(const frame: ICefFrame): string;
var
  Time:DWord;
  SourceText:string;
begin
  SourceText:='';
  cs.Enter; 
  frame.GetSourceProc(CallbackGetSource);
  Application.ProcessMessages;
  Time:=GetTickCount;
  while (length(SourceText)=0) and ((GetTickCount-Time)<3000) do
    Application.ProcessMessages;
    Result:=SourceText;
  cs.Leave;
end;

Критическия секция создаеться в секции initialization. Запихнул код в критическую секцию по вишеуказаному совету(может я не так понял). Код всёравно выполняеться в колбэке после выхода из ГетСорс процедуры...

[FF117]

Удалось решить проблему? У меня возникла та же самая.