Pages: 1

#1 Re: mORMot 1 » Sample-16 : execute block Firebird » 2021-01-07 06:54:36

b-57

Thank Ab for reply

After looking client code

        if isSelect(pointer(SQL)) then begin
        fTableJSON := fService.Execute(SQL,True,False);
        ... draw to grid 

        end else
          fService.Execute(SQL,False,False);

after delete/comment out  isSelect function
now 'Execute Block Returns' can run.

#2 mORMot 1 » Sample-16 : execute block Firebird » 2021-01-06 15:31:55

b-57
Replies: 2

Hi All,
I modified sample-16, and add ZeosLib for connecting firebird db,

On sample-16 Client , this query is working 

    select '%' ATEXT from RDB$DATABASE
    union 
    select 'B' ATEXT from RDB$DATABASE

but not returning any rows for this query :

execute block RETURNS( ATEXT TVARCHAR15 )
as 
begin
  for
   select x.* from
   (
    select '%' ATEXT from RDB$DATABASE
    union 
    select 'B' ATEXT from RDB$DATABASE
   ) x  into :ATEXT
  do begin
      suspend;
   end  
end

Is EXECUTE BLOCK  not supported  ?

#3 Re: mORMot 1 » Compiling SyndbExplorer Sample » 2020-12-12 06:43:03

b-57

Hey Ab  and mdbs99

I found the problem, seem like eurekalog v.7 not compatible or not set-up  properly .

after uninstall, I can compile syndbexplorer

Thank Ab and mdbs99

#4 mORMot 1 » Compiling SyndbExplorer Sample » 2020-12-11 03:38:10

b-57
Replies: 5

I've install latest mORMot framework download from git as zip file, with Delphi7 on win10

I can compile/run tessql3.dpr but

when try to compile SyndbExplorer sample,

i got  :

  syndbexplorerFrame.pas (line 803) Intenal Error C15309

any idea what should be done

Thanks

Pages: 1

Board footer

Powered by FluxBB