![]() |
AW: Windows-Taskdialog & Windows XP
Hallo zusammen,
ich dachte ich warte mal bis Kathinka ausgeredet hat ;-) Danke an alle Meldungen. Inzwischen habe ich auch mal mich bei (einem Teil) meinen Anwender rumgehört. Nahezu keiner verwendet mehr XP. Trotzdem würde ich doch mal gerne mORMot - SynTaskDialog ausprobieren. Zum einen weil es nichts kostet und da schon Beispiele drin sind wie man einfach die alten VCL Dialoge ersetzen kann. Noch einige Kommentare: * Soweit ich weiß macht das ShowMessage intern das Fenster selber und verwendet keine Windows-Dialoge. Ergo simuliert die VCL auch. * OT: Ich bin froh dass sich Office nicht an die Windowvorgaben hält. Ich habe es noch nicht geschafft mit meinem Win 7 hier es so zu machen, dass Fenstertitel nicht transparent sind. Wenigstens Office hat das. |
AW: Windows-Taskdialog & Windows XP
Zitat:
Entweder es wird selber aus einer TForm der Dialog zusammengebaut oder es wird die WinAPI genutzt. ShowMessage landet irgendwann hier
Delphi-Quellcode:
Oben geht es zu den Task-Dialogs der WinAPI (ab Vista mit aktiven XP-Styles)
function MessageDlgPosHelp(const Msg: string; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons; HelpCtx: Longint; X, Y: Integer; const HelpFileName: string): Integer;
begin if TOSVersion.Check(6) and UseLatestCommonDialogs and IsNewCommonCtrl and StyleServices.IsSystemStyle then Result := DoTaskMessageDlgPosHelp('', Msg, DlgType, Buttons, HelpCtx, X, Y, HelpFileName) else Result := DoMessageDlgPosHelp(CreateMessageDialog(Msg, DlgType, Buttons), HelpCtx, X, Y, HelpFileName); end; und CreateMessageDialog baut eine eigene TMessageForm der VCL auf. Du kannst auch selber WinApi.Windows. ![]() ![]() Bei Letzterem wird zusätzlich noch die Fensterposition bestimmt, die Aktivität der anderen VCL-Forms gestuert und UseRightToLeftReading als MB_RTLREADING an die API übergeben. Aber simuliert wird nichts. ![]() Genau das Gleiche macht auch ![]() |
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:21 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz