Event handler

Du skal bruge disse 2 tegn : \'\'

Der bliver tjekket om teksten der står i comboboxen er forskellig fra ingenting.

Det må være det sidste af de 2 tegn, som der skal være 2 af.

Det er korrekt. Du får dine point... men har du lyst til at hjælpe mig lidt mere... jeg er sådan lidt ny i det har Delphi halløj.

Under samme event handler.

if URLComboBox.Text <> \'`\' then
  HTML.RequestDoc(URLComboBox.Text);
end;

opstår der følgende fejl:
\"Undeclared identifier: \'RequestDoc\'

og....

under min .pas fil får jeg følgende fejl:

WebBrows.dpr(5): Could not compile used unit \'WebBrws.pas\'

Kodelinien er:
Users
forms
WebBrwsU in \'WebBrwsU.pas\';

Håber det giver noget mening:)

På forhånd takt

Er du sikker på at du skal have ` mellem \' og \', som det står bliver if sætningen udført selvom text er tom.

Nu ved jeg jo ikke hvor du har kopieret det fra, men har du placeret en HTML komponent på din form ???

Den anden fejl som du får er fordi du har fået den første fejl og Delphi kan derfor ikke kompilere hele unit\'en

Ok - en dum syntax fejl fra min side. Det skal selvfølgelig se sådan ud:

if URLComboBox.Text <> \'\' then
  HTML.RequestDoc(URLComboBox.Text);
end;

Men jeg får stadig den samme fejl med den Undeclared identifier: \'RequestDoc\'

og du har placeret en HTML komponent på din form ??

Hvilken Delphi version bruger du ?

Undskyld der er en browser jeg er igang med. og jeg bruger Delphi 5

Jeg tager udgangspunkt i fgl. artikel:
http://www.kaposnet.hu/books/tysdelphi4/apc/apc.htm

Jeg bruger kun delphi 4 og virker det, jeg har/kan ikke prøve det i delphi 5, men du kunne prøve følgende.

Hvis du stiller dig lige efter L i HTML og trykker . (punktum) , så vil der efter 1 sekund komme en liste frem med de metoder og properties der er til komponenten. Nu kan du prøve at se om der er en metode som ligner den som du har i eksemplet.

Men altså, jeg kan ikke hjælpe dig med Delphi 5. (Det er da også for dårligt !!)

ikke just - men hvis jeg stiller Cursoren foran HTML kommer følgende popper fgl. frem:

Var
TWebMain.HTML - WebBrwsU.pas(14)

Kunne det måske hjælpe :)

Ellers mange tak fordi du gider at hjælpe.

En anden ting du kunne prøve er at øverst i uniten er der en interface del. I den skal HTML være defineret (I delphi 4 er det som en THTML) Hvis du stiller dig på den (THTML) og trykker F1 skulle du gerne få hjælp frem om den, det kan være at det kan hjælpe.

Torben

HTML er defineret HTML: TWebBrowser;

Jeg sender lige hele smøren.
//Start--------------------------------

unit WebBrwsU;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  OleCtrls, SHDocVw, ComCtrls, StdCtrls, ExtCtrls;

type
  TWebMain = class(TForm)
    Panel1: TPanel;
    URLComboBox: TComboBox;
    StatusBar: TStatusBar;
    HTML: TWebBrowser;
    procedure URLComboBoxClick(Sender: TObject);
    procedure URLComboBoxKeyPress(Sender: TObject; var Key: Char);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  WebMain: TWebMain;

implementation

{$R *.DFM}

procedure TWebMain.URLComboBoxClick(Sender: TObject);
begin
if URLComboBox.Text <> \'\' then
  HTML.RequestDoc(URLComboBox.Text);
end;

procedure TWebMain.URLComboBoxKeyPress(Sender: TObject; var Key: Char);
begin
if Key = Char(VK_RETURN) then begin
  Key := #0;
  if URLComboBox.Text = \'\' then
    Exit;
  URLComboBoxClick(Sender);
end;
end;

end.

Problemmet må være at du bruger version 5 og det du arbejder efter er til version 4 (dit link). Kan du ikke finde noget i online hjælpen til delphi 5 om TWebBrowser.