Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   Delphi Fehlermeldung bei if/then (https://www.delphipraxis.net/172730-fehlermeldung-bei-if-then.html)

Felix96 19. Jan 2013 14:58

Fehlermeldung bei if/then
 
Liste der Anhänge anzeigen (Anzahl: 1)
Hey Leute,

ich bekomme eine Fehlermeldung, die ich an dieser Stelle nicht verstehe.

Interessant ist auch, wenn ich das Semikolon hinter dem "end" lösche, erscheint die Fehlermeldung beim nächsten "end". Feld1 ist eine boolean Variable.

Was ich möchte ist, dass beim ersten (Rechts-)Klicken das Bild erscheint, und dann wieder verschwindet.

Bin neu hier und bei Delphi ;)

LG und schonmal Danke im Voraus

Felix

mkinzler 19. Jan 2013 15:08

AW: Fehlermeldung bei if/then
 
Delphi-Quellcode:
If (Feld1) and ( ssRight in Shift) then

Delphi-Laie 19. Jan 2013 15:22

AW: Fehlermeldung bei if/then
 
Merwürdig nur, daß der Compiler sich nicht gleich am zweiten "if" stößt.

Furtbichler 19. Jan 2013 15:29

AW: Fehlermeldung bei if/then
 
Parser funktionieren nicht immer so, wie man das gerne hätte. Es ist schon schwer genug, nach einem Syntax-Fehler wieder so aufzusetzen, das der Rest vom Code möglichst vollständig geparst werden kann.

Felix96 19. Jan 2013 16:09

AW: Fehlermeldung bei if/then
 
Zitat:

Zitat von Delphi-Laie (Beitrag 1199780)
Merwürdig nur, daß der Compiler sich nicht gleich am zweiten "if" stößt.

Danke :D daran lags natürlich^^ Ist mir beim Rumkopieren dummerweise nicht aufgefallen.


Code:
procedure TForm1.BitBtn1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
  if (ssRight in Shift) then
  if Feld1 = true then
  begin
  BitBtn1.Glyph.LoadFromFile('Dateipfad');
  Feld1 :=false;
  end
  else
  begin
  BitBtn1.Glyph :=nil;
  Feld1 :=true;
  end;
So gehts jetzt dann doch ;)

Danke!

Delix

DeddyH 19. Jan 2013 16:14

AW: Fehlermeldung bei if/then
 
Zitat:

Delphi-Quellcode:
if Feld1 = true then

-->
Delphi-Quellcode:
if Feld1 then
Das ist sicherer, siehe http://delphi-treff.de/tutorials/obj...faengerfehler/.

PC-John 19. Jan 2013 16:49

AW: Fehlermeldung bei if/then
 
Bei zusammengesetzten Bedingungen hinter einen if-Befehl empfiehlt es sich die ganze Bedingung zusätzlich noch in Klammern zu setzen, bei mehrfachen unterschiedlichen Bedingungen entsprechend noch mehr Klammern:
als Beispiel

If (((m_rasse = 'fzwe') and (m_farbe = 'mx')) or ((m_rasse = 'fzwS') and (m_farbe = '__'))) then ...

Hatte mich auch lange mit solchen "Fehlern" rumgeschlagen

PC-John

DeddyH 19. Jan 2013 17:01

AW: Fehlermeldung bei if/then
 
Wenn es sehr verschachtelt wird, können aber Zwischenvariablen die Übersicht erhöhen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:52 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz