EnterKey activate ?

[toms]

Bei mir funktioniert's bestens. Kleines Demo im Anhang.

Edit 14.11.2008: 1-2 Sachen korrigiert.

[Mini-Programmierer]

Ich konnte das Projekt nicht compilieren
aber in Demo sehe ich leider keine label !
Bei mir hat auch funktioniert aber wenn ich Label auf Tabsheet anlege, dann funktioniert nicht mehr

mfg

[toms]

Zitat:

Zitat von Mini-Programmierer

Ich konnte das Projekt nicht compilieren

:glaskugel: Fehlermeldung? ...

Zitat:

Zitat von Mini-Programmierer

aber in Demo sehe ich leider keine label !

Im Tabsheet3 hat's einen TLabel

[Mini-Programmierer]

Ich wollte das Projekt comipiere, dann erscheint eine Fehlermeldung:
ExceptionLog.duc nicht gefunden

Sonst vermute ich auch, dass das Problem an andere Sachen in mein Programm liegt
Ich wurde alle Webbrowser in eine separate Form anlegen. Und schon das Problem behoben. Zum glück die Webbrowsers müssen nicht unbedingt in die Mainform sein.
mfg

[toms]

Zitat:

Zitat von Mini-Programmierer

Ich wollte das Projekt comipiere, dann erscheint eine Fehlermeldung:
ExceptionLog.duc nicht gefunden

Entferne einfach die Unit. Dann geht's.

[Mini-Programmierer]

Es funktioniert jetzt
In OnCreate muss aber nicht Webbrowser1 sondern der GetCurrentWB

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
// FCurrentWB := Webbrowser1;
 FCurrentWB := GetCurrentWB;

Es gibt aber noch ein Problem: Wenn ich ein neues tabsheet (4. Tabsheet) erstelle ohne drauf einen Wennrowser
anzulegen, dann erscheint eine Fehlermeldung.



Update
Gelöst mit dem Code :

Delphi-Quellcode:

procedure TForm1.PageControl1Change(Sender: TObject);
begin
if (PageControl1.ActivePage=TabSheet1) or
    (PageControl1.ActivePage=TabSheet2) or
    (PageControl1.ActivePage=TabSheet3) then
begin
FCurrentWB := GetCurrentWB;
end;
end;

Dann erscheint keine Fehlermeldung, wenn ich das Tabsheet4 aufrufe :firejump:

Noch ein kleines Problem :
In Form2 habe ich auch einen Webbrowser und wollte ich genauso drauf die Enter-Taste aktivieren
geht aber nicht. Vermutlich ist die Form1

Vielen Dank Toms für Deine Hilfe
mfg

[toms]

Hallo, ich nehme an, du verwendest nun den TEmbeddedWB?