Checkbox zur unterscheiung von Anzeigeflächen

[himitsu]

Eine IF-Anweisung darf nicht mit einem ; abgeschlossen sein, wenn ein ELSE folgt.

Also nach dem "EINEN" Befehl darf also kein ; stehen, wenn direkt das ELSE folgt.

Bei mehreren Befehlen müssen diese in ein BEGIN-END, wobei das END, wegen dem ELSE natürlich nicht mit ; abgeschlossen wird, aber hinter die Befehle innerhalb des BEGIN-END gehört ein ; , da diese Befehle ja abgeschlossen/fertig sind.

Zitat:

Operator oder Simikolon

LoadFromFile könnte ja eine Funktion sein, welche man mit einem Operator (+ - and or ....) mit was anderem verbinden könnte, oder man sagt mit einem ; , daß dort Schluß ist ... Delphi weiß ja nicht, was du willst, deswegen nennt es beide alternativen Lösungswege ... man müßte nur einen davon auswählen.

[DeddyH]

Wenn ich nicht wüsste, was Du meinst, hätte ich jetzt kein Wort verstanden.

[mquadrat]

Der Vollständigkeit halber

Delphi-Quellcode:

procedure TForm1.Image1Click(Sender: TObject);
begin
if checkbox.Checked
  then
    begin // <---- fehlt
      image1.Picture.LoadFromFile('C:\bsp.jpg'); // <--- Das Semikolon hat auch noch gefehlt
      grossansicht_img.Picture.LoadFromFile('C:\bsp.jpg') <---- Operator oder Simikolon fehlt
    end //<----- fehlt auch
  else
    image1.Picture.LoadFromFile('C:\bsp.jpg');
end;