Mehrere Eigenschafte auf einmal ändern??

[marianalbers]

Ich wollte wissen ob ich mehrere Eigenschaften auf einmal ändern kann. Mein bisheriger Problemfall ist :


procedure TForm1.Button1Click(Sender: TObject);
begin
if edit1.Text = ´marian´
then
edit1.Visible:=false;
edit2.Visible:=false;
else begin showmessage(´Du bist draußen !´);close;

end;

end.

[Manu]

Das ist überhaupt kein Problem, du kannst ändern soviel du willst.
Allerdings musst du, wenn du nach einem if then oder einem else mehr als einen Befehl schreiben willst, dort wieder ein begin und end machen:


procedure TForm1.Button1Click(Sender: TObject);
begin

if edit1.Text = ´marian´ then
begin
edit1.Visible:=false;
edit2.Visible:=false;
end
else
begin
showmessage(´Du bist draußen !´);
close;
end

end;

[marianalbers]

Das funkt. Schon fast ne Regel fürs
Programierer Leben. Danke

[Manu]

Bitte, bitte :)

Das ist in der Tat etwas sehr wichtiges, da es immer bei if/else Abfragen beachtet werden muss :)