paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-07 13:20:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

startlazarus: fixed compilation

Browse Source 
git-svn-id: trunk@36205 -
This commit is contained in:
mattias 2012-03-22 01:02:26 +00:00
parent e1589ca6d2
commit 55e680718e
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
ide/lazarusmanager.pas
View File

@ -82,7 +82,7 @@ uses
{$ENDIF}
Classes, SysUtils, Process, UTF8Process,
LCLProc, FileProcs, FileUtil, Forms, Controls, Dialogs,
IDECmdLine, LazConf, Splash;
IDECmdLine, LazConf, Splash, IDEDialogs;
type
TLazarusProcess = class
@ -300,8 +300,7 @@ begin
+CustomExe+#13
+'(date: '+DateTimeToStr(FileDateToDateTimeDef(FileAgeUTF8(CustomExe)))+')'#13
,mtConfirmation,
[mrYes,'Start system default',mrNo,'Start my custom',mrAbort],0
);
[mrYes,'Start system default',mrNo,'Start my custom',mrAbort]);
case MsgResult of
mrYes: FLazarusPath:=DefaultExe;
mrNo: FLazarusPath:=CustomExe;