PDA

Показать полную графическую версию : [решено] GUICtrlCreateDate-получение даты в числовом виде


TERMINAL
13-04-2011, 14:14
Добрый день !
Есть примерчик
#include <DateTimeConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 633, 447, 192, 124)
$Date1 = GUICtrlCreateDate("2011/04/13 12:47:46", 88, 72, 186, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $Date1
MsgBox(64,@YDAY,GUICtrlRead ($Date1))
EndSwitch
WEnd
Нужно чтобы при выборе выводило НЕ 15 апреля 2011 г., а 20110415, чтобы потом можно было работать ооталкиваясь от этой даты.
Заранее спс.

Creat0R
13-04-2011, 14:44
Предупреждение за нарушение правил форума, пункт 2.7 (http://forum.oszone.net/rules.html#2.7) и пункт 3.19 (http://forum.oszone.net/rules.html#3.19):

2.7: В заголовке темы обязательно обозначайте название предмета, которого касается вопрос, а в теле сообщения максимально подробно опишите проблему (приведите аппаратную/программную конфигурацию, а также изложите ситуацию, в которой возникает проблема)...
Подробнее о принципах создания тем читайте в этом документе (http://forum.oszone.net/faq.php?faq=vb_read_and_post#faq_thread) и Правилах форумов.

3.19: Запрещается... Создавать темы, имеющие неинформативные или состоящие из заглавных букв заголовки (например, "Помогите!", "HELP!", "У меня проблема"). Такие темы будут закрыты или перенесены в Тест-форум. Если вы хотите вернуть перенесенную тему обратно, пока ее не закрыли в Тест-форуме, измените ее заголовок на осмысленный (http://forum.oszone.net/faq.php?faq=vb_board_usage#faq_rename_thread) и напишите об этом в теме.

Переименуйте пожалуйста тему (Как переименовать свою тему? (http://forum.oszone.net/faq.php?faq=vb_board_usage#faq_rename_thread)).

Есть примерчик »
Который нужно заключать в тег кода.

Нужно чтобы при выборе выводило НЕ 15 апреля 2011 г., а 20110415 »
#include (http://www.autoitscript.com/autoit3/docs/keywords.htm##include) <DateTimeConstants.au3>
#include (http://www.autoitscript.com/autoit3/docs/keywords.htm##include) <GUIConstantsEx.au3>

$Form1 = GUICreate (http://www.autoitscript.com/autoit3/docs/functions/GUICreate.htm)("Form1", 633, 447, 192, 124)
$Date1 = GUICtrlCreateDate (http://www.autoitscript.com/autoit3/docs/functions/GUICtrlCreateDate.htm)("2011/04/13 12:47:46", 88, 72, 186, 21)

GUICtrlSendMsg (http://www.autoitscript.com/autoit3/docs/functions/GUICtrlSendMsg.htm)($Date1, $DTM_SETFORMATW, 0, "yyyy/MM/dd HH:mm:ss")

GUISetState (http://www.autoitscript.com/autoit3/docs/functions/GUISetState.htm)(@SW_SHOW (http://www.autoitscript.com/autoit3/docs/macros.htm#@sw_show))

While (http://www.autoitscript.com/autoit3/docs/keywords.htm#While) 1
$nMsg = GUIGetMsg (http://www.autoitscript.com/autoit3/docs/functions/GUIGetMsg.htm)()

Switch (http://www.autoitscript.com/autoit3/docs/keywords.htm#Switch) $nMsg
Case (http://www.autoitscript.com/autoit3/docs/keywords.htm#Case) $GUI_EVENT_CLOSE
Exit (http://www.autoitscript.com/autoit3/docs/keywords.htm#Exit)
Case (http://www.autoitscript.com/autoit3/docs/keywords.htm#Case) $Date1
MsgBox (http://www.autoitscript.com/autoit3/docs/functions/MsgBox.htm)(64, @YDAY (http://www.autoitscript.com/autoit3/docs/macros.htm#@yday), StringRegExpReplace (http://www.autoitscript.com/autoit3/docs/functions/StringRegExpReplace.htm)(GUICtrlRead (http://www.autoitscript.com/autoit3/docs/functions/GUICtrlRead.htm)($Date1), " .*$|/", ""))
EndSwitch (http://www.autoitscript.com/autoit3/docs/keywords.htm#EndSwitch)
WEnd (http://www.autoitscript.com/autoit3/docs/keywords.htm#WEnd)




© OSzone.net 2001-2012