Attila Kovacs

solved, user error.

LOL <o>, well, now it's revealed! 😉

@Leif Uneus Wow, thanks a lot, and also to LU RD if he ever reads this.

Ahm, i was afraid that using the word "set" would be misleading, and I was right, sorry, but lists are a bit different from multisets again, so I don't know, I need to compare two or more "set of anything" and I'm tired writing it always manually.

depending on the DAC you are using you could try "Data Type Mapping"

I'm not an IB expert but IB BLOB has a default subtype = text. Maybe it was the whole time stored with that subtype but it was fine with ansistrings?

What kind of DB and Field type and DAC? Can you read the data fine with the D2007 app?

does the blob editor showing it in raw hex? do you read the blob as blobfield and stream or as string?

We're approaching levels unseen.

Just press ctrl+shift+v instead of ctrl+v.

add this to your unit or add it to a unit which you include everywhere after "RzTrkBar" in the uses list. interface type TRzTrackBar = class(RzTrkBar.TRzTrackBar) private procedure WMSetCursor(var Msg: TWMSetCursor); message wm_SetCursor; end; implementation procedure TRzTrackBar.WMSetCursor(var Msg: TWMSetCursor); begin end;

override the WMSetCursor message for TRzTrackBar

@Alberto Paganini You need const in the parameter list, also measure with TStopwatch and not with Now(), and try not to use local string variable, like: function JsonStringToDateTime(const Src: string): TDateTime; const ofs = Ord('0'); var pSrc: PChar; Time: TDateTime; begin if Length(Src) < 19 then Exit(gOutOfScopelDate); pSrc := Pointer(Src); if not TryEncodeDate( // ((Ord((pSrc)^) - ofs) * 1000) + ((Ord((pSrc + 1)^) - ofs) * 100) + ((Ord((pSrc + 2)^) - ofs) * 10) + (Ord((pSrc + 3)^) - ofs), // ((Ord((pSrc + 5)^) - ofs) * 10) + (Ord((pSrc + 6)^) - ofs), // ((Ord((pSrc + 8)^) - ofs) * 10) + (Ord((pSrc + 9)^) - ofs), Result) then Exit(gOutOfScopelDate); if not TryEncodeTime( // ((Ord((pSrc + 11)^) - ofs) * 10) + (Ord((pSrc + 12)^) - ofs), // ((Ord((pSrc + 14)^) - ofs) * 10) + (Ord((pSrc + 15)^) - ofs), // ((Ord((pSrc + 17)^) - ofs) * 10) + (Ord((pSrc + 18)^) - ofs), // 0, // Time) then Exit(gOutOfScopelDate); Result := Result + Time; end;

With https://www.delphihtmlcomponents.com/ the sky is the limit. Just an example for selecting year/quartal/month/week/last 4 weeks/last 12 months/5 years (of course, you have to build your own html/css/scripting, but the result is unique)

@Dalija Prasnikar Aeauhm, look like it's UFO Technology for me 😄

@FPiette not if it's ipv6

@Bill Meyer the combo offer takes me to an only digital purchase page

How?

@emailx45 Why are you concerned about what value he uses for zero date? There must be a reason for that, for example the REST endpoint he talking to does not accept dates before 1.1.1901. I don't understand your rage nor your comic book.

Yes, remove "Dummy", and maybe Result := Result + Encodetime()? Also, you are ignoring time zones, but it is not necessary a problem for you.

Are you sure? Never seen that.

Are you sure you linked the right article? Because it has not much to do with your questions.

It is then like Lajos said. And it will also be compatible with the faulty component.

Keep in mind that DBMSes might store DateTime in different formats, so if you need to use those values on SQL Level chose an own format.