From: <jcm...@us...> - 2006-02-14 20:20:57
|
Revision: 606 Author: jcmoraisjr Date: 2006-02-14 12:20:12 -0800 (Tue, 14 Feb 2006) ViewCVS: http://svn.sourceforge.net/instantobjects?rev=606&view=rev Log Message: ----------- Changed how packages include resource files: - Added a sh script to replicate a new resource file; - changed Install.txt (removing a note about packages and .res files); - removed InstantVersion.res, InstantVersion.inc and InstantPackageVersion.inc. Modified Paths: -------------- trunk/Docs/Install.txt Added Paths: ----------- trunk/Source/InstantReplicateResource.sh Removed Paths: ------------- trunk/Source/InstantPackageVersion.inc trunk/Source/InstantVersion.inc trunk/Source/InstantVersion.res Modified: trunk/Docs/Install.txt =================================================================== --- trunk/Docs/Install.txt 2006-02-14 19:52:19 UTC (rev 605) +++ trunk/Docs/Install.txt 2006-02-14 20:20:12 UTC (rev 606) @@ -88,25 +88,4 @@ NOTE TO DELPHI 5 USERS: dpk files in Delphi 5 have an additional suffix "_D5". This is because Delphi 5 does not support the LIBSUFFIX compiler directive - that InstantObjects uses in newer versions of Delphi. - -******************************************************************************** -Note: All InstantObjects packages use non-standard code in the package -source file. In particular, they miss the standard line: - -{$R *.RES} - -and have instead something similar to this line: - -{$I '../../InstantVersion.inc'} - -that includes the InstantVersion.inc file in the $(InstantObjects)\Source -folder (Substitute the correct relative path in this statement depending on -where in the installed folder tree the package file resides). However if you -open the Project Options for a package and click the OK button, the Delphi IDE -will restore the line with the $R directive, automatically create a -<packagename>.res file that IO doesn't need and delete the $I -directive. If you ever do that, please restore the original code by editing -the Project Source by hand or restoring the original file from the distribution -archive. -******************************************************************************** + that InstantObjects uses in newer versions of Delphi. \ No newline at end of file Deleted: trunk/Source/InstantPackageVersion.inc =================================================================== --- trunk/Source/InstantPackageVersion.inc 2006-02-14 19:52:19 UTC (rev 605) +++ trunk/Source/InstantPackageVersion.inc 2006-02-14 20:20:12 UTC (rev 606) @@ -1,5 +0,0 @@ -{$IFDEF LINUX} -{$R '../../InstantVersion.res'} -{$ELSE} -{$R '..\..\InstantVersion.res'} -{$ENDIF} Added: trunk/Source/InstantReplicateResource.sh =================================================================== (Binary files differ) Property changes on: trunk/Source/InstantReplicateResource.sh ___________________________________________________________________ Name: svn:mime-type + Text/Plain Deleted: trunk/Source/InstantVersion.inc =================================================================== --- trunk/Source/InstantVersion.inc 2006-02-14 19:52:19 UTC (rev 605) +++ trunk/Source/InstantVersion.inc 2006-02-14 20:20:12 UTC (rev 606) @@ -1,5 +0,0 @@ -{$IFDEF LINUX} -{$R '../../../InstantVersion.res'} -{$ELSE} -{$R '..\..\..\InstantVersion.res'} -{$ENDIF} Deleted: trunk/Source/InstantVersion.res =================================================================== (Binary files differ) |
From: <sr...@us...> - 2006-05-30 06:52:52
|
Revision: 681 Author: srmitch Date: 2006-05-29 23:52:37 -0700 (Mon, 29 May 2006) ViewCVS: http://svn.sourceforge.net/instantobjects?rev=681&view=rev Log Message: ----------- Two fixes and a doc update: 1. Fix for # 1496971 Bug In Model Explorer Setting Index and Required properties. Applied to TInstantAttributeEditorForm.SaveData in InstantAttributeEditor.pas. 2. Fix for AV in Model Explorer when setting Method access properties for container attributes. Applied to TInstantCodeAttributeTailor.DeleteMethods in InstantCode.pas. 3. Updated Changes.txt file for the bug fix above. Modified Paths: -------------- trunk/Docs/Changes.txt trunk/Source/Core/InstantCode.pas trunk/Source/Design/InstantAttributeEditor.pas Modified: trunk/Docs/Changes.txt =================================================================== --- trunk/Docs/Changes.txt 2006-05-29 03:23:15 UTC (rev 680) +++ trunk/Docs/Changes.txt 2006-05-30 06:52:37 UTC (rev 681) @@ -5,6 +5,9 @@ - Help file has been improved. +- Bug fix for # 1496971 Bug In Model Explorer Setting Index and + Required properties. + - Bug fix for # 1475841. "TInstantContainer.Sort error if empty". - Bug fix for # 1475982. Rebuilding a Firebird database creates Modified: trunk/Source/Core/InstantCode.pas =================================================================== --- trunk/Source/Core/InstantCode.pas 2006-05-29 03:23:15 UTC (rev 680) +++ trunk/Source/Core/InstantCode.pas 2006-05-30 06:52:37 UTC (rev 681) @@ -3440,11 +3440,17 @@ procedure TInstantCodeAttributeTailor.DeleteMethods; begin DeleteItem(FAddMethod); + FAddMethod := nil; DeleteItem(FClearMethod); + FClearMethod := nil; DeleteItem(FDeleteMethod); + FDeleteMethod := nil; DeleteItem(FIndexOfMethod); + FIndexOfMethod := nil; DeleteItem(FInsertMethod); + FInsertMethod := nil; DeleteItem(FRemoveMethod); + FRemoveMethod := nil; end; destructor TInstantCodeAttributeTailor.Destroy; Modified: trunk/Source/Design/InstantAttributeEditor.pas =================================================================== --- trunk/Source/Design/InstantAttributeEditor.pas 2006-05-29 03:23:15 UTC (rev 680) +++ trunk/Source/Design/InstantAttributeEditor.pas 2006-05-30 06:52:37 UTC (rev 681) @@ -429,38 +429,58 @@ // SubjectExposer.PostChanges does not overwrite our changes. procedure TInstantAttributeEditorForm.SaveData; - procedure SaveOptions; + function SetChangedField(const AFieldName: String; ACheckBoxChecked: Boolean): + Boolean; begin - SubjectExposer.FieldByName('IsIndexed').AsBoolean := - OptionIndexedCheckBox.Checked; - SubjectExposer.FieldByName('IsRequired').AsBoolean := - OptionRequiredCheckBox.Checked; - SubjectExposer.FieldByName('ReadOnly').AsBoolean := - OptionReadOnlyCheckBox.Checked; - SubjectExposer.FieldByName('IsDefault').AsBoolean := - OptionDefaultCheckBox.Checked; + Result := False; + if SubjectExposer.FieldByName(AFieldName).AsBoolean <> + ACheckBoxChecked then + begin + SubjectExposer.FieldByName(AFieldName).AsBoolean := + ACheckBoxChecked; + Result := True; + end; end; - procedure SaveMethods; + function SaveOptions: Boolean; begin - SubjectExposer.FieldByName('IncludeAddMethod').AsBoolean := - MethodAddCheckBox.Checked; - SubjectExposer.FieldByName('IncludeRemoveMethod').AsBoolean := - MethodRemoveCheckBox.Checked; - SubjectExposer.FieldByName('IncludeInsertMethod').AsBoolean := - MethodInsertCheckBox.Checked; - SubjectExposer.FieldByName('IncludeDeleteMethod').AsBoolean := - MethodDeleteCheckBox.Checked; - SubjectExposer.FieldByName('IncludeIndexOfMethod').AsBoolean := - MethodIndexOfCheckBox.Checked; - SubjectExposer.FieldByName('IncludeClearMethod').AsBoolean := - MethodClearCheckBox.Checked; + Result := False; + if SetChangedField('IsIndexed', OptionIndexedCheckBox.Checked) then + Result := True; + if SetChangedField('IsRequired', OptionRequiredCheckBox.Checked) then + Result := True; + if SetChangedField('ReadOnly', OptionReadOnlyCheckBox.Checked) then + Result := True; + if SetChangedField('IsDefault', OptionDefaultCheckBox.Checked) then + Result := True; end; + function SaveMethods: Boolean; + begin + Result := False; + if SetChangedField('IncludeAddMethod', MethodAddCheckBox.Checked) then + Result := True; + if SetChangedField('IncludeRemoveMethod', MethodRemoveCheckBox.Checked) then + Result := True; + if SetChangedField('IncludeInsertMethod', MethodInsertCheckBox.Checked) then + Result := True; + if SetChangedField('IncludeDeleteMethod', MethodDeleteCheckBox.Checked) then + Result := True; + if SetChangedField('IncludeIndexOfMethod', MethodIndexOfCheckBox.Checked) then + Result := True; + if SetChangedField('IncludeClearMethod', MethodClearCheckBox.Checked) then + Result := True; + end; + +var + OptionsChanged: Boolean; + MethodsChanged: Boolean; begin inherited; - SaveOptions; - SaveMethods; + OptionsChanged := SaveOptions; + MethodsChanged := SaveMethods; + if OptionsChanged or MethodsChanged then + SubjectExposer.Edit; end; procedure TInstantAttributeEditorForm.SetLimited(Value: Boolean); |
From: <na...@us...> - 2006-11-28 07:20:59
|
Revision: 722 http://svn.sourceforge.net/instantobjects/revision/?rev=722&view=rev Author: nandod Date: 2006-11-27 23:20:59 -0800 (Mon, 27 Nov 2006) Log Message: ----------- * changed doc format to html (supports diffing and is editable with just about any editor). Added Paths: ----------- trunk/Docs/InterBase_DataTypes.html Removed Paths: ------------- trunk/Docs/Interbase DataTypes.doc Copied: trunk/Docs/InterBase_DataTypes.html (from rev 721, trunk/Docs/Interbase DataTypes.doc) =================================================================== (Binary files differ) Deleted: trunk/Docs/Interbase DataTypes.doc =================================================================== (Binary files differ) |