![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TDateTimePicker
novichek © (2012-04-15 02:17:00)установлен режим как дата, но необходимо иметь возможность ввода и времени.
установил формат даты: dd.MM.yyyy HH:mm
в окне редактирования нормально отображается и редактируется время.
вот вопрос в том, как теперь это введенное время можно вытащить с этого долбаного компонента?
введенный текст хотя бы можно как-то достать?
novichek (2012-04-15 13:42:00) [1]sniknik ©, бросай курить... или бухать..
sniknik (2012-04-15 13:25:00) [2]> до Ваших великих умов хочу довести,
раньше нужно было доводить, в чем проблема. в вопросе.
теперь не скажу, т.к. глубоко проктологическое решение... не сказав, защищу генофонд, возьму пример с защитника Касперского... ( http://www.delphimaster.ru/cgi-bin/forum.pl?id=1334405334&n=18)
novichek (2012-04-15 11:32:00) [3]>> Ega23 ©
>> Уверен?
угу, уверен по крайней мере для XE2
novichek (2012-04-15 11:23:00) [4]Ega23 ©, угу... делал так раньше.. но это же не красиво (:
через ж..у прикольней выходит..
Ega23 (2012-04-15 11:15:00) [5]
> то Ваше "свойство Time" нихрена не будет корректироваться
> от того что Вы введете.
Уверен?
По сабжу: кладёшь два пикера, один для даты, другой для времени.
novichek (2012-04-15 11:03:00) [6]до Ваших великих умов хочу довести,
что если кинд стоит dtkDate,
то Ваше "свойство Time" нихрена не будет корректироваться от того что Вы введете.
проктологи Вы наши...
Врач-ректолог (2012-04-15 10:45:00) [7]
> sniknik © (15.04.12 10:30) [5]
Какой способ - такой и врач.
sniknik (2012-04-15 10:30:00) [8]> Он мне ближе по специальности.
а ректолог вместо проктолог это по привычке все делать через это место? :)
Врач-ректолог (2012-04-15 10:25:00) [9]> есть другой вариант?
Есть - свойство Time. Но это плохой вариант, Ваш - самый лучший. Он мне ближе по специальности.
novichek (2012-04-15 03:10:00) [10]проверь, :
function GetTimeFromDateTimePicker(d: TDateTimePicker): TDateTime;
var
b: PChar;
i: Integer;
begin
result:= d.Date + EncodeTime(0, 0, 0, 0);
GetMem(b, 100);
try
i:= GetWindowText(d.Handle, b, 100);
b[i]:= #0;
result:= StrToDateTimeDef(StrPas(b), result);
finally
freeMem(b);
end;
end;
есть другой вариант?
Германн (2012-04-15 02:58:00) [11]
> novichek (15.04.12 02:28) [1]
>
> о-о, GetWindowText(DateBegTimePicker.Handle, ...
> возвращает...
>
"С дуба рухнул"?:)
novichek (2012-04-15 02:28:00) [12]о-о, GetWindowText(DateBegTimePicker.Handle, ...
возвращает...
этот вариант стабильный?
других мыслей нет?