paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2026-02-04 07:45:08 +01:00
Code Issues Packages Projects Releases Wiki Activity

IDE: project resources: set Modified when type changes, bug #30426

Browse Source 
git-svn-id: branches/fixes_1_6@52785 -
This commit is contained in:
mattias 2016-08-04 09:39:05 +00:00
parent 6d5267d15a
commit a634eea2e4
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
ide/frames/project_resources_options.pas
View File

@ -129,7 +129,11 @@ end;
procedure TResourcesOptionsFrame.cbResourceTypeChange(Sender: TObject);
begin
if Assigned(lbResources.Selected) then
lbResources.Selected.SubItems[LVSUBITEM_TYPE] := ResourceTypeToStr[TUserResourceType(cbResourceType.ItemIndex)];
begin
lbResources.Selected.SubItems[LVSUBITEM_TYPE] :=
ResourceTypeToStr[TUserResourceType(cbResourceType.ItemIndex)];
FModified:=true;
end;
end;
procedure TResourcesOptionsFrame.edResourceNameEditingDone(Sender: TObject);