Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];

Вниз

Компонент Label который показывает системное время   Найти похожие ветки 

 
Gilbert   (2002-01-14 08:44) [0]

Нужно создать компонент на базе TLabel который показывал бы системное время и желательно в отдельном потоке.
Никто не подскажет как мне это реализовать?


 
Bakca   (2002-01-14 09:25) [1]

В библиотеке RX Lib -> RxClock, может то что нужно?


 
panov   (2002-01-14 10:09) [2]

Ну почему обязательно компоненты?
Можно, например, так:

unit Unit2;

interface

uses
Classes, Sysutils, Windows,
Unit1;

type
TMyClock = class(TThread)
protected
procedure Execute; override;
procedure Update;
end;

implementation

procedure TMyClock.Update;
begin
Form1.Label1.Caption := FormatDateTime("dd.mm.yyyy hh.nn.ss",now);
end;

procedure TMyClock.Execute;
begin
while not Terminated do
begin
Synchronize(Update);
Sleep(1000);
end;

end;

end.


 
KaPaT   (2002-01-14 10:45) [3]

Я раньше делал наподобе:
Label1.Caption:=IntToStr(...) Вот непомню что в скобках. Помойму time!


 
KaPaT   (2002-01-14 11:00) [4]

Вспомнил!
А вот если вот так:
Кидаешь timer на форму и пишишь
Label1.Caption:=TimeToStr(time)


 
SuperMama   (2002-01-14 11:20) [5]

>KaPaT
В скобках (Now)


 
KaPat   (2002-01-14 23:19) [6]

>SuperMama
это приколо такой про now?


 
olban   (2002-01-15 08:47) [7]

Now - текущие дата и время
Date - текущая дата
Time - текущее время


 
Андрей Сенченко   (2002-01-15 12:12) [8]

Если использовать Now DATE TIME то безусловно не IntToSr а FormatDateTime(маска,что форматируем)



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.005 c
3-99837
RID
2001-12-20 15:46
2002.01.31
Обновление данных в БД Interbase 6.0


4-100104
Romul
2001-12-02 10:59
2002.01.31
Узнать количество файлов с помощью API


1-99927
3d[Power]
2002-01-11 01:22
2002.01.31
Packed record. absolute. file r/w.


3-99838
victor
2001-12-25 06:55
2002.01.31
не отображаются значения по умолчанию


6-100026
Диман
2001-11-09 12:18
2002.01.31
модуль Winsock - функции socket, connect и т.п.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский