[solved] Zeoslib 7.0.3 and firebird 2.1/2.5

[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

[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.

[k1attila1]

Many thanks, Sir !

It works well.

Danke !

[EgonHugeist]

k1attila1,

Bitte. Kein Problem (: