Hiho,
ich bin´s nochmal! Mein Problem (bzw. Code)

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var url : string;

    begin
    if edit1.text = '' then edit1.text := 'URL eintragen!!!'
    setfocus;

    else

    url := '' + Edit1.Text;
    WebBrowser1.Navigate(url);
    setfocus;

    end;

ich möchte, dass wenn ich keine URL in Edit1 eingegeben habe, dass dort der Cursor mit hilfe von "setfocus" hineingesetzt wird!!!
Aber ich darf ja kein ";" vor else stehen haben! Wie mach ich das dann am besten ?!?
danke

Trouble_Maker
[Edit=FuckRacism] Delphi-Syntax hinzugefügt. MfG Roman[/Edit]

Ich würde nach if edit1.text = '' then edit1.text := 'URL eintragen!!!' ne 2. If-Anweisung machen!

Hallo,

entweder:

markieren

Delphi-Quellcode:

if then
Edit1.SetFocus
else //irgendwas

oder:

markieren

Delphi-Quellcode:

if then
begin
  Edit1.SetFocus;
end
else //sonstwas

Grüsse, Daniel

Hallo,

versuch's doch mal so:

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var url : string;
begin
  if edit1.text = '' then begin
    edit1.text := 'URL eintragen!!!';
    edit1.setfocus;
  end
  else begin
    url := Edit1.Text;
    WebBrowser1.Navigate(url);
// hier weiß ich leider nicht, wohin der Fokus soll
    setfocus;
  end;
end;

Viele Grüße
[Edit=FuckRacism]Delphi-Syntax hinzugefügt. MfG Roman[/Edit]

hmm...
der Code von dir (Daniel)
funktioniert aber nich!!!

???

Was spricht den der komplizierer?

Grüsse, Daniel

der sagt: " Operator oder Semikolon fehlt"

ich habe auch mal zu testzwecken das else ... entfernt! Aber die Meldung kommt immernoch

hat sich schon erledigt!!!
Habs rausbekommen!

Trotzdem Danke für eure Mühe!

cu Trouble_Maker

Seltsam.

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin

  if Edit1.Text = '' then
    Edit1.SetFocus
  else;

  if Edit1.Text <> '' then
  begin
    Edit1.SetFocus;
  end
  else;

end;

Ist sogar getestet!

Grüsse, Daniel

Zitat von Trouble_Maker:

Hiho,
ich bin´s nochmal! Mein Problem (bzw. Code)

ach, die beiden sachen liegen meist nich weit auseinander und sind manchmal zum verwechseln ähnlich