From cb5cb517c068a470662bd1d08bef61265376c802 Mon Sep 17 00:00:00 2001 From: Tomas Bzatek Date: Tue, 17 Nov 2009 11:06:15 +0100 Subject: Remove unneeded casts --- UMain.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/UMain.pas b/UMain.pas index 42a19a3..d80bafd 100644 --- a/UMain.pas +++ b/UMain.pas @@ -6099,7 +6099,7 @@ begin if ConfWarnUnsavedConnection then begin DontShowAgain := False; - res := MessageBoxShowOnce(PGtkWindow(FWidget), PChar(Format(LANGTheActiveConnectionHasNotBeenSaved, [Engine.GetPathURI])), LANGDontShowAgain, DontShowAgain, Buttons, mbWarning, mbNo, CancelButton); + res := MessageBoxShowOnce(PGtkWindow(FWidget), Format(LANGTheActiveConnectionHasNotBeenSaved, [Engine.GetPathURI]), LANGDontShowAgain, DontShowAgain, Buttons, mbWarning, mbNo, CancelButton); if DontShowAgain then begin ConfWarnUnsavedConnection := False; WriteMainGUISettings; @@ -6569,7 +6569,7 @@ begin if tmp = nil then begin err := errno; DebugMsg(['(EE) ExtractFromArchive: Couldn''t create temporary directory: ', strerror(err)]); - Application.MessageBox(PChar(Format(LANGHandleRunFromArchive_CouldntCreateTemporaryDirectory, [s, string(strerror(err))])), [mbOK], mbError, mbOK, mbOK); + Application.MessageBox(Format(LANGHandleRunFromArchive_CouldntCreateTemporaryDirectory, [s, string(strerror(err))]), [mbOK], mbError, mbOK, mbOK); Result := False; Exit; end; -- cgit v1.2.3