![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 07.11.2010
Сообщений: 87
|
![]()
Как создать label (или, что-то подобное) в котором бы писался размер текстового файла, количество строк и. т. д.
З.Ы. Немного не в тему: как создать label с сегодняшней датой? Для этого нужен таймер? |
![]() |
![]() |
![]() |
#2 | ||
DelphiProger
Участник клуба
Регистрация: 14.11.2010
Сообщений: 1,023
|
![]() Цитата:
Label1.Caption := TimeToStr(Now); Цитата:
VirusN13
|
||
![]() |
![]() |
![]() |
#3 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
![]()
1. Размер файла см. FileSize или FileOpen и FileSeek. Есть и другие способы
2. Если строки разной длины то их к-во только прочитав файл (например в TStringList) 3.Если только дата - зачем таймер? А если время - без него не обойтись
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
![]() |
![]() |
![]() |
#4 | |
DelphiProger
Участник клуба
Регистрация: 14.11.2010
Сообщений: 1,023
|
![]() Цитата:
procedure TForm1.Button2Click(Sender: TObject); begin Button2.Caption := TimeToStr(Now); end; Московское время:
VirusN13
|
|
![]() |
![]() |
![]() |
#5 |
Старожил
Регистрация: 17.11.2010
Сообщений: 18,922
|
![]()
Я имел ввиду постоянный указатель времени, а не время по требованию
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
|
![]() |
![]() |
![]() |
#6 |
Пользователь
Регистрация: 07.11.2010
Сообщений: 87
|
![]()
Что бы постоянно указывало, надо ещё код в таймер запихнуть.
|
![]() |
![]() |
![]() |
#7 |
Пользователь
Регистрация: 22.01.2011
Сообщений: 25
|
![]()
Чтобы постоянно время указывало надо в событие таймера onTimer добавить код
label1.caption:= timetostr( now) ; |
![]() |
![]() |
![]() |
#8 |
DelphiProger
Участник клуба
Регистрация: 14.11.2010
Сообщений: 1,023
|
![]()
тема вроди называеца 'Информация о файле'
VirusN13
|
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Информация о файле (Delphi) | VadEr | Помощь студентам | 6 | 08.04.2011 02:39 |
информация из запроса | new_here | Microsoft Office Access | 4 | 14.11.2010 21:07 |
Поиск данных в текстовом файле (в самом файле! а не в Memo и не загружая всю инфу из файла в одну строку | glagoff | Помощь студентам | 1 | 05.05.2010 13:00 |
Информация об устройстве | W0LF | Общие вопросы Delphi | 2 | 01.04.2010 21:52 |
информация о файле | xakkkkker | Общие вопросы Delphi | 5 | 19.01.2010 14:21 |