Регистрация Главная Пользователи Все разделы прочитаны
Сообщения за день Справка Регистрация
Навигация
Zhyk.org LIVE! Реклама на Zhyk.org Правила Форума Награды и достижения Доска "почета"

Ответ
 
Опции темы
Старый 03.04.2017, 02:15   #1
Заблокирован
 Сержант
Аватар для craft1n
 
craft1n блестящий пример для подражанияcraft1n блестящий пример для подражанияcraft1n блестящий пример для подражанияcraft1n блестящий пример для подражанияcraft1n блестящий пример для подражанияcraft1n блестящий пример для подражанияcraft1n блестящий пример для подражанияcraft1n блестящий пример для подражанияcraft1n блестящий пример для подражанияcraft1n блестящий пример для подражанияcraft1n блестящий пример для подражания
Регистрация: 02.08.2016
Сообщений: 124
Популярность: 1739
Сказал(а) спасибо: 2
Поблагодарили 4 раз(а) в 4 сообщениях
Отправить сообщение для craft1n с помощью Skype™
 
Post Подсчитываем время работы программы

Процедура для Delphi

Код:
var
timestart,timestop: TTimeStamp;
begin
Application.Initialize;
Application.CreateForm(TForm1, Form1);
timestart := DateTimeToTimeStamp(Now);
Application.Run;
timestop := DateTimeToTimeStamp(Now);
MessageBox(0,PChar(Format('Программа работала %d миллисекунд',
[Trunc(TimeStampToMSecs(timestop) - TimeStampToMSecs(timestart))])),
PChar(Application.Title), MB_OK + MB_ICONINFORMATION + MB_TOPMOST);
end.



Взято с [Ссылки могут видеть только зарегистрированные пользователи. ]
  Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Программа] Программы для работы с *.xml и *.pak файлами Yurii77 Боты, скрипты и прочий софт для Aion 18 13.09.2016 21:13
[Программа] Рассчитываем время каста ukurenijboter Боты, скрипты и прочий софт для Perfect World 7 23.05.2012 13:52
[Подсказка] Чат во время работы бота. ybrbnf333 Общение и обсуждение 2 20.04.2011 16:43

Заявление об ответственности / Список мошенников

Часовой пояс GMT +4, время: 15:32.

Пишите нам: [email protected]
Copyright © 2024 vBulletin Solutions, Inc.
Translate: zCarot. Webdesign by DevArt (Fox)
G-gaMe! Team production | Since 2008
Hosted by GShost.net