Data do DateTimePicker z ibquery

0

Witam
Mam taki kodzik:

  JVDateTimePicker3.Date:=StrToDate(IBQuery1.FieldValues['BADANIE_LEKARSKIE']);

Gdy klikam podwójnie na rekord w bazie to wywala błąd:

---------------------------
Debugger Exception Notification

Project Project1.exe raised exception class EConvertError with message ''01-06-2009' is not a valid date'. Process stopped. Use Step or Run to continue.

OK Help
---------------------------</span>

Format w komponencie DTP mam ustawiony na 'dd-MM-yyyy'.

Męczę już to 1,5 dnia i nie moge wymyśleć jak wstawić datę z kolumny (w danym klikniętym rekordzie) "BADANIE LEKARSKIE" do komponentu DateTimePicker3 i żeby była w formacie 'dd-MM-yyyy'.

Co robię źle? Dziękuję za wskazówki. Pozdrawiam. :-)

0

A próbowałeś normalnie?

  DateTimePicker.Date:=IBQuery.FieldByName('nazwa_pola').AsDateTime;

?

0

Tak.
I niestety to też nie działa.
Myślę dalej przy kiełbasie bo zgłodniałem...

0

Sprawdź, jaką wartość trzyma Ci dataset.

0

Ja tez mialem kiedys problem z datami choc dziala troche inaczej ... po wybraniu daty z datapickera mial sie nalozyc odpowiedni filtr datowy na zapytanie sql.

Ja to zrobilem tak:

if ((datPoczatkowa.Checked = True) and (datKoncowa.Checked = True)) then
    qrZakresBad.Filter := '(data_wyk >= ''' + FormatDateTime('yyyy-mm-dd', datPoczatkowa.Date) + ''' ' + 'and data_wyk <= ''' + FormatDateTime('yyyy-mm-dd', datKoncowa.Date) + ''')'
  else if datPoczatkowa.Checked = true then
    qrZakresBad.Filter := 'data_wyk >= ' + FormatDateTime('yyyy-mm-dd', datPoczatkowa.Date)
  else if datKoncowa.Checked = true then
    qrZakresBad.Filter := 'data_wyk >= ' + FormatDateTime('yyyy-mm-dd', datKoncowa.Date);

Tak w ogóle to sprawdz sobie czy czasem blad nie lezy po strownie mm lub MM teorytycznie mm oznacza minuty a MM miesiace ale na bazie danych moze to byc inaczej ustawione niz w delphi ... blad po prostu gdzies jest przy konwertowaniu ... teraz tylko go znalezc :)

1 użytkowników online, w tym zalogowanych: 0, gości: 1