ViewVC Help

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

root/public/ibx/trunk/design/ibdataseteditor.pas

Comparing ibx/trunk/design/ibdataseteditor.pas (file contents):
Revision 105 by tony, Thu Jan 18 14:37:32 2018 UTC vs.
Revision 107 by tony, Thu Jan 18 14:37:40 2018 UTC

#	Line 124 | Line 124 | begin
124		FDataSet := DataSet;
125		with IBSQLEditFrame1 do
126		begin
127	–	IncludePrimaryKeys := false;
127		IncludeReadOnlyFields := false;
128		end;
129		Result := ShowModal = mrOK;
#	Line 188 | Line 187 | end;
187
188		procedure TIBDataSetEditorForm.GenerateButtonClick(Sender: TObject);
189		begin
190	<	IBSQLEditFrame1.GenerateSelectSQL(QuoteFields.Checked,FSelectSQL);
191	<	IBSQLEditFrame1.GenerateRefreshSQL(QuoteFields.Checked,FRefreshSQL);
190	>	IBSQLEditFrame1.GenerateSelectSQL(QuoteFields.Checked,FSelectSQL,true);
191	>	IBSQLEditFrame1.GenerateRefreshSQL(QuoteFields.Checked,FRefreshSQL,true);
192		IBSQLEditFrame1.GenerateDeleteSQL(QuoteFields.Checked,FDeleteSQL);
193		IBSQLEditFrame1.GenerateInsertSQL(QuoteFields.Checked,FInsertSQL);
194	<	IBSQLEditFrame1.GenerateModifySQL(QuoteFields.Checked,FModifySQL, not IncludePrimaryKeys.Checked);
194	>	IBSQLEditFrame1.GenerateModifySQL(QuoteFields.Checked,FModifySQL, IncludePrimaryKeys.Checked);
195		FDirty := false;
196		PageControl.ActivePage := SQLPage;
197		end;

Diff Legend

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