if-Bedingung mit and (bestimmt sau easy *g*)

[Daniel B]

Hallo,

da Du ja zur Design-Time wissen kannst was in den Edits drinstehen wird, ist es etwas schwierig Romans Beispiel zu benutzen.

Aber zu den Passwörtern.

Delphi-Quellcode:

procedure TForm1.Button3Click(Sender: TObject);
begin
  if Edit1.Text <> Edit2.Text then
  begin
    if Edit2.Text = Edit3.Text then
    begin
      ShowMessage('Blupp');
    end; //if
  end; //if
end;

Wenn Du willst das in allen 3 Edits das gleiche steht, so tausche das <> gegen ein = aus und schon geht das auch.

Grüsse, Daniel