﻿<?xml version='1.0' encoding='UTF-8'?><rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/"><channel><title>Релиб / Программирование / Delphi  / Паскаль: таймеры на прерываниях / Latest Posts</title><generator>InstantForum.NET v4.1.4</generator><description>Релиб</description><link>http://www.relib.com/forums/</link><webMaster>robot@relib.com</webMaster><lastBuildDate>Sun, 23 Nov 2008 01:25:33 GMT</lastBuildDate><ttl>20</ttl><item><title>RE: Паскаль: таймеры на прерываниях</title><link>http://www.relib.com/forums/Topic718349-8-1.aspx</link><description>Во первых тебе нужно чтоб твой процесс имел приоритет Realtime (устанавливается setprioretyclass ), в WinAPI есть процедура Sleep&lt;BR&gt;определяется как ....&lt;BR&gt;procedure Sleep(dwMilliseconde : DWORD) ; stdcall;&lt;BR&gt;&lt;BR&gt;procedure TForm1.Button1Click(Sender: TObject);&lt;BR&gt;&lt;BR&gt;begin&lt;BR&gt;if SetPriorityClass(getcurrentprocess,REALTIME_PRIORITY_CLASS) then&lt;BR&gt;begin&lt;BR&gt;memo1.Lines.Add('RealTime Priorety is set');&lt;BR&gt;sleep(1000);&lt;BR&gt;memo1.Lines.Add('after 1 second this line was added');&lt;BR&gt;sleep(100);&lt;BR&gt;memo1.Lines.Add('after 0,1 second this line was added');&lt;BR&gt;sleep(10);&lt;BR&gt;memo1.Lines.Add('after 0,01 second this line was added');&lt;BR&gt;sleep(1);&lt;BR&gt;memo1.Lines.Add('after 0,001 second this line was added');&lt;BR&gt;setpriorityclass(getcurrentprocess,NORMAL_PRIORITY_CLASS);&lt;BR&gt;memo1.Lines.Add('Normal Priorety is set');&lt;BR&gt;end &lt;BR&gt;else memo1.Lines.Add('Can`t set REALTIME priorety')&lt;BR&gt;end;&lt;BR&gt;&lt;BR&gt;	Best Regards &lt;BR&gt;	  JosH_BMS</description><pubDate>Thu, 09 Aug 2001 08:56:00 GMT</pubDate><dc:creator>Josh_BMS</dc:creator></item><item><title>Паскаль: таймеры на прерываниях</title><link>http://www.relib.com/forums/Topic718349-8-1.aspx</link><description>Знает ли кто нибудь как выполнить задержки типа Delay порядка десятка микросекунд, мне надо считывать показания порта и обрабатывать их в режиме реального времени через определенные промежутки времени, и потом таким же образом записывать</description><pubDate>Wed, 01 Aug 2001 21:25:00 GMT</pubDate><dc:creator>denden</dc:creator></item></channel></rss>