paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-16 04:19:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

TTaskDialog: fix WS registration

Browse Source
This commit is contained in:
Martin 2023-07-26 01:03:34 +02:00
parent 4deab8fcb5
commit 89aefec06a
13 changed files with 40 additions and 27 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/interfaces/carbon/carbonwsfactory.pas
View File

@ -6,7 +6,7 @@ interface
uses
Classes, Controls, ComCtrls, StdCtrls, Spin, PairSplitter,
Dialogs, ExtCtrls, Buttons, CheckLst, Forms, Menus, Calendar,
WSLCLClasses,
WSLCLClasses, WSDialogs,
// Carbon units
CarbonWSButtons, CarbonWSCheckLst, CarbonWSComCtrls, CarbonWSControls,
@ -257,7 +257,8 @@ end;
function RegisterTaskDialog: Boolean; alias : 'WSRegisterTaskDialog';
begin
Result := False;
RegisterWSComponent(TTaskDialog, TWSTaskDialog);
Result := True;
end;
// StdCtrls

5
lcl/interfaces/cocoa/cocoawsfactory.pas
View File

@ -7,7 +7,7 @@ interface
uses
Classes, Controls, ComCtrls, StdCtrls, Spin, PairSplitter,
Dialogs, ExtCtrls, Buttons, CheckLst, Forms, Menus, Calendar,
WSLCLClasses,
WSLCLClasses, WSDialogs,
CocoaWSCommon,
CocoaWSButtons,
CocoaWSExtCtrls,
@ -268,7 +268,8 @@ end;
function RegisterTaskDialog: Boolean; alias : 'WSRegisterTaskDialog';
begin
Result := False;
RegisterWSComponent(TTaskDialog, TWSTaskDialog);
Result := True;
end;
// StdCtrls

5
lcl/interfaces/customdrawn/customdrawnwsfactory.pas
View File

@ -7,7 +7,7 @@ interface
uses
Classes, Controls, ComCtrls, ImgList, Calendar, StdCtrls, Spin,
Dialogs, ExtCtrls, Buttons, Forms, Menus,
WSLCLClasses;
WSLCLClasses, WSDialogs;
// imglist
function RegisterCustomImageListResolution: Boolean;
@ -268,7 +268,8 @@ end;
function RegisterTaskDialog: Boolean; alias : 'WSRegisterTaskDialog';
begin
Result := False;
RegisterWSComponent(TTaskDialog, TWSTaskDialog);
Result := True;
end;
// StdCtrls

5
lcl/interfaces/fpgui/fpguiwsfactory.pas
View File

@ -6,7 +6,7 @@ interface
uses
Classes, Controls, StdCtrls, Forms, Menus, ExtCtrls, Dialogs, ComCtrls, Grids,
Buttons, PairSplitter, WSLCLClasses;
Buttons, PairSplitter, WSLCLClasses, WSDialogs;
// imglist
function RegisterCustomImageListResolution: Boolean;
@ -264,7 +264,8 @@ end;
function RegisterTaskDialog: Boolean; alias : 'WSRegisterTaskDialog';
begin
Result := False;
RegisterWSComponent(TTaskDialog, TWSTaskDialog);
Result := True;
end;
// StdCtrls

5
lcl/interfaces/gtk/gtkwsfactory.pas
View File

@ -6,7 +6,7 @@ interface
uses
Classes, Controls, ComCtrls, ImgList, Calendar, StdCtrls, Spin,
Dialogs, ExtCtrls, ExtDlgs, Buttons, CheckLst, Forms, Grids, Menus,
PairSplitter, WSLCLClasses;
PairSplitter, WSLCLClasses, WSDialogs;
// imglist
@ -295,7 +295,8 @@ end;
function RegisterTaskDialog: Boolean; alias : 'WSRegisterTaskDialog';
begin
Result := False;
RegisterWSComponent(TTaskDialog, TWSTaskDialog);
Result := True;
end;
// StdCtrls

5
lcl/interfaces/gtk2/gtk2wsfactory.pas
View File

@ -10,7 +10,7 @@ uses
// LCL
Controls, ComCtrls, Calendar, StdCtrls, Spin,
Dialogs, ExtCtrls, ExtDlgs, Buttons, CheckLst, Forms, Grids, Menus,
PairSplitter, WSLCLClasses;
PairSplitter, WSLCLClasses, WSDialogs;
// imglist
@ -295,7 +295,8 @@ end;
function RegisterTaskDialog: Boolean; alias : 'WSRegisterTaskDialog';
begin
Result := False;
RegisterWSComponent(TTaskDialog, TWSTaskDialog);
Result := True;
end;
// StdCtrls

6
lcl/interfaces/gtk3/gtk3wsfactory.pas
View File

@ -20,7 +20,8 @@ unit Gtk3WSFactory;
interface
uses
Classes, Controls, ComCtrls, Calendar, StdCtrls, Dialogs, ExtCtrls, ExtDlgs,
Buttons, Spin, CheckLst, Forms, Menus, ImgList, PairSplitter, WSLCLClasses;
Buttons, Spin, CheckLst, Forms, Menus, ImgList, PairSplitter, WSLCLClasses,
WSDialogs;
// imglist
@ -306,7 +307,8 @@ end;
function RegisterTaskDialog: Boolean; alias : 'WSRegisterTaskDialog';
begin
Result := False;
RegisterWSComponent(TTaskDialog, TWSTaskDialog);
Result := True;
end;
// StdCtrls

5
lcl/interfaces/mui/muiwsfactory.pas
View File

@ -9,7 +9,7 @@ uses
Spin,
MuiWSControls, MUIwsforms, MuiWSMenus, MUIWSStdCtrls,
MuiWSDialogs, MuiWSComCtrls, MUIWSButtons, MUIWSSpin,
WSLCLClasses;
WSLCLClasses, WSDialogs;
// imglist
function RegisterCustomImageListResolution: Boolean;
@ -257,7 +257,8 @@ end;
function RegisterTaskDialog: Boolean; alias : 'WSRegisterTaskDialog';
begin
Result := False;
RegisterWSComponent(TTaskDialog, TWSTaskDialog);
Result := True;
end;
// StdCtrls

5
lcl/interfaces/qt/qtwsfactory.pas
View File

@ -6,7 +6,7 @@ interface
uses
Classes, Controls, ComCtrls, Calendar, StdCtrls, Spin, Grids,
Dialogs, ExtCtrls, Buttons, CheckLst, Forms, Menus, RubberBand, PairSplitter,
WSLCLClasses;
WSLCLClasses, WSDialogs;
// imglist
function RegisterCustomImageListResolution: Boolean;
@ -272,7 +272,8 @@ end;
function RegisterTaskDialog: Boolean; alias : 'WSRegisterTaskDialog';
begin
Result := False;
RegisterWSComponent(TTaskDialog, TWSTaskDialog);
Result := True;
end;
// StdCtrls

5
lcl/interfaces/qt5/qtwsfactory.pas
View File

@ -6,7 +6,7 @@ interface
uses
Classes, Controls, ComCtrls, Calendar, StdCtrls, Spin, Grids,
Dialogs, ExtCtrls, Buttons, CheckLst, Forms, Menus, RubberBand, PairSplitter,
WSLCLClasses;
WSLCLClasses, WSDialogs;
// imglist
function RegisterCustomImageListResolution: Boolean;
@ -275,7 +275,8 @@ end;
function RegisterTaskDialog: Boolean; alias : 'WSRegisterTaskDialog';
begin
Result := False;
RegisterWSComponent(TTaskDialog, TWSTaskDialog);
Result := True;
end;
// StdCtrls

5
lcl/interfaces/qt6/qtwsfactory.pas
View File

@ -6,7 +6,7 @@ interface
uses
Classes, Controls, ComCtrls, Calendar, StdCtrls, Spin, Grids,
Dialogs, ExtCtrls, Buttons, CheckLst, Forms, Menus, RubberBand, PairSplitter,
WSLCLClasses;
WSLCLClasses, WSDialogs;
// imglist
function RegisterCustomImageListResolution: Boolean;
@ -275,7 +275,8 @@ end;
function RegisterTaskDialog: Boolean; alias : 'WSRegisterTaskDialog';
begin
Result := False;
RegisterWSComponent(TTaskDialog, TWSTaskDialog);
Result := True;
end;
// StdCtrls

6
lcl/interfaces/win32/win32wsfactory.pas
View File

@ -6,7 +6,7 @@ interface
uses
Classes, Controls, ComCtrls, ImgList, Calendar, StdCtrls, Spin,
Dialogs, ExtCtrls, ExtDlgs, Buttons, CheckLst, Forms, Grids, Menus, ShellCtrls,
WSLCLClasses;
WSLCLClasses, WSDialogs;
// imglist
function RegisterCustomImageListResolution: Boolean;
@ -276,8 +276,8 @@ end;
function RegisterTaskDialog: Boolean; alias : 'WSRegisterTaskDialog';
begin
RegisterWSComponent(TTaskDialog, TWin32WSTaskDialog);
Result := True;
RegisterWSComponent(TTaskDialog, TWin32WSTaskDialog);
Result := True;
end;
// StdCtrls

5
lcl/interfaces/wince/wincewsfactory.pas
View File

@ -6,7 +6,7 @@ interface
uses
Classes, Controls, ComCtrls, ImgList, Calendar, StdCtrls, Spin,
Dialogs, ExtCtrls, Buttons, CheckLst, Forms, Menus, Grids,
WSLCLClasses;
WSLCLClasses, WSDialogs;
// imglist
function RegisterCustomImageListResolution: Boolean;
@ -266,7 +266,8 @@ end;
function RegisterTaskDialog: Boolean; alias : 'WSRegisterTaskDialog';
begin
Result := False;
RegisterWSComponent(TTaskDialog, TWSTaskDialog);
Result := True;
end;
// StdCtrls