diff options
Diffstat (limited to 'plugins/HistoryPlusPlus/EventDetailForm.pas')
-rw-r--r-- | plugins/HistoryPlusPlus/EventDetailForm.pas | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/plugins/HistoryPlusPlus/EventDetailForm.pas b/plugins/HistoryPlusPlus/EventDetailForm.pas index eedae3bc66..06bffc478d 100644 --- a/plugins/HistoryPlusPlus/EventDetailForm.pas +++ b/plugins/HistoryPlusPlus/EventDetailForm.pas @@ -676,10 +676,10 @@ end; procedure TEventDetailsFrm.BrowseReceivedFilesClick(Sender: TObject);
var
- Path: Array [0 .. MAX_PATH] of AnsiChar;
+ Path: Array [0 .. MAX_PATH] of WideChar;
begin
CallService(MS_FILE_GETRECEIVEDFILESFOLDER, FParentForm.hContact, LPARAM(@Path));
- ShellExecuteA(0, 'open', Path, nil, nil, SW_SHOW);
+ ShellExecuteW(0, 'open', Path, nil, nil, SW_SHOW);
end;
procedure TEventDetailsFrm.ETextURLClick(Sender: TObject; const URLText: String; Button: TMouseButton);
|