Changeset 34 for trunk/Application/UChronisClient.pas

Timestamp:

Nov 24, 2011, 2:06:10 PM (13 years ago)

Author:

chronos

Message:

• Modified: Report loading is now done by TChronisClient.

File:

• trunk/Application/UChronisClient.pas (modified) (2 diffs)

trunk/Application/UChronisClient.pas

@@ -43 +43 @@
     ConditionUse: Boolean;
     ObjectName: string;
+    SchemaName: string;
     Objects: TListObject; // TListObject<TObjectProxy>
+    procedure SetCondition(ColumnName: string; Value: string);
     procedure Clear;
     constructor Create;
@@ -105 +107 @@
 { TListProxy }
 
+procedure TListProxy.SetCondition(ColumnName: string; Value: string);
+begin
+  ConditionColumn := ColumnName;
+  ConditionValue := Value;
+  ConditionUse := True;
+end;
+
 procedure TListProxy.Clear;
 begin