Forum: Object-Pascal / Delphi-Language
Delphi
by Benmik,
12. Okt 2020
Du mein Gott, was ist denn los? Ist doch völlig normales Geflachse hier! Keiner möchte Moderator sein, und wer doch, hat in der Regel keine Ahnung.
Missverstanden. Dann Tschuldigung.
Forum: Object-Pascal / Delphi-Language
Delphi
by Benmik,
12. Okt 2020
Moralisch nein, praktisch ja. Wird dieser Widerspruch nicht auch durch die Wahl deiner Smileys ausgedrückt?
Forum: Object-Pascal / Delphi-Language
Delphi
by Benmik,
11. Okt 2020
Es ist vielleicht nur ein vorübergehender Zustand und auch der EXIFerei geschuldet, aber ich habe angefangen, praktisch alle Prozeduren in boolesche Funktionen umzuwandeln, bei denen der Wert per var übergeben wird.
Erstens kann man dadurch mehr als einen Wert übergeben, und zweitens finde ich den AufrufIf BestimmeHeaderPos(HeaderPos) then begin
MachWasMitHeaderPos; viel praktischer als...
Forum: Object-Pascal / Delphi-Language
Delphi
by Benmik,
11. Okt 2020
Nein, ich meinte doch Folgendes:Function LeseJPGEin(DatnameMV:string):Boolean;
begin
Result := False;
If not DateiVorhanden
then exit(False);
If not HeaderOK
then exit(False);
If not EndianOK
then exit(False):
....
Forum: Object-Pascal / Delphi-Language
Delphi
by Benmik,
10. Okt 2020
Spielverderber! Trotzdem guter Tipp für mich: Das exit(False) ist die Regel und notfalls schreibe ich es hin, auch wenn am Anfang der Routine Result := False; steht. Kann man ja wieder wegmachen, wenn das Debugging vorbei ist.
Forum: Object-Pascal / Delphi-Language
Delphi
by Benmik,
10. Okt 2020
Das Zitat von Knuth kannte ich und ich finde, dass sollte man mal in goldenen Lettern irgendwo anschlagen.
Das ist ja schlau.
Vor Kurzem hat Himitsu seinIf Bedingung = Erfüllt then
Sleep(0) gepostet und da habe ich mich gefragt, warum ich nicht selbst darauf gekommen bin.
Ansonsten - OK, da bin ich ja beruhigt.:thumb:
Forum: Object-Pascal / Delphi-Language
Delphi
by Benmik,
9. Okt 2020
Das ist es, was mich so ganz allgemein stört: Warum gibt es im Programmiererclub mehr Dogmen als in der katholischen Kirche, und auch mehr Inquisitoren? Und warum sind die angeführten Gründe für diese Dogmen oft so wie der Beweis der Jungfräulichkeit Mariae? Wie bei Maria spricht viel mehr für die umgekehrte Ansicht.
Forum: Object-Pascal / Delphi-Language
Delphi
by Benmik,
9. Okt 2020
Ganz genau. Klassische Beispiele sind If Dateiname = '' oder If not TFile.Exists(Dateiname) da geht man einfach raus und das ist gut so. Auch ein GoTo ist nicht in 100% der Fälle schlecht, sondern nur in 99%, und in diesem einen Prozent macht es den Code besser und nicht schlechter, egal was der Pfarrer sagt. Zum Beispiel, wenn man aus verschachtelten Schleifen herausspringt, wenn ein bestimmtes...
Forum: Object-Pascal / Delphi-Language
Delphi
by Benmik,
8. Okt 2020
Das sehe ich anders. Wenn ich einen (und womöglich längeren) Streifen mit else oder end else if
habe, dann weiß ich sofort, dass nur einer dieser Blöcke ausgeführt wird. Bei deiner Notation springt dies nicht ins Auge, vielmehr erfährt man erst durch Auswerten, dass der nachfolgende Code nicht ausgeführt wird. Das empfinde ich als deutlich weniger intuitiv.