Zitat von
mkinzler:
Delphi-Quellcode:
erg: Single;
...
erg := (CurrentMilliseconds - StartMilliseconds) / 1000.0;
Delphi-Quellcode:
function GetTimes: single;
Var
erg : single
begin
if not StartMilliseconds <> 0 then
StartMilliseconds := GetTickCount();
CurrentMilliseconds := GetTickCount();
erg := (CurrentMilliseconds - StartMilliseconds / 1000.0);
Result := erg;
end;
Dann müßt Result := erg sein oder ?
Frage mich nur warum das nicht einfach so geht ??
single(CurrentMilliseconds - StartMilliseconds / 1000.0);
Denke das ist mein problem mit der Schleife wurde immer ein DWORD wertübergeben
deshalb haben sich die Peaks nicht vom spectrum gelößt.
gruss und wie immer danke für deine Hilfe..