so mach ichs eigentlich immer:
Delphi-Quellcode:
procedure Button1.Click(Sender: TOBject);
var
c: Integer;
begin
if 1 > 0 then begin
Label1.Caption := 'test1';
end else begin
if x = y then begin
for c := d to e do begin
// Do Something
end;
end;
Label1.Caption := 'test2';
end;
end;
damit wäre ich aber auch noch einverstanden:
Delphi-Quellcode:
procedure Button1.Click(Sender: TOBject);
var
c: Integer;
begin
if 1 > 0 then
begin
Label1.Caption := 'test1';
end
else
begin
if x = y then
begin
for c := d to e do
begin
// Do Something
end;
end;
Label1.Caption := 'test2';
end;
end;
und alles andere geht bei mir garnicht! ^^
@MichaelLinden: da du nach der If-bedingung das begin um eins eingerückt hast musst duch auch das begin im procedurenkopf um eins einrücken, wenn schon denn schon ^^