Page 1 of 1

[solved] Zeoslib 7.0.3 and firebird 2.1/2.5

Posted: 24.05.2013, 06:51
by k1attila1
I try to use zeoslib 7.0.3 with lazarus and delphi xe,xe2 with firebird 2.1/2.5.

The problems are the same.

At designtime i place a Zconnection and a Zstoredproc component and i set everyĆ­thing well.

Zstoredproc : connection,storedprocname,params.

Everything work well at designtime.

The compilation is OK.

But when i try to run the application it crash with a runtime error message : "the connection is not assigned"

why ?

But everything work well if i set everything (connection,storedprocname,params.) from code.

Thanks

Posted: 24.05.2013, 08:21
by EgonHugeist
k1attila1,

that was a bug. It's allready fixed on 7.1 (SVN)

Can't find the thread now. ZStoredProcedure.pas:


Code: Select all

procedure TZStoredProc.SetStoredProcName(const Value: string);
var
  OldParams: TParams;
  Catalog, Schema, ObjectName: string;
  ColumnType: Integer;
begin
  if AnsiCompareText(Trim(SQL.Text), Trim(Value)) <> 0 then
  begin
    SQL.Text := Value;
    if ParamCheck and (Value <> '') and not (csLoading in ComponentState) and Assigned(Connection) then
    begin
      CheckConnected; <------ This line was wrong placed. Fix it and it works ((;
      Connection.ShowSQLHourGlass;
.....
Check the line i've commented above.

Posted: 24.05.2013, 08:46
by k1attila1
Many thanks, Sir !

It works well.

Danke !

Posted: 24.05.2013, 09:00
by EgonHugeist
k1attila1,

Bitte. Kein Problem (: