paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-16 23:49:28 +02:00
Code Issues Packages Projects Releases Wiki Activity

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

Browse Source 
git-svn-id: trunk@52784 -
This commit is contained in:
mattias 2016-08-04 09:38:45 +00:00
parent 85e1fb11da
commit 697fe56615
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);