mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-23 02:59:33 +02:00
Converter: improve messages a bit
git-svn-id: trunk@38911 -
This commit is contained in:
parent
6c5a8a9ae8
commit
0e8eb89d5e
@ -1009,7 +1009,8 @@ var
|
||||
Converter: TDelphiUnit;
|
||||
i: Integer;
|
||||
begin
|
||||
IDEMessagesWindow.AddMsg(lisConvDelphiRepairingFormFiles, '', -1);
|
||||
if not fSettings.SameDfmFile then
|
||||
IDEMessagesWindow.AddMsg(lisConvDelphiRepairingFormFiles, '', -1);
|
||||
Application.ProcessMessages;
|
||||
Screen.Cursor:=crHourGlass;
|
||||
try
|
||||
|
Loading…
Reference in New Issue
Block a user