TMyStoredProc and Parameter of type DATE

Guest · Post by **Guest** » Sat 01 Jul 2006 21:38

When using the TMyStoredProc with a MySQL stored procedure with an IN parameter of type DATE, I get an error when double-clicking on the object and looking at the parameters.

Error is
EdParm: Data type not found.

I am using MyDAC 4.30.1.15 31.05.06 with MySQL 5.0.22 with Delphi 2005 SP2.

There is no problem if I change the parameter type to DateTime in MySQL.

The detail of the error is

+ $F7[199F425B]{dclMydac100.bpl} Edmyparams.TMyParamsEditorForm.SelectParam + $F7
+ $EA[199F3F26]{dclMydac100.bpl} Edmyparams.TMyParamsEditorForm.InitParams + $EA
+ $68[199F4030]{dclMydac100.bpl} Edmyparams.TMyParamsEditorForm.DoInit + $68
+ $24[199F67D8]{dclMydac100.bpl} Edmyquery.TMyQueryEditorForm.DoInit + $24
+ $5[199FCD59]{dclMydac100.bpl} Edmystoredproc.TMyStoredProcEditorForm.DoInit + $5
+ $6[52058A3B]{vcl100.bpl } Controls.Controls.TControl.WndProc (Line 5143, "Controls.pas" + 83) + $6
+ $6[5205CA19]{vcl100.bpl } Controls.Controls.TWinControl.WndProc (Line 7246, "Controls.pas" + 105) + $6
+ $5[5207124D]{vcl100.bpl } Forms.Forms.TCustomForm.WndProc (Line 3284, "Forms.pas" + 125) + $5
+ $C[520586C8]{vcl100.bpl } Controls.Controls.TControl.Perform (Line 5018, "Controls.pas" + 5) + $C
+ $C[5205C019]{vcl100.bpl } Controls.Controls.TWinControl.UpdateShowing (Line 6970, "Controls.pas" + 17) + $C
+ $2[5205C08C]{vcl100.bpl } Controls.Controls.TWinControl.UpdateControlState (Line 6989, "Controls.pas" +

+ $2
+ $6[5205CA19]{vcl100.bpl } Controls.Controls.TWinControl.WndProc (Line 7246, "Controls.pas" + 105) + $6
+ $5[5207124D]{vcl100.bpl } Forms.Forms.TCustomForm.WndProc (Line 3284, "Forms.pas" + 125) + $5
+ $C[520586C8]{vcl100.bpl } Controls.Controls.TControl.Perform (Line 5018, "Controls.pas" + 5) + $C
+ $C[5205715A]{vcl100.bpl } Controls.Controls.TControl.SetVisible (Line 4168, "Controls.pas" + 5) + $C
+ $55[19A04FD5]{dclMydac100.bpl} Mydesign.TMyDataSetEditor.ShowEditor + $55
+ $12[19A0527E]{dclMydac100.bpl} Mydesign.TMyDataSetEditor.ExecuteVerb + $12
+ $7[19A04E1B]{dclMydac100.bpl} Mydesign.TMyDataSetEditor.Edit + $7
+ $4[20F04540]{designide100.bpl} Designer.Designer.TDesigner.Edit (Line 965, "Designer.pas" + 0) + $4
+ $5B[0C8C675B]{vcldesigner100.bpl} VCLSurface.VCLSurface.TComponentToolWindow.WndProc (Line 1313, "vclsurface.pas" + 20) + $5B
+ $6[0C8C7173]{vcldesigner100.bpl} VCLSurface.VCLSurface.TContainer.WndProc (Line 1618, "vclsurface.pas" + 44) + $6
+ $7[0C8C650F]{vcldesigner100.bpl} VCLSurface.VCLSurface.TDesignerToolWindow.MainWndProc (Line 1244, "vclsurface.pas" + 2) + $7
+ $0[51F60BC0]{rtl100.bpl } Classes.Classes.StdWndProc (Line 11572, "classes.pas" +

+ $0
+ $6A[77D48731]{USER32.dll } GetDC + $6A
+ $14A[77D48811]{USER32.dll } GetDC + $14A
+ $122[77D489C8]{USER32.dll } GetWindowLongW + $122
+ $A[77D496C2]{USER32.dll } DispatchMessageA + $A

Thanks in advance
Robert

Antaeus · Post by **Antaeus** » Mon 03 Jul 2006 06:57

Thank you for information. We have reproduced this problem and fixed it. This fix will be included in the next MyDAC build.

rshera · Post by **rshera** » Mon 03 Jul 2006 19:10

Thanks for the quick response

Robert