🚀 go-pugleaf

W dniu 15-01-2018 o 00:36, J-23 pisze:

> 
> Jest błąd w Zeosach (Nie sądze by to było zamierzone działanie) - 
> poniższy kod działa prawidłowo:
> 
> procedure TDBCard.SaveCard;
> var
>    BlobStream: TBlobField;
> begin
>    with FZTable do
>     begin
>       Edit;
>       BlobStream := FieldByName('CAR_CARD') as TBlobField;
>       BlobStream.Clear;
>       Post;
>       Edit;
>       BlobStream := FieldByName('CAR_CARD') as TBlobField;
>       FXML.Position:=0;
>       BlobStream.LoadFromStream(FXML);
>       FieldByName('CAR_VERSION').AsInteger := 33;
>       FieldByName('CAR_MODIFICATIONDATE').AsDateTime := NOW;
>       Post;
>     end;
>   end;
> 
> Nie znam źródeł Zeos może w wolnej chwili zajrzę do tego ale prośba do 
> Miaba (bo o ile dobrze kojarzę to on zajmuje się jak nie develop to 
> testami Zeosa) by zwrócił na powyższy błąd uwagę

Ściągnij snapszota z:
https://sourceforge.net/p/zeoslib/code-0/HEAD/tree/branches/testing-7.2/
i zobacz czy sie nie poprawiło.

Miab