ViewVC Help

View File | Revision Log | Show Annotations | Download File | View Changeset | Root Listing

root/public/ibx/branches/udr/client/2.5/FB25ClientAPI.pas

Comparing ibx/branches/udr/client/2.5/FB25ClientAPI.pas (file contents):
Revision 385 by tony, Mon Jan 10 10:08:03 2022 UTC vs.
Revision 386 by tony, Tue Jan 18 12:05:35 2022 UTC

#	Line 82 | Line 82 | type
82		protected
83		function GetIBMessage: Ansistring; override;
84		public
85	+	function Clone: IStatus; override;
86		function StatusVector: PStatusVector; override;
87		end;
88
#	Line 345 | Line 346 | begin
346		end;
347		end;
348
349	+	function TFB25Status.Clone: IStatus;
350	+	var aResult: TFB25Status;
351	+	begin
352	+	aResult := TFB25Status.Create(nil);
353	+	aResult.Assign(self);
354	+	Result := aResult;
355	+	end;
356	+
357		function TFB25Status.StatusVector: PStatusVector;
358		begin
359		Result := @FStatusVector;

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines