Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Feststellen ob Zahl durch 3 Teilbar (https://www.delphipraxis.net/79948-feststellen-ob-zahl-durch-3-teilbar.html)

Khabarakh 31. Okt 2006 22:34

Re: Feststellen ob Zahl durch 3 Teilbar
 
Weil sie nicht macht, was er will ;) ? Deine Funktion rückt nur Zahlen > 1000 zurecht. Außerdem sind ein Rückgabewert zu wenig und für meinen Geschmack ein paar Leerzeichen zu viel drin *g* . Wobei, nach dem Komma fehlt wieder eines.

Jelly 31. Okt 2006 22:45

Re: Feststellen ob Zahl durch 3 Teilbar
 
Zitat:

Zitat von Khabarakh
Weil sie nicht macht, was er will ;) ?

Die Funktion fügt eine 0 davor, wenn die Länge kleiner als 3 ist.
Zitat:

Zitat von Khabarakh
Deine Funktion rückt nur Zahlen > 1000 zurecht.

Du meinst < 1000.
Zitat:

Zitat von Khabarakh
Außerdem sind ... ein paar Leerzeichen zu viel drin *g* . Wobei, nach dem Komma fehlt wieder eines.

Wo siehst Du Leerzeichen und Kommas ?

Jürgen Thomas 1. Nov 2006 07:12

Re: Feststellen ob Zahl durch 3 Teilbar
 
Zitat:

Zitat von Jelly
Zitat:

Zitat von Khabarakh
Außerdem sind ... ein paar Leerzeichen zu viel drin *g* . Wobei, nach dem Komma fehlt wieder eines.

Wo siehst Du Leerzeichen und Kommas ?

Es gibt Programmierer, die sehr empfindlich sind und nur ihre eigenen Formatierungsregeln akzeptieren. Ich vermute, er meint:
Zitat:

Zitat von Jelly
Delphi-Quellcode:
function Dreier (Zahl : integer) ;
begin
     Dreier := Format ('%.3d',[Zahl]) ;
end ;

Dies sollte so geschrieben werden (wie es von Delphi verwendet bzw. vorgegeben wird):
Delphi-Quellcode:
function Dreier(Zahl: integer);
begin
  Dreier := Format('%.3d', [Zahl]);
end;
Ich meine, das sollte man nicht so puristisch sehen. Wichtig ist, dass eine sichtbare Formatierung verwendet wird, alles Wichtige erkannt wird und man immer alles auf die gleiche Weise schreibt.

Nicht verwirren lassen! Jürgen


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:57 Uhr.
Seite 2 von 2     12   

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-2025 by Thomas Breitkreuz