ViewVC Help

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

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

Comparing ibx/trunk/runtime/IBBatchMove.pas (file contents):
Revision 33 by tony, Sat Jul 18 12:30:52 2015 UTC vs.
Revision 45 by tony, Tue Dec 6 10:33:46 2016 UTC

#	Line 53 | Line 53 | type
53
54		TIBBatchMove = class(TComponent)
55		private
56	–	FIBLoaded: Boolean;
56		FDestination: TIBTable;
57		FSource: TIBCustomDataSet;
58		FMode: TBatchMode;
#	Line 105 | Line 104 | type
104
105		implementation
106
107	<	uses IBIntf;
107	>	uses FBMessages;
108
109		{ TIBBatchMove }
110
111		constructor TIBBatchMove.Create(AOwner: TComponent);
112		begin
113		inherited Create(AOwner);
115	–	FIBLoaded := False;
116	–	CheckIBLoaded;
117	–	FIBLoaded := True;
114		FAbortOnKeyViol := True;
115		FAbortOnProblem := True;
116		FTransliterate := True;
#	Line 123 | Line 119 | end;
119
120		destructor TIBBatchMove.Destroy;
121		begin
122	<	if FIBLoaded then
123	<	FMappings.Free;
122	>	if FMappings <> nil then
123	>	FMappings.Free;
124		inherited Destroy;
125		end;
126

Diff Legend

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