ivantu |
Отправлено: 17 Сентября, 2019 - 10:22:19
|
Эксперт
Покинул форум
Сообщений всего: 732
Дата рег-ции: Нояб. 2013
Репутация: 14
|
Пожалуйста:
CODE:
#define WS_VISIBLE 268435456 // Видимый контрл
#define WS_CHILD 1073741824 // Дочернее окно
external(INT, "SetWindowText", "SetWindowTextA", "User32.dll" );
external(INT, "CreateWindow", "CreateWindowExA", "User32.dll" );
external(INT, "wsprintf", "wsprintfA", "User32.dll" );
int hor, min, sec, time, st ;
time=gettime();
enabletimer(0);
createdialog(0);
showdialog(0, "Диалог", 100, 100, 500, 750, 3, 0);
loop(){pause(200);}
function getmessage(0, WM_CREATE) // Основной диалог
{
st=CreateWindow(0, "STATIC", " ", WS_VISIBLE | WS_CHILD, 200, 88, 200, 30, gethwnd(0), 0, 0, 0); // создать статик
}
CREATE_TIMER(0, 300){
hor=(gettime()-time) /3600000;
min=(gettime()-time) /60000;
sec=(gettime()-time) / 1000;
SetWindowText(st, add_null(hor,min,sec)); // текст статика
}
function add_null(int hour, int min, int sec)
{
char c[99];
wsprintf(address(#c[0]), "%02d:%02d:%02d", hour, min, sec);
return format(#c[0]);
}
|
|
|
Zireael |
Отправлено: 17 Сентября, 2019 - 11:07:45
|
Эксперт
Покинул форум
Сообщений всего: 4467
Дата рег-ции: Нояб. 2017
Репутация: 585
|
code (Отобразить)CODE:external(INT, "wsprintf", "wsprintfA", "User32.dll" );
int time=gettime(), sec, min;
loop()
{
min=mod((gettime()-time)/60000, 60);
sec=mod((gettime()-time)/1000, 60);
textout(0, 300, 300, add_null(min, sec), 1);
sleep(100);
}
function add_null(int int min, int sec)
{
char c[99];
wsprintf(address(#c[0]), "%02d мин, %02d сек", min, sec);
return format(#c[0]);
}
function mod(int x, int y){int z=x/y; return x-z*y;} |
|
|
|