Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Bei if mehr als eine anweißung ohne begin= (https://www.delphipraxis.net/29485-bei-if-mehr-als-eine-anweissung-ohne-begin%3D.html)

ferby 9. Sep 2004 18:36


Bei if mehr als eine anweißung ohne begin=
 
Hallo,

Ist es möglich das ich bei if (z.B: if a < b then ....) mehrere Anweisungen dran schreibe ohne das ich begin und end schreiben muss? Oder ist das mit Delphi nicht möglich?

Duffy 9. Sep 2004 18:38

Re: Bei if mehr als eine anweißung ohne begin=
 
Hallo ferby
Delphi-Quellcode:
if Test = 537 then
begin
  Statement_1;
  Statement_2;
  Statement_3;
end;
bye
Claus

sakura 9. Sep 2004 18:38

Re: Bei if mehr als eine anweißung ohne begin=
 
Genau dafür gibt es begin...end, also Du musst es auch benutzen, da führt kein Weg in Pascal/Delphi herum.

begin...end definiert mehrere zusammengehörige Anweisungen ;)

...:cat:...

Muetze1 9. Sep 2004 23:59

Re: Bei if mehr als eine anweißung ohne begin=
 
Moin!

In C sollte man im Normalfall auch immer { } benutzen, man kann aber auch anstatt durch Semikolon mit einem Komma mehrere Anweisungen trennen die dann ohne { } bei der If Bedingung ausgeführt werden können. Dort kenne ich sowas, aber selbst das ist nicht so gerne gesehen bei C(++) - zumindest bei vielen Firmen sogar verboten.

MfG
Muetze1

MisterNiceGuy 10. Sep 2004 08:07

Re: Bei if mehr als eine anweißung ohne begin=
 
Warum willst du das denn eigentlich so machen? Es gibt da eine total bekloppte Lösung mit der du das begin vermeiden kannst...

Matze 10. Sep 2004 09:41

Re: Bei if mehr als eine anweißung ohne begin=
 
Zitat:

Zitat von MisterNiceGuy
Es gibt da eine total bekloppte Lösung mit der du das begin vermeiden kannst...

Und die wäre?

Untereinander immer die gleiche if-Abfrage? :lol:

Sharky 10. Sep 2004 09:44

Re: Bei if mehr als eine anweißung ohne begin=
 
Zitat:

Zitat von Matze
...Und die wäre?...

Den notwendigen Code in eine Procedure "auslagern" ;-)

GuenterS 10. Sep 2004 09:50

Re: Bei if mehr als eine anweißung ohne begin=
 
möglicherweise sogar in eine nested procedure *g*

sakura 10. Sep 2004 09:58

Re: Bei if mehr als eine anweißung ohne begin=
 
Zitat:

Zitat von MisterNiceGuy
Es gibt da eine total bekloppte Lösung mit der du das begin vermeiden kannst...

Die Bedingung mit not umkehren und anschließend mit einem goto alles andere überspringen :shock:

...:cat:...

Phoenix 10. Sep 2004 10:07

Re: Bei if mehr als eine anweißung ohne begin=
 
Zitat:

Zitat von sakura
Die Bedingung mit not umkehren und anschließend mit einem goto alles andere überspringen :shock:

Erm.. jetzt mach mal langsam... wir sollten die Leute doch nicht auf solche idiotischen Ideen bringen :zwinker:

Sharky 10. Sep 2004 10:10

Re: Bei if mehr als eine anweißung ohne begin=
 
Ich meinte das mit dem "auslagern" durchaus ernst!
Wenn zwichen dem begin - end mehr als ca. 6-10 Zeilen stehen und es mehrere IF-Bedingungen sind lagere ich Code gerne aus um die Übersicht zu behalten.

Matze 10. Sep 2004 10:11

Re: Bei if mehr als eine anweißung ohne begin=
 
@Sharky: Aber in der Prozedur gibt's ja wieder begin und end. :tongue: ;)

GuenterS 10. Sep 2004 10:17

Re: Bei if mehr als eine anweißung ohne begin=
 
Nun du könntest "begin" und "end" in zwei separate Dateien auslagern und dann per {$I ... } an benötigter Stelle wieder einbinden...

Gruber_Hans_12345 10. Sep 2004 10:28

Re: Bei if mehr als eine anweißung ohne begin=
 
Sollte dieser Thread nicht eher in
"Wie schreibe ich ein Programm, das ich in drei Tage nicht mehr lesen kann" betitelt werden ?

Nur ein Vorschlag


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:35 Uhr.

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