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 380 by tony, Mon Jan 10 10:13:17 2022 UTC

#	Line 33 | Line 33 | interface
33		uses
34		Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ComCtrls,
35		StdCtrls, ExtCtrls, IBSQLEditFrame, IBCustomDataSet,
36	<	IBDatabase, IBLookupComboEditBox, IBDynamicGrid, Types;
36	>	IBDatabase, IBLookupComboEditBox, IBDynamicGrid;
37
38		type
39
#	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 139 | Line 138 | end;
138		{ TIBDataSetEditorForm }
139
140		procedure TIBDataSetEditorForm.FormShow(Sender: TObject);
142	–	var TableName: string;
141		begin
142		PageControl.ActivePage := FieldsPage;
143		FModifySQL.Assign(FDataSet.ModifySQL);
#	Line 188 | Line 186 | end;
186
187		procedure TIBDataSetEditorForm.GenerateButtonClick(Sender: TObject);
188		begin
189	<	IBSQLEditFrame1.GenerateSelectSQL(QuoteFields.Checked,FSelectSQL);
190	<	IBSQLEditFrame1.GenerateRefreshSQL(QuoteFields.Checked,FRefreshSQL);
189	>	IBSQLEditFrame1.GenerateSelectSQL(QuoteFields.Checked,FSelectSQL,true);
190	>	IBSQLEditFrame1.GenerateRefreshSQL(QuoteFields.Checked,FRefreshSQL,true);
191		IBSQLEditFrame1.GenerateDeleteSQL(QuoteFields.Checked,FDeleteSQL);
192		IBSQLEditFrame1.GenerateInsertSQL(QuoteFields.Checked,FInsertSQL);
193	<	IBSQLEditFrame1.GenerateModifySQL(QuoteFields.Checked,FModifySQL, not IncludePrimaryKeys.Checked);
193	>	IBSQLEditFrame1.GenerateModifySQL(QuoteFields.Checked,FModifySQL, IncludePrimaryKeys.Checked);
194		FDirty := false;
195		PageControl.ActivePage := SQLPage;
196		end;

Comparing ibx/trunk/design/ibdataseteditor.pas (property svn:eol-style):
Revision 105 by tony, Thu Jan 18 14:37:32 2018 UTC vs.
Revision 380 by tony, Mon Jan 10 10:13:17 2022 UTC

#	Line 0 | Line 1
1	+	native

Diff Legend

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