AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

TWebbrowser in Delphi XE7 Starter

Ein Thema von Woodman · begonnen am 2. Sep 2015 · letzter Beitrag vom 3. Sep 2015
 
einbeliebigername

Registriert seit: 24. Aug 2004
140 Beiträge
 
Delphi XE8 Professional
 
#5

AW: TWebbrowser in Delphi XE7 Starter

  Alt 2. Sep 2015, 23:25
Hallo Woodman,

ich habe gerade keine XE7-Installation am laufen. Bei XE8 steht in System.Variants:
Delphi-Quellcode:
{.$DEFINE EMPTYPARAM_VAR}
{$IFDEF EMPTYPARAM_VAR}
var
  EmptyParam: OleVariant; // "Empty parameter" standard constant which can be
  {$EXTERNALSYM EmptyParam}  // passed as an optional parameter
{$ELSE}
function EmptyParam: OleVariant;// "Empty parameter" standard constant that
{$EXTERNALSYM EmptyParam}       // can be passed as an optional parameter
{$ENDIF}
Was hat sich der Dichter dabei bloß gedacht? Darüber sollte man mal diskutieren!

Und dein Bild
zeigt das EmptyParam bei dir einen Funktion ist. Der Fehler erscheint zu recht. Die Definition von EmptyParam ist für
Delphi-Quellcode:
procedure TWebBrowser.Navigate(const URL: WideString);
begin
  DefaultInterface.Navigate(URL, EmptyParam, EmptyParam, EmptyParam, EmptyParam);
end;
falsch. Bei den Starter-Versionen war glaube ich kein Sourcecode dabei. Schau doch trotzdem mal ob irgendwo in den XE7-Verzeichnissen eine System.Variants.pas liegt. Oder du machst daraus
Delphi-Quellcode:
procedure TWebBrowser.Navigate(const URL: WideString);
var
  MyEp: OleVariant;
begin
  MyEp:= EmptyParam;
  DefaultInterface.Navigate(URL, MyEp, MyEp, MyEp, MyEp);
end;
einbeliebigername.
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:43 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz