Запись WAVE потока из COM порта

[qZED]

Сообщение от raxp

и правильно делает, не используйте слипы, их задержка зависит от загрузки системы и будет плавать тики так.

Что до Gettickcount, лучше использовать QueryPerformanceCounter или KeStallExecutionProcessor.

А может быть есть способ равномерной подачи данных в COM порт ?

[qZED]

Сообщение от qZED

А может быть есть способ равномерной подачи данных в COM порт ?

Всем спасибо - решил задачу:

function TickCount:Int64;
begin
 QueryPerformanceCounter(Result);
end;

function DeltaTickToSeconds(const Delta: Int64):Double;
var
 TickFreq: Int64;
begin
 QueryPerformanceFrequency(TickFreq);
 Result := Delta/TickFreq;
end;