Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2012.04.01;
Скачать: CL | DM;

Вниз

Пример приложения на 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;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.007 c
2-1323806418
Gpol
2011-12-14 00:00
2012.04.01
Как установить цвет любого пиксела на экране без winApi?


4-1254913745
Kolan
2009-10-07 15:09
2012.04.01
Как больше узнать про устройсто по событию WM_DEVICECHANGE?


4-1255704991
Badevlad
2009-10-16 18:56
2012.04.01
Как Windows переименовывает файлы при совпадении во время копиров


15-1322598602
Юрий
2011-11-30 00:30
2012.04.01
С днем рождения ! 30 ноября 2011 среда


2-1323870171
Alex_C
2011-12-14 17:42
2012.04.01
Что лучше поле MyTablePole или MyTable.FieldByName( Pole )