paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-28 21:00:43 +02:00
Code Issues Packages Projects Releases Wiki Activity

pas2js: show error when downloading

Browse Source
This commit is contained in:
mattias 2024-04-05 21:04:08 +02:00
parent d7e2935f3f
commit a64088aefb
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
components/pas2js/frmpas2jsinstaller.pas
View File

@ -526,6 +526,7 @@ begin
if FDownloadReleaseThread.ErrorMsg<>'' then if FDownloadReleaseThread.ErrorMsg<>'' then
begin begin
Pas2jsProgressDialog.ModalResult:=mrCancel; Pas2jsProgressDialog.ModalResult:=mrCancel;
DetailsMemo.Lines.Add('Error: '+FDownloadReleaseThread.ErrorMsg);
IDEMessageDialog('Error','Download error:'+sLineBreak+FDownloadReleaseThread.ErrorMsg,mtError,[mbOk]); IDEMessageDialog('Error','Download error:'+sLineBreak+FDownloadReleaseThread.ErrorMsg,mtError,[mbOk]);
end else begin end else begin
Pas2jsProgressDialog.ModalResult:=mrOk; Pas2jsProgressDialog.ModalResult:=mrOk;