Zeoslib Portal

Work OK

http://www.postgresql.org/docs/7.1/stat ... etime.html
Version 7.1 has "ms"

http://www.postgresql.org/docs/9.2/stat ... etime.html
Version 9.2 has "ms" to

When i use synchronization from table1 to table2 without "ms"
I have a wrong values

TimeStamp patch [code]Index: ZDbcPostgreSqlStatement.pas =================================================================== --- ZDbcPostgreSqlStatement.pas (revision 1553) +++ ZDbcPostgreSqlStatement.pas (working copy) @@ -436,7 +436,7 @@ [FormatDateTime('hh":"mm":"ss', SoftVarM...

I have to this probleb (INSER RETURNING)

I found the solution - download last version and set

https://zeoslib.svn.sourceforge.net/svn ... slib/trunk
Rev: 1435

In picture has: if CaseInsensitive then {$IFDEF LAZARUSUTF8HACK} AValue2 := AnsiUpperCase(Utf8ToAnsi(AValue2)); {$ELSE} AValue2 := {$IFDEF DELPHI12_UP}AnsiStrings.{$ENDIF}AnsiUpperCase(AValue2); {$ENDIF} Result := AnsiStrLComp(PAnsiChar(AValue2), PAnsiChar(AValue1), Length(AValue1)) = 0; end; The un...

Maybe priblem in this: http://zeos.firmos.at/viewtopic.php?t=3532

I found bag:
Found unneeded code lines for WideString

Exception on destroy program Haw it's make Create new project Append TZConnecttion, TZSQLMonitor On Create Make connection to server When halt(0) On Destroy Make query ZConnection.ExecuteDirect Patch: Index: ZDbcPostgreSql.pas =================================================================== --- Z...

See the last post.

ZEOS not use index when locate.
If table have unique index locate with my function work faster (Its may see on big tables).
I can write domo program

EgonHugeist,
Can you see my post http://zeos.firmos.at/viewtopic.php?t=3158

This patch not adapted for other delphi version. Tested only for Delphi XE Index: ZAbstractDataset.pas =================================================================== --- ZAbstractDataset.pas (revision 1089) +++ ZAbstractDataset.pas (working copy) @@ -468,16 +468,16 @@ InternalUpdate; {BUG-FIX: ...

Do you test code anytime? In Delphi XE2 - Not work Fix: BM - initialize @BM - {$IFDEF DELPHI12_UP}BM{$ELSE}@BM{$ENDIF} if (SortedFields <> '') and not (doDontSortOnPost in Options) then begin FreeFieldBuffers; SetState(dsBrowse); Resync([]); BM := Bookmark; if BookmarkValid(BM) Then begin InternalGo...

This function use to quick locate from indexed table function FastLocate(Table:TDataSet; LocateFiled:string; LocateVal:Integer):boolean; var min, max, Ind, Ret:Int64; begin //=== Except id not indexed === // if Table is TZ //=== Test in value === result := Table[ LocateFiled ] = LocateVal; if result...

I have large table about 60,000 records. Sorted by ID ID = AutoInc Val = String Program has procedure where get any list from this table about 3000 values. This operation very slow. In ZEOS source, I see fetch from first row to end. But I have also been sorted by ID, you can use the quick search I h...