summaryrefslogtreecommitdiff
path: root/plugins/HistoryPlusPlus
diff options
context:
space:
mode:
authorGeorge Hazan <ghazan@miranda.im>2023-04-19 19:14:25 +0300
committerGeorge Hazan <ghazan@miranda.im>2023-04-19 19:14:25 +0300
commit617cc8e1277692d32197163a7a377aba4a8f2805 (patch)
treee95e95f6151610fb7e486522fcc8bf3d1d84566b /plugins/HistoryPlusPlus
parentb72af00b956bd3ec2c2b8593cd1171d7c95668ae (diff)
fixes #3483 (History++: невозможно удалить из базы сообщение групчата)
Diffstat (limited to 'plugins/HistoryPlusPlus')
-rw-r--r--plugins/HistoryPlusPlus/hpp_external.pas1
-rw-r--r--plugins/HistoryPlusPlus/hpp_externalgrid.pas3
2 files changed, 3 insertions, 1 deletions
diff --git a/plugins/HistoryPlusPlus/hpp_external.pas b/plugins/HistoryPlusPlus/hpp_external.pas
index 53843d277f..cb81d72363 100644
--- a/plugins/HistoryPlusPlus/hpp_external.pas
+++ b/plugins/HistoryPlusPlus/hpp_external.pas
@@ -189,6 +189,7 @@ begin
CustomItem.Nick := AnsiToWideString(AnsiString(customEvent.Nick.a),UsedCodepage);
CustomItem.Sent := boolean(customEvent.bIsMe);
CustomItem.Time := customEvent.time;
+ CustomItem.hEvent := customEvent.hEvent;
ExtGrid.AddCustomEvent(event.hContact, CustomItem, UsedCodepage,
boolean(event.dwFlags and IEEF_RTL),
not boolean(event.dwFlags and IEEF_NO_SCROLLING));
diff --git a/plugins/HistoryPlusPlus/hpp_externalgrid.pas b/plugins/HistoryPlusPlus/hpp_externalgrid.pas
index c19a755f76..f21422393d 100644
--- a/plugins/HistoryPlusPlus/hpp_externalgrid.pas
+++ b/plugins/HistoryPlusPlus/hpp_externalgrid.pas
@@ -36,6 +36,7 @@ type
Text: String;
Sent: Boolean;
Time: DWord;
+ HEvent: TMEVENT;
end;
TExtItem = record
@@ -957,7 +958,7 @@ end;
procedure TExternalGrid.GridItemDelete(Sender: TObject; Index: Integer);
begin
- if (FGridState = gsDelete) and (Items[Index].hDBEvent <> 0) and (not Items[Index].Custom) then
+ if (FGridState = gsDelete) and (Items[Index].hDBEvent <> 0) then
db_event_delete(Items[Index].hDBEvent);
if Index <> High(Items) then
begin