lustiges problem mit dem compiler (?)

[sx2008]

Zitat von Apollonius:

Versuch's einfach mal. Ohne static wird es nicht funktionieren.

"Static" ist aber kein Delphi Schlüsselwort.
Der Compiler kann damit nichts anfangen.

[mkinzler]

Ist auch standard bei delphi

Zitat von Delphi Hilfe:

Statische Methoden
Methoden sind standardmäßig statisch. Beim Aufruf bestimmt der deklarierte Typ (also der Typ zur Compilierzeit) der im Aufruf verwendeten Klassen- bzw. Objektvariablen, welche Implementierung aktiviert wird. Die Draw-Methoden im folgenden Beispiel sind statisch

[Apollonius]

Versucht es einfach mal. Ohne die Direktive static funktioniert es einfach nicht, weil selbst bei (nicht-statischen) Klassenmethoden noch ein Self übergeben wird. Markus, dein Hilfezitat bezieht sich nicht auf Klassenmethoden.

[himitsu]

Zitat von sx2008:

"Static" ist aber kein Delphi Schlüsselwort.
Der Compiler kann damit nichts anfangen.

[equote="himi's himXML sagt:"]

Delphi-Quellcode:

TXMLFile = Class
  Class Function GetLibVersion: AnsiString; Static;

[/equote]
oder class static
http://www.delphipraxis.net/internal...t=class+static
http://www.delphipraxis.net/internal...t=class+static

[Desmulator]

Zitat von arkon:

warum funktioniert "Result := Round(TChVoc(Item1).coeff - TChVoc(Item2).coeff);" aber nicht "if Round(TChVoc(Item1).coeff > TChVoc(Item2).coeff) then" !?!??!?!?

Afaik verlangt ein if-Statement immer einen Boolischen Ausdruck. Round gibt aber einen Integer zurück. In deinem zweiten Fall rundest du den Boolischen Ausdruck der duch > erzeugt wird.
Result := Round(TChVoc(Item1).coeff - TChVoc(Item2).coeff); Result ist ein Integer. Daher möglich.
if Round( TChVoc(Item1).coeff > TChVoc(Item2).coeff ) then Das Round klammert den Ausdruck TChVoc(Item1).coeff > TChVoc(Item2).coeff ein. Round gibt einen Integer zurück. If will aber einen boolischen haben. Irgendwie geht das nicht oder ?

Edit: Du könntest auch auf LongBool casten. 0 wär dann true, alles andere false. ( imho )