DaysInMonth und TChart

[schniede]

Hallo

Ich hab das Problem, in einem Project was fast fertig ist mit "DaysInMonth" .
Bis zum hinzufügen von Tchart hat alles geklappt ,aber nun meckert der Compiller über
folgenden Ausdruck.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
day:word;
begin
 day :=DaysInMonth(dummypicker.Date);
end;

end.

Incompatible: Word und Tdate
Bin echt ratlos. Vieleicht kennt ja jemand das Problem?

gruß schniede

[mkinzler]

Die Funktion aus den TeeCharts erwartet 2 Word Parameter:
function DaysInMonth(Year, Month: Word): Word; Oder du verwendest die Funktion der JCL:

Delphi-Quellcode:

uses JclDateTime;
...
    day := JCLDateTime.DaysInMonth(dummypicker.Date);

[himitsu]

TChat aka Unit TeeProcs

function DaysInMonth(Year, Month: Word): Word;

Entweder du bindest DateUtils vor TeeProcs ein
oder du gibst den Namespace an.

PS: Halte mal die Maus 'nen Sekündchen über deinen DaysInMonth-Aufruf
oder klicke mit der linken Maustaste, zusammen mit Strg auf DaysInMonth drauf.

[schniede]

Hm ok.
Versteh ich zwar nicht wirklich aber in der Suche ist sohn änlicher Fall.
wenn ich es so umschreibe klappt es..

thx euch

[himitsu]

Du hast doch in deiner Unit die Units DateUtils und TeeProcs eingebunden? (in der Uses-Liste)
Also gibt es nun mehrere Funktionen, welche DaysInMonth heißen.

Ohne explizite Angabe eines Namespaces werden, bei solchen gleichnamigen Funktionen, nur die Funktionen der zuletzt eingefügten Unit verwendet.
Und in deinem Fall ist es eben die Version,

Zitat:

function DaysInMonth(Year, Month: Word): Word;

welche nunmal nicht zu deinen Parametern paßt.

DateUtils.DaysInMonth(...) würde deine gewünschte Funktion darstellen
oder man verwendet eben
uses TeeProcs, DateUtils; dieses.
Wenn DateUtils als Letzes drinsteht, dann würde auch die passende Version genommen.