Else

Hej.
Jeg har brugt denne kode:

Kode 

procedure TForm1.Button1Click(Sender: TObject);
begin
if edit2.text = edit3.text then
begin
Label3.Caption := 'Koden er acepteret';
//Her et par ekstra ting jeg ikke har fået,
//skrevet endu
end;

Men jeg kan desværre ikke få en else funktion ind.
Altså hvis:

edit2.text og edit3.text

ikke er det samme så skal der bare stå:

Du skrev koden forkert (i en Showmessege.)


Men hvordan skal jeg sætte den else ind?

Theis F. Hinz
(Shafh)
Theisf@stofanet.dk


Man kommer aldrig videre, hvis alle er enige...

Kode 

procedure TForm1.Button1Click(Sender: TObject);
begin
if edit2.text = edit3.text then
begin
Label3.Caption := 'Koden er acepteret';
//Her et par ekstra ting jeg ikke har fået,
//skrevet endu
end
else
showmessage('Du skrev koden forkert');
end;