Zeoslib Portal

DestinyR

Hello!

I frequently was receive error "Object or provider is not capable of performing requested operation" on AdoOpenSchema.

It's fired because of memory error:

When constant value of adSchemaColumns = $00000004 can be $12F364?

DestinyR

DP.pas have a bag with implementation TLargeintField.SetVarValue.
There is a

Code: Select all

raise AccessError('Variant');

instead of

Code: Select all

SetAsLargeint(Value);

This bug is not fired in 6.6.1 because it's use TIntegerField instead of TLargeintField

DestinyR

As far as I know MSSQL2K Developer Edition don't implement TCP/IP realization.
And I have installed MSSQL2k5 as main server and MSSQL2kDE as secondary service with instance name sql2000. Any attempts to remote connect to secondary instance by TCP/IP fails.

DestinyR

Next solution:
1) Create DSN in ODBC datasource administrator with change client properties on named pipes.
2) Create ZConnection string through "Microsoft OLE DB Provider for ODBC Drivers"
3) Change "Provider=MSDASQL.1" in ZConnection by "Provider=SQLOLEDB.1"

Enjoy!

DestinyR

Hello! I use MSSQL 2000 Developer Edition and wish to connect from network to my PC. I want use named pipes, but I can't understand, how to implement this with ZConnection? Thank for help and ideas! P.S. I can't use Microsoft OLE DB Provider for ODBC drivers because it can't work correctly with Date...

DestinyR

Add ROQuery for select default falues and realize next procedure which called in AfterInsert event: procedure TForm1.FillDefaultValues(ds: TDataSet); var strSQLDefValues: String; i: Integer; DefValue: String; begin if not (ds is TZAbstractRODataset) then exit; if ds.State <> dsInsert then exit; qrDe...

DestinyR

procedure TZGenericCachedResolver.DefineCalcColumns(Columns: TObjectList; RowAccessor: TZRowAccessor); var I: Integer; begin for I := 1 to Metadata.GetColumnCount do begin if RowAccessor.IsNull(I) and (Metadata.GetTableName(I) <> '') and (Metadata.GetDefaultValue(I) <> '') then begin Columns.Add(TZ...

DestinyR

Hi!
Whether developers can to give instruction how to see default values in Tdbgrid after the operation of Insert, but to the operation of Post. I.e. I want to offer to the user to enter already the partly filled record in a table?

DestinyR

Hi!!!
Try this RefreshSQL:
select * from mytable where id = (select @@identity)

Edited:
Most correctly:

Code: Select all

select * from mytable 
where
((:OLD_id IS NULL AND mytable.id = (select @@identity)) OR (mytable.id = :OLD_id))

Zeoslib Portal

Search found 9 matches

ADO OpenSchema Problem

Delphi 6,7 bug with Zeos 6.6.4 and higher

ADO+MSSQL2K+NamedPipes

I have partialy solved this problem by following method

Unit:ZDbcGenericResolver. procedure TZGenericCachedResolver.

Default values after Insert but before Post?