You've already forked CEF4Delphi
mirror of
https://github.com/salvadordf/CEF4Delphi.git
synced 2025-06-12 22:07:39 +02:00
FireMonkey support added
- New Delphi package called CEF4Delphi_FMX.dpk that includes VCL and FMX components. - New FMX comopnents : TFMXChromium, TFMXBufferPanel and TFMXWorkScheduler. - New FMX demo : FMXExternalPumpBrowser - Improved WorkScheduler for VCL too. - New GlobalCEFApp.DisableWebSecurity property.
This commit is contained in:
@ -160,7 +160,7 @@ end;
|
||||
|
||||
procedure SimpleNodeSearch(const aDocument: ICefDomDocument);
|
||||
const
|
||||
NODE_ID = 'lst-ib'; // node found in google.com homepage
|
||||
NODE_ID = 'lst-ib'; // input box node found in google.com homepage
|
||||
var
|
||||
TempNode : ICefDomNode;
|
||||
begin
|
||||
@ -170,12 +170,18 @@ begin
|
||||
TempNode := aDocument.GetElementById(NODE_ID);
|
||||
|
||||
if (TempNode <> nil) then
|
||||
CefLog('CEF4Delphi', 1, CEF_LOG_SEVERITY_ERROR, NODE_ID + ' element name : ' + TempNode.Name);
|
||||
begin
|
||||
CefLog('CEF4Delphi', 1, CEF_LOG_SEVERITY_ERROR, NODE_ID + ' element name : ' + TempNode.Name);
|
||||
CefLog('CEF4Delphi', 1, CEF_LOG_SEVERITY_ERROR, NODE_ID + ' element value : ' + TempNode.GetValue);
|
||||
end;
|
||||
|
||||
TempNode := aDocument.GetFocusedNode;
|
||||
|
||||
if (TempNode <> nil) then
|
||||
CefLog('CEF4Delphi', 1, CEF_LOG_SEVERITY_ERROR, 'Focused element name : ' + TempNode.Name);
|
||||
begin
|
||||
CefLog('CEF4Delphi', 1, CEF_LOG_SEVERITY_ERROR, 'Focused element name : ' + TempNode.Name);
|
||||
CefLog('CEF4Delphi', 1, CEF_LOG_SEVERITY_ERROR, 'Focused element inner text : ' + TempNode.ElementInnerText);
|
||||
end;
|
||||
end;
|
||||
except
|
||||
on e : exception do
|
||||
|
Reference in New Issue
Block a user