From 6082d0a0e1087709b2235c884a032c8a157aff9e Mon Sep 17 00:00:00 2001
From: juha <juha@lazarus-ide.org>
Date: Wed, 27 Oct 2010 22:49:47 +0000
Subject: [PATCH] Build profiles: allow translating strings.

git-svn-id: trunk@27911 -
---
 ide/buildprofilemanager.pas | 8 ++++----
 ide/lazarusidestrconsts.pas | 4 ++++
 2 files changed, 8 insertions(+), 4 deletions(-)

diff --git a/ide/buildprofilemanager.pas b/ide/buildprofilemanager.pas
index b3047bfad1..dd9a9d53c9 100644
--- a/ide/buildprofilemanager.pas
+++ b/ide/buildprofilemanager.pas
@@ -790,8 +790,8 @@ var
 begin
   with TAddProfileForm.Create(nil) do
   try
-    Caption:='Add New Profile';
-    ProfileHeaderLabel.Caption:='Current build options will be saved as:';
+    Caption:=lisLazBuildNewProf;
+    ProfileHeaderLabel.Caption:=lisLazBuildNewProfInfo;
     if (ShowModal=mrOk) and (NameEdit.Text<>'') then begin
       // Update ProfsToManage collection.
       NewProfile:=TBuildLazarusProfile.Create(fProfsToManage,NameEdit.Text);
@@ -834,8 +834,8 @@ begin
   if i<0 then exit;
   with TAddProfileForm.Create(nil) do
   try
-    Caption:='Rename Profile';
-    ProfileHeaderLabel.Caption:='New name for profile:';
+    Caption:=lisLazBuildRenameProf;
+    ProfileHeaderLabel.Caption:=lisLazBuildRenameProfInfo;
     NameEdit.Text:=ProfilesListbox.Items[i];
     if (ShowModal=mrOk) and (NameEdit.Text<>'') then begin
       // Update ProfsToManage collection.
diff --git a/ide/lazarusidestrconsts.pas b/ide/lazarusidestrconsts.pas
index 50f830b2ea..aab69b0730 100644
--- a/ide/lazarusidestrconsts.pas
+++ b/ide/lazarusidestrconsts.pas
@@ -2765,8 +2765,12 @@ resourcestring
   lisLazBuildConfirmBuild = 'Confirm before rebuilding Lazarus';
   lisLazBuildOk = 'Ok';
   lisLazBuildAdd = 'Add';
+  lisLazBuildNewProf = 'Add New Profile';
+  lisLazBuildNewProfInfo = 'Current build options will be associated with:';
   lisLazBuildRemove = 'Remove';
   lisLazBuildRename = 'Rename';
+  lisLazBuildRenameProf = 'Rename Profile';
+  lisLazBuildRenameProfInfo = 'New name for profile:';
   lisCTDTemplates = 'Templates';
   lisSaveSettings = 'Save Settings';
   lisLazBuildCancel = 'Cancel';