Форум: "Начинающим";
Текущий архив: 2012.04.01;
Скачать: [xml.tar.bz2];
ВнизПример приложения на winapi Найти похожие ветки
← →
ply © (2011-12-09 19:03) [0]Нужно создать приложение на WinApi, которое
1. выполняет определенные действия,
2. ждет 5 минут
3. снова к п.1
Дайте плиз простейший пример
← →
Ega23 © (2011-12-09 19:18) [1]
while Ture do
begin
Sleep(5*60*1000);
Beep;
end;
← →
Anatoly Podgoretsky © (2011-12-09 21:40) [2]> ply (09.12.2011 19:03:00) [0]
И пятерка в кармане, а нам то что?
← →
Inovet © (2011-12-09 22:27) [3]> [1] Ega23 © (09.12.11 19:18)
> Sleep(5*60*1000);
> Beep;
Сначала выполняет, потом ждёт. А пятёрку поделит на всех делавших, т.е. Ега отдаст, в еденицах измерения им пожелаемых, например, литрах.
← →
Dennis I. Komarov © (2011-12-09 23:55) [4]
> while Ture do
на 5-ку не тянет :)
← →
Ega23 © (2011-12-10 00:15) [5]
> на 5-ку не тянет :)
Я ж прям тут пишу. А редактор сей не умный, Syntax Check не делает
← →
Dennis I. Komarov © (2011-12-10 00:29) [6]
> Ega23 © (10.12.11 00:15) [5]
тебе, все равно, не простительно :)
← →
Германн © (2011-12-10 00:29) [7]
> на 5-ку не тянет :)
>
Эт да. Я всегда предпочитал
repeat
...
until False;
:)
Отрыжка Турбо Паскаля в виде keypressed.
← →
DVM © (2011-12-11 22:51) [8]
> Ega23 © (09.12.11 19:18) [1]
> while Ture do
> begin
> Sleep(5*60*1000);
> Beep;
> end;
>
>
на WinApi же просили :)
while true do
begin
Beep;
case WaitForSingleObject(FShutdownEvent, 5*60*1000) of
WAIT_OBJECT_0, WAIT_FAILED: break;
else
Continue;
end;
end;
← →
Inovet © (2011-12-11 23:19) [9]> [8] DVM © (11.12.11 22:51)
> на WinApi же просили :)
Sleep же из Win API.
← →
DVM © (2011-12-11 23:43) [10]
> Inovet © (11.12.11 23:19) [9]
> Sleep же из Win API.
А, ну да, действительно :)
← →
RWolf © (2011-12-12 10:00) [11]зато Beep() не из WinAPI.
вот Windows.Beep(1000, 1000) — другое дело.
← →
Inovet © (2011-12-12 16:04) [12]> [11] RWolf © (12.12.11 10:00)
> вот Windows.Beep(1000, 1000) — другое дело.
Ещё
MessageBeep(MB_OK)
← →
Anatoly Podgoretsky © (2011-12-12 16:19) [13]> Inovet (12.12.2011 16:04:12) [12]
А это то чем не устраивает, родная функция WinAPI
← →
Inovet © (2011-12-12 16:24) [14]> [13] Anatoly Podgoretsky © (12.12.11 16:19)
> А это то чем не устраивает, родная функция WinAPI
Пусть две будет - препод похвалит.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2012.04.01;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.003 c