ViewVC Help

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

root/public/ibx/trunk/runtime/IBCustomDataSet.pas

Comparing ibx/trunk/runtime/IBCustomDataSet.pas (file contents):
Revision 118 by tony, Mon Jan 22 13:58:14 2018 UTC vs.
Revision 143 by tony, Fri Feb 23 12:11:21 2018 UTC

#	Line 2769 | Line 2769 | var
2769		fn: string;
2770		st: RawByteString;
2771		OldBuffer: Pointer;
2772	–	ts: TTimeStamp;
2772		Param: ISQLParam;
2773		begin
2774		if (Buffer = nil) then
#	Line 2940 | Line 2939 | end;
2939		procedure TIBCustomDataSet.RegisterIBLink(Sender: TIBControlLink);
2940		begin
2941		if FIBLinks.IndexOf(Sender) = -1 then
2942	+	begin
2943		FIBLinks.Add(Sender);
2944	+	if Active then
2945	+	begin
2946	+	Active := false;
2947	+	Active := true;
2948	+	end;
2949	+	end;
2950		end;
2951
2952
#	Line 3815 | Line 3821 | var
3821		FieldType: TFieldType;
3822		FieldSize: Word;
3823		FieldDataSize: integer;
3818	–	charSetID: short;
3824		CharSetSize: integer;
3825		CharSetName: RawByteString;
3826		FieldCodePage: TSystemCodePage;

Diff Legend

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