Changeset 45 for trunk/Application/UDataTypes.pas

Timestamp:

Mar 12, 2012, 10:23:40 AM (13 years ago)

Author:

chronos

Message:

• Modified: TChronisBase.Active property control Client connection instead of direct call of Client.Connect and Client.Disconnect methods.

File:

• trunk/Application/UDataTypes.pas (modified) (1 diff)

trunk/Application/UDataTypes.pas

@@ -270 +270 @@
     Proxy.ObjectName := PropertyTable;
     Proxy.Condition := 'Id=' + IntToStr(PropertyID);
+    Proxy.Load;
     ObjectId := StrToInt(TObjectProxy(Proxy.Objects[0]).Properties.Values['Object']);
     PropertyName := TObjectProxy(Proxy.Objects[0]).Properties.Values['ColumnName'];