Niepoprawna ikona MessageDlg ze stałą DlgType mtConfirmation?

Question

W Delphi 10.1.2 Berlin, w funkcji Vcl.Dialogs.MessageDlg, DlgType stałe mtInformation i mtConfirmation tworzą tę samą ikonę okna dialogowego. Na przykład:

if Vcl.Dialogs.MessageDlg('Do you really want to remove the selected item?', mtConfirmation, mbOKCancel, 0) = mrOk then 
begin 
    RemoveTheSelectedItem; 
end; 

if Vcl.Dialogs.MessageDlg('Do you really want to remove the selected item?', mtInformation, mbOKCancel, 0) = mrOk then 
begin 
    RemoveTheSelectedItem; 
end; 

Ale nie powinno stała mtConfirmation wyświetlania A znak zapytania ikona DlgType (jak inne DlgType stałych mtWarning i mtError tworzyć każdy inna ikona)?

Jak uzyskać znak zapytania ze znakiem zapytania ze stałą DlgTypemtConfirmation?

Answer 1

Mówi się w help:

Mając mtConfirmation wykazują Pytajnik

Okna dialogowe typu TMsgDlgType.mtConfirmation przedstawiają informacje ikonę.

W przeszłości, kiedyś pokazać znak zapytania zamiast, ale Microsoft usunięto symbol znak zapytania z funkcji API Windows, który VCL używa do wyświetlania okien dialogowych TMsgDlgType.mtConfirmation. Cytując Microsoft: "Ikona wiadomości ze znakiem zapytania nie jest już zalecana, ponieważ jest niepoprawnie reprezentatywna dla określonego rodzaju wiadomości o numerze , a ponieważ frazowanie wiadomości jako pytania może mieć wartość dla dowolnego typu wiadomości. może pomylić znak zapytania o symbolu z informacjami Pomocy. " Aby użyć poprzedniego wyglądu okna dialogowego , należy ustawić zmienną UseLatestCommonDialogs jednostki Vcl.Dialogs na False.

Więc ten kod:

Vcl.Dialogs.UseLatestCommonDialogs := False; 
    if Vcl.Dialogs.MessageDlg('Do you really want to remove the selected item?', mtConfirmation, mbOKCancel, 0) = mrOk then 
    begin 
    RemoveTheSelectedItem; 
    end; 

produkuje ten wynik!