diff --git a/components/projectgroups/languages/projectgroupstrconst.de.po b/components/projectgroups/languages/projectgroupstrconst.de.po index f8478832fc..c9b750a66d 100644 --- a/components/projectgroups/languages/projectgroupstrconst.de.po +++ b/components/projectgroups/languages/projectgroupstrconst.de.po @@ -52,6 +52,10 @@ msgstr "Erstellmodus nicht gefunden" msgid "Build mode \"%s\" not found." msgstr "Erstellmodus \"%s\" nicht gefunden." +#: projectgroupstrconst.lischangesgetlostatreload +msgid "There are unsaved changes that get lost if you reload the project group. Do you really want to reload?" +msgstr "" + #: projectgroupstrconst.liscompileandbuildcompiletarget msgid "\"Compile\" and \"Build\" compile target" msgstr "" @@ -148,10 +152,6 @@ msgstr "lazbuild nicht gefunden" msgid "More" msgstr "Weitere" -#: projectgroupstrconst.lisneedsave -msgid "Need save" -msgstr "" - #: projectgroupstrconst.lisnewprojectgroup msgctxt "projectgroupstrconst.lisnewprojectgroup" msgid "New project group" @@ -230,11 +230,6 @@ msgstr "Package \"%s\" nicht gefunden." msgid "Pascal files (*.pas;*.pp;*.p)" msgstr "Pascal-Dateien (*.pas;*.pp;*.p)" -#: projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou -msgctxt "projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou" -msgid "Please save your changes before reloading the project group." -msgstr "Bitte speichern Sie ihre Änderungen vor dem Neuladen der Projektgruppe." - #: projectgroupstrconst.lisprojectgroup #, object-pascal-format msgid "Project group %s" diff --git a/components/projectgroups/languages/projectgroupstrconst.fr.po b/components/projectgroups/languages/projectgroupstrconst.fr.po index b72931d9b9..7738342584 100644 --- a/components/projectgroups/languages/projectgroupstrconst.fr.po +++ b/components/projectgroups/languages/projectgroupstrconst.fr.po @@ -51,6 +51,10 @@ msgstr "Mode de construction introuvable" msgid "Build mode \"%s\" not found." msgstr "Le mode de construction \"%s\" est introuvable." +#: projectgroupstrconst.lischangesgetlostatreload +msgid "There are unsaved changes that get lost if you reload the project group. Do you really want to reload?" +msgstr "" + #: projectgroupstrconst.liscompileandbuildcompiletarget msgid "\"Compile\" and \"Build\" compile target" msgstr "Cible de \"Compiler\" et \"Construire\"" @@ -143,10 +147,6 @@ msgstr "lazbuild introuvable" msgid "More" msgstr "Plus" -#: projectgroupstrconst.lisneedsave -msgid "Need save" -msgstr "Enregistrement nécessaire" - #: projectgroupstrconst.lisnewprojectgroup msgctxt "projectgroupstrconst.lisnewprojectgroup" msgid "New project group" @@ -225,11 +225,6 @@ msgstr "Paquet \"%s\" non trouvé." msgid "Pascal files (*.pas;*.pp;*.p)" msgstr "Fichiers Pascal (*.pas;*.pp;*.p)" -#: projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou -msgctxt "projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou" -msgid "Please save your changes before reloading the project group." -msgstr "Veuillez enregistrer les modifications avant de recharger le groupe de projets." - #: projectgroupstrconst.lisprojectgroup #, object-pascal-format msgid "Project group %s" diff --git a/components/projectgroups/languages/projectgroupstrconst.hu.po b/components/projectgroups/languages/projectgroupstrconst.hu.po index 70dc771e6a..2ce9adf8a6 100644 --- a/components/projectgroups/languages/projectgroupstrconst.hu.po +++ b/components/projectgroups/languages/projectgroupstrconst.hu.po @@ -51,6 +51,10 @@ msgstr "Építési mód nem található." msgid "Build mode \"%s\" not found." msgstr "A(z) \"%s\" építési mód nem található." +#: projectgroupstrconst.lischangesgetlostatreload +msgid "There are unsaved changes that get lost if you reload the project group. Do you really want to reload?" +msgstr "" + #: projectgroupstrconst.liscompileandbuildcompiletarget msgid "\"Compile\" and \"Build\" compile target" msgstr "\"Fordítás\" és \"Építés\" a projektcsoportnak megfelelően" @@ -143,10 +147,6 @@ msgstr "lazbuild nem található" msgid "More" msgstr "Továbbiak" -#: projectgroupstrconst.lisneedsave -msgid "Need save" -msgstr "Mentés szükséges" - #: projectgroupstrconst.lisnewprojectgroup msgctxt "projectgroupstrconst.lisnewprojectgroup" msgid "New project group" @@ -225,11 +225,6 @@ msgstr "A(z) \"%s\" csomag nem található." msgid "Pascal files (*.pas;*.pp;*.p)" msgstr "Pascal fájlok (*.pas;*.pp;*.p)" -#: projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou -msgctxt "projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou" -msgid "Please save your changes before reloading the project group." -msgstr "Menteni kell a változásokat mielőtt újra betölti a projektcsoportot." - #: projectgroupstrconst.lisprojectgroup #, object-pascal-format msgid "Project group %s" diff --git a/components/projectgroups/languages/projectgroupstrconst.it.po b/components/projectgroups/languages/projectgroupstrconst.it.po index ceb2ecd4cd..128e324150 100644 --- a/components/projectgroups/languages/projectgroupstrconst.it.po +++ b/components/projectgroups/languages/projectgroupstrconst.it.po @@ -41,6 +41,10 @@ msgstr "Modalità di costruzione non trovata" msgid "Build mode \"%s\" not found." msgstr "Modalità di costruzione \"%s\" non trovata." +#: projectgroupstrconst.lischangesgetlostatreload +msgid "There are unsaved changes that get lost if you reload the project group. Do you really want to reload?" +msgstr "" + #: projectgroupstrconst.liscompileandbuildcompiletarget msgid "\"Compile\" and \"Build\" compile target" msgstr "" @@ -137,10 +141,6 @@ msgstr "lazbuild non trovato" msgid "More" msgstr "Altro" -#: projectgroupstrconst.lisneedsave -msgid "Need save" -msgstr "Salvataggio richiesto" - #: projectgroupstrconst.lisnewprojectgroup msgctxt "projectgroupstrconst.lisnewprojectgroup" msgid "New project group" @@ -225,11 +225,6 @@ msgstr "Pacchetto \"%s\" non trovato." msgid "Pascal files (*.pas;*.pp;*.p)" msgstr "File Pascal (*.pas;*.pp;*.p)" -#: projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou -msgctxt "projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou" -msgid "Please save your changes before reloading the project group." -msgstr "Salvare i cambiamenti prima di ricaricare il gruppo di progetti." - #: projectgroupstrconst.lisprojectgroup #, object-pascal-format msgid "Project group %s" diff --git a/components/projectgroups/languages/projectgroupstrconst.lt.po b/components/projectgroups/languages/projectgroupstrconst.lt.po index 48d033eaf3..4cffe6d0d2 100644 --- a/components/projectgroups/languages/projectgroupstrconst.lt.po +++ b/components/projectgroups/languages/projectgroupstrconst.lt.po @@ -52,6 +52,10 @@ msgstr "Nerastas darymo rėžimas" msgid "Build mode \"%s\" not found." msgstr "Nerastas darymo rėžimas „%s“." +#: projectgroupstrconst.lischangesgetlostatreload +msgid "There are unsaved changes that get lost if you reload the project group. Do you really want to reload?" +msgstr "" + #: projectgroupstrconst.liscompileandbuildcompiletarget msgid "\"Compile\" and \"Build\" compile target" msgstr "" @@ -148,10 +152,6 @@ msgstr "„lazbuild“ nerastas" msgid "More" msgstr "Daugiau" -#: projectgroupstrconst.lisneedsave -msgid "Need save" -msgstr "Būtina įrašyti" - #: projectgroupstrconst.lisnewprojectgroup msgctxt "projectgroupstrconst.lisnewprojectgroup" msgid "New project group" @@ -230,11 +230,6 @@ msgstr "Paketas „%s“ nerastas." msgid "Pascal files (*.pas;*.pp;*.p)" msgstr "Paskalio failai (*.pas;*.pp;*.p)" -#: projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou -msgctxt "projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou" -msgid "Please save your changes before reloading the project group." -msgstr "Prieš iš naujo įkeliant projekto grupę reikia įrašyti pakeitimus." - #: projectgroupstrconst.lisprojectgroup #, object-pascal-format msgid "Project group %s" diff --git a/components/projectgroups/languages/projectgroupstrconst.pot b/components/projectgroups/languages/projectgroupstrconst.pot index 9728d45179..0cceee9261 100644 --- a/components/projectgroups/languages/projectgroupstrconst.pot +++ b/components/projectgroups/languages/projectgroupstrconst.pot @@ -41,6 +41,10 @@ msgstr "" msgid "Build mode \"%s\" not found." msgstr "" +#: projectgroupstrconst.lischangesgetlostatreload +msgid "There are unsaved changes that get lost if you reload the project group. Do you really want to reload?" +msgstr "" + #: projectgroupstrconst.liscompileandbuildcompiletarget msgid "\"Compile\" and \"Build\" compile target" msgstr "" @@ -130,10 +134,6 @@ msgstr "" msgid "More" msgstr "" -#: projectgroupstrconst.lisneedsave -msgid "Need save" -msgstr "" - #: projectgroupstrconst.lisnewprojectgroup msgctxt "projectgroupstrconst.lisnewprojectgroup" msgid "New project group" @@ -212,11 +212,6 @@ msgstr "" msgid "Pascal files (*.pas;*.pp;*.p)" msgstr "" -#: projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou -msgctxt "projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou" -msgid "Please save your changes before reloading the project group." -msgstr "" - #: projectgroupstrconst.lisprojectgroup #, object-pascal-format msgid "Project group %s" diff --git a/components/projectgroups/languages/projectgroupstrconst.pt_BR.po b/components/projectgroups/languages/projectgroupstrconst.pt_BR.po index 044b1753d6..bb5d17feb7 100644 --- a/components/projectgroups/languages/projectgroupstrconst.pt_BR.po +++ b/components/projectgroups/languages/projectgroupstrconst.pt_BR.po @@ -51,6 +51,10 @@ msgstr "Modo de construção não encontrado" msgid "Build mode \"%s\" not found." msgstr "Modo construção \"%s\" não encontrado." +#: projectgroupstrconst.lischangesgetlostatreload +msgid "There are unsaved changes that get lost if you reload the project group. Do you really want to reload?" +msgstr "" + #: projectgroupstrconst.liscompileandbuildcompiletarget msgid "\"Compile\" and \"Build\" compile target" msgstr "\"Compilar\" e \"Construir\" alvo da compilação" @@ -143,10 +147,6 @@ msgstr "lazbuild não encontrado" msgid "More" msgstr "Mais" -#: projectgroupstrconst.lisneedsave -msgid "Need save" -msgstr "Necessário salvar" - #: projectgroupstrconst.lisnewprojectgroup msgctxt "projectgroupstrconst.lisnewprojectgroup" msgid "New project group" @@ -225,11 +225,6 @@ msgstr "Pacote \"%s\" não encontrado." msgid "Pascal files (*.pas;*.pp;*.p)" msgstr "Arquivos pascal (*.pas;*.pp;*.p)" -#: projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou -msgctxt "projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou" -msgid "Please save your changes before reloading the project group." -msgstr "Favor salvar suas alterações antes de recarregar o grupo de projeto" - #: projectgroupstrconst.lisprojectgroup #, object-pascal-format msgid "Project group %s" diff --git a/components/projectgroups/languages/projectgroupstrconst.ru.po b/components/projectgroups/languages/projectgroupstrconst.ru.po index 7e9bee82b8..4506ed5411 100644 --- a/components/projectgroups/languages/projectgroupstrconst.ru.po +++ b/components/projectgroups/languages/projectgroupstrconst.ru.po @@ -51,6 +51,10 @@ msgstr "Режим сборки не найден" msgid "Build mode \"%s\" not found." msgstr "Режим сборки \"%s\" не найден." +#: projectgroupstrconst.lischangesgetlostatreload +msgid "There are unsaved changes that get lost if you reload the project group. Do you really want to reload?" +msgstr "" + #: projectgroupstrconst.liscompileandbuildcompiletarget msgid "\"Compile\" and \"Build\" compile target" msgstr "Компилировать цель командами \"Компилировать\" и \"Собрать\"" @@ -143,10 +147,6 @@ msgstr "Программа lazbuild не найдена" msgid "More" msgstr "Прочие" -#: projectgroupstrconst.lisneedsave -msgid "Need save" -msgstr "Требуется сохранение" - #: projectgroupstrconst.lisnewprojectgroup msgctxt "projectgroupstrconst.lisnewprojectgroup" msgid "New project group" @@ -225,11 +225,6 @@ msgstr "Пакет \"%s\" не найден." msgid "Pascal files (*.pas;*.pp;*.p)" msgstr "Файлы Паскаля (*.pas;*.pp;*.p)" -#: projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou -msgctxt "projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou" -msgid "Please save your changes before reloading the project group." -msgstr "Сохраните ваши изменения перед перезагрузкой группы проектов." - #: projectgroupstrconst.lisprojectgroup #, object-pascal-format msgid "Project group %s" diff --git a/components/projectgroups/languages/projectgroupstrconst.tr.po b/components/projectgroups/languages/projectgroupstrconst.tr.po index 6b3a6f6957..97bce191cf 100644 --- a/components/projectgroups/languages/projectgroupstrconst.tr.po +++ b/components/projectgroups/languages/projectgroupstrconst.tr.po @@ -51,6 +51,10 @@ msgstr "Derleme modu bulunamadı" msgid "Build mode \"%s\" not found." msgstr "\"%s\" Derleme modu bulunamadı." +#: projectgroupstrconst.lischangesgetlostatreload +msgid "There are unsaved changes that get lost if you reload the project group. Do you really want to reload?" +msgstr "" + #: projectgroupstrconst.liscompileandbuildcompiletarget msgid "\"Compile\" and \"Build\" compile target" msgstr "\"Compile\" ve \"Build\" derleme hedefi" @@ -143,10 +147,6 @@ msgstr "lazbuild bulunamadı" msgid "More" msgstr "Daha fazla" -#: projectgroupstrconst.lisneedsave -msgid "Need save" -msgstr "Kaydetmeniz gerekir" - #: projectgroupstrconst.lisnewprojectgroup msgctxt "projectgroupstrconst.lisnewprojectgroup" msgid "New project group" @@ -225,11 +225,6 @@ msgstr "Paket \"%s\" bulunamadı." msgid "Pascal files (*.pas;*.pp;*.p)" msgstr "Pascal dosyaları (*.pas;*.pp)|*.pas;*.pp" -#: projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou -msgctxt "projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou" -msgid "Please save your changes before reloading the project group." -msgstr "Lütfen proje grubunu yeniden yüklemeden önce değişikliklerinizi kaydedin." - #: projectgroupstrconst.lisprojectgroup #, object-pascal-format msgid "Project group %s" diff --git a/components/projectgroups/languages/projectgroupstrconst.uk.po b/components/projectgroups/languages/projectgroupstrconst.uk.po index d7dc513123..4d50dcfe6c 100644 --- a/components/projectgroups/languages/projectgroupstrconst.uk.po +++ b/components/projectgroups/languages/projectgroupstrconst.uk.po @@ -52,6 +52,10 @@ msgstr "Режим збирання не знайдено" msgid "Build mode \"%s\" not found." msgstr "Режим збирання \"%s\" не знайдено." +#: projectgroupstrconst.lischangesgetlostatreload +msgid "There are unsaved changes that get lost if you reload the project group. Do you really want to reload?" +msgstr "" + #: projectgroupstrconst.liscompileandbuildcompiletarget msgid "\"Compile\" and \"Build\" compile target" msgstr "\"Компілювати\" і \"Зібрати\" компілюють ціль" @@ -144,10 +148,6 @@ msgstr "Програму lazbuild не знайдено" msgid "More" msgstr "Більше" -#: projectgroupstrconst.lisneedsave -msgid "Need save" -msgstr "Потрібно зберегти" - #: projectgroupstrconst.lisnewprojectgroup msgctxt "projectgroupstrconst.lisnewprojectgroup" msgid "New project group" @@ -226,11 +226,6 @@ msgstr "Пакунок \"%s\" не знайдено." msgid "Pascal files (*.pas;*.pp;*.p)" msgstr "Файли Паскалю (*.pas;*.pp;*.p)" -#: projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou -msgctxt "projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou" -msgid "Please save your changes before reloading the project group." -msgstr "Збережіть ваші зміни перед перезавантаженням групи проєктів." - #: projectgroupstrconst.lisprojectgroup #, object-pascal-format msgid "Project group %s" diff --git a/components/projectgroups/languages/projectgroupstrconst.zh_CN.po b/components/projectgroups/languages/projectgroupstrconst.zh_CN.po index 1e4eabe34e..fd02320fc7 100644 --- a/components/projectgroups/languages/projectgroupstrconst.zh_CN.po +++ b/components/projectgroups/languages/projectgroupstrconst.zh_CN.po @@ -52,6 +52,10 @@ msgstr "构建模式未找到" msgid "Build mode \"%s\" not found." msgstr "构建模式\"%s\"未找到" +#: projectgroupstrconst.lischangesgetlostatreload +msgid "There are unsaved changes that get lost if you reload the project group. Do you really want to reload?" +msgstr "" + #: projectgroupstrconst.liscompileandbuildcompiletarget msgid "\"Compile\" and \"Build\" compile target" msgstr "" @@ -148,10 +152,6 @@ msgstr "lazbuild未找到" msgid "More" msgstr "更多" -#: projectgroupstrconst.lisneedsave -msgid "Need save" -msgstr "需要保存" - #: projectgroupstrconst.lisnewprojectgroup msgctxt "projectgroupstrconst.lisnewprojectgroup" msgid "New project group" @@ -230,11 +230,6 @@ msgstr "包\"%s\"未找到." msgid "Pascal files (*.pas;*.pp;*.p)" msgstr "Pascal文件(*.pas;*.pp;*.p)" -#: projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou -msgctxt "projectgroupstrconst.lispleasesaveyourchangesbeforereloadingtheprojectgrou" -msgid "Please save your changes before reloading the project group." -msgstr "请保存你的更改 在重新加载该工程组前." - #: projectgroupstrconst.lisprojectgroup #, object-pascal-format msgid "Project group %s" diff --git a/components/projectgroups/projectgroupeditor.pas b/components/projectgroups/projectgroupeditor.pas index 566741ab1c..a200c91987 100644 --- a/components/projectgroups/projectgroupeditor.pas +++ b/components/projectgroups/projectgroupeditor.pas @@ -970,11 +970,9 @@ begin begin PG:=TIDEProjectGroup(ProjectGroup); if PG.Modified then begin - // ToDo: revert - IDEMessageDialog(lisNeedSave, lisPleaseSaveYourChangesBeforeReloadingTheProjectGrou, - mtError,[mbOK]); PG.UpdateMissing; - exit; + if IDEMessageDialog(lisProjectGroupModified, lisChangesGetLostAtReload, mtConfirmation, mbYesNo)<>mrYes then + exit; end; ProjectGroup:=nil; try diff --git a/components/projectgroups/projectgroupstrconst.pas b/components/projectgroups/projectgroupstrconst.pas index 95dd780a39..f71e73e700 100644 --- a/components/projectgroups/projectgroupstrconst.pas +++ b/components/projectgroups/projectgroupstrconst.pas @@ -128,8 +128,8 @@ Resourcestring lisLazarusPackagesLpk = 'Lazarus packages (*.lpk)'; lisLazarusProjectGroupsLpg = 'Lazarus project groups (*.lpg)'; lisPascalFilePasPpP = 'Pascal files (*.pas;*.pp;*.p)'; - lisNeedSave = 'Need save'; - lisPleaseSaveYourChangesBeforeReloadingTheProjectGrou = 'Please save your changes before reloading the project group.'; + lisChangesGetLostAtReload = 'There are unsaved changes that get lost if you reload the project group. '+ + 'Do you really want to reload?'; lisProjectGroupReload = 'Reload'; lisMore = 'More';