mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-09 15:28:14 +02:00
formatting
git-svn-id: trunk@16697 -
This commit is contained in:
parent
bc6266096a
commit
fc8281fe7f
@ -66,17 +66,17 @@ var
|
||||
begin
|
||||
result:=tpws_closeIDE;
|
||||
ProjectWizardDialog:=TProjectWizardDialog.create(nil);
|
||||
with ProjectWizardDialog do begin
|
||||
btnNewProject.caption:=lisPWNewProject;
|
||||
btnOpenProject.caption:=lisPWOpenProject;
|
||||
btnConvertProject.caption:=lisPWConvertProject;
|
||||
btnCloseIDE.caption:=lisQuitLazarus;
|
||||
btnNewProject.LoadGlyphFromLazarusResource('item_project');
|
||||
btnOpenProject.LoadGlyphFromLazarusResource('menu_project_open');
|
||||
btnCloseIDE.LoadGlyphFromLazarusResource('menu_exit');
|
||||
with ProjectWizardDialog do
|
||||
begin
|
||||
btnNewProject.caption:=lisPWNewProject;
|
||||
btnOpenProject.caption:=lisPWOpenProject;
|
||||
btnConvertProject.caption:=lisPWConvertProject;
|
||||
btnCloseIDE.caption:=lisQuitLazarus;
|
||||
btnNewProject.LoadGlyphFromLazarusResource('item_project');
|
||||
btnOpenProject.LoadGlyphFromLazarusResource('menu_project_open');
|
||||
btnCloseIDE.LoadGlyphFromLazarusResource('menu_exit');
|
||||
end;
|
||||
|
||||
|
||||
try
|
||||
if ProjectWizardDialog.showmodal<>mrOk then exit;
|
||||
result:=ProjectWizardDialog.result;
|
||||
|
Loading…
Reference in New Issue
Block a user