Merkwürdige Fehlermeldung (Compiler)

[Aenogym]

mag sein, aber er sagt dir in der warnungsmeldung eben, was er tut. nämlich beide operanden erweitern ;)

[Martin K]

Aber wie soll das denn gehen?

Angenommen SongLength wäre negativ, dann würde doch in Sleep() ein negativer Wert stehen.

Da bringt's doch nix, wenn er den Wert milliseconds : Cardinal in einen Integer-Typ erweitert,
z.B. bei Sleep(-10) hat Delphi trotzdem ein Problem!


Nochmal zur Erinnerung:

Delphi-Quellcode:

procedure Sleep(milliseconds : Cardinal);

[Martin K]

Häääää?????

Das geht sogar:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var x: Integer;
begin
  x := -7;
  Sleep(x);
end;

Da kommt sogar nicht einmal eine Fehlermeldung - und auch keine Warnmeldung !!!!

Wenn ich dann auf den Button klicke, pausiert er auch.
Allerdings länger als 7 ms ...
(Keine Ahnung wie lange, hab einfach abgebrochen)

[Aenogym]

hm,

dafür habe icha uch keine erklärung. habe es ehrlich gesagt auch noch nie ausprobiert ;)

[x000x]

Moin moin,

Delphi-Quellcode:

Sleep((Cardinal(BassdllPlayer1.SongLength) - BassdllPlayer1.Position)*1000);

// Edit:
Markiere mal die Warnung und drücke die F1 Taste, da steht dann auch erklärt...

[himitsu]

Ich würde dir auch Letzteres (von x000x) empfehlen, wollte es ja selber gerade vorschlagen ... aber wiedermal zu spät -.-''

Denn lieber den Fehler beheben, als nur die Meldung abzuschalten :zwinker:

[MaBuSE]

Ich würde eine andere Lösung bevorzugen:

Delphi-Quellcode:

Sleep((BassdllPlayer1.SongLength - abs(BassdllPlayer1.Position))*1000);

Abs() gibt den absoluten Wert einer Zahl als z.B. vorzeichenbehafteter Integer zurück.
Bei positiven Zahlen ist das ja eine Positive Zahl. ;-)

Ich finde es "logischer" 2 Vorzeichenbehaftete Integer zu subtrahieren, da das Ergebnis ja prinzipiel auch negativ werden kann. (Sollte nicht vorkommen, aber ...)