[Bug 18673] DateTimePicker works not correctly

http://bugs.winehq.org/show_bug.cgi?id=18673

--- Comment #8 from YuriiS   2009-09-03 12:59:04 ---
Hello!
I returned from vacation and download wine-1.1.29.tar.bz2
And error present.
I put to /dlls/comctl32/datetime.c 
FIXME strings
++++1279 (datetime.c)++++
static LRESULT WINAPI
DATETIME_WindowProc (HWND hwnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
    DATETIME_INFO *infoPtr = ((DATETIME_INFO *)GetWindowLongPtrW (hwnd, 0));
    LRESULT ret;

TRACE ("%x, %lx, %lx\n", uMsg, wParam, lParam);

if (!infoPtr && (uMsg != WM_CREATE) && (uMsg != WM_NCCREATE))
    return DefWindowProcW( hwnd, uMsg, wParam, lParam );

switch (uMsg) {

case DTM_GETSYSTEMTIME:
      FIXME("DTM_GET");
      return DATETIME_GetSystemTime (infoPtr, (SYSTEMTIME *) lParam);

case DTM_SETSYSTEMTIME:
      FIXME("DTM_SET");
    return DATETIME_SetSystemTime (infoPtr, wParam, (SYSTEMTIME *) lParam);

+++++++

And test DateTimePicker after change date.
Then i get date-info through WinAPI
+++++++
  LRESULT r;
  SYSTEMTIME st;

r = SendMessage(DateTimePicker1->Handle, DTM_GETSYSTEMTIME, 0, (LPARAM)&st);

if (r==GDT_VALID) {
     ShowMessage("DATE Valid
"+(AnsiString)st.wDay+"/"+(AnsiString)st.wMonth+"/"+(AnsiString)st.wYear);
  }else if (r==GDT_NONE) {
     ShowMessage("DATE NONE
"+(AnsiString)st.wDay+"/"+(AnsiString)st.wMonth+"/"+(AnsiString)st.wYear);
  }else{
     ShowMessage("DATE ERROR
"+(AnsiString)st.wDay+"/"+(AnsiString)st.wMonth+"/"+(AnsiString)st.wYear);
  }
+++++++
I see FIXME string DTM_GET
And all work good.

But then i get date-info through Delphi/BuilderC++
+++++++
    AnsiString str="";
    if (DateTimePicker1->Checked==true){
       str="DATE Valid ";
    }else{
       str="DATE NONE ";
    }

str=str+DateToStr(DateTimePicker1->Date);
    ShowMessage(str);
+++++++
I not see FIXME string DTM_GET
And it work not correctly :(

I think it is a mistake because of the Delphi/BuilderC++
Tomorrow I'll try to find a solution...