mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-18 12:59:14 +02:00
Components, H2Pas IDE wizard: fixed compilation
git-svn-id: trunk@29525 -
This commit is contained in:
parent
ea700f0efd
commit
0cb9ab07e5
@ -29,7 +29,7 @@ uses
|
|||||||
FileProcs,
|
FileProcs,
|
||||||
IDEMsgIntf, MenuIntf, IDECommands, BaseIDEIntf, IDEDialogs, LazIDEIntf,
|
IDEMsgIntf, MenuIntf, IDECommands, BaseIDEIntf, IDEDialogs, LazIDEIntf,
|
||||||
ProjectIntf, CodeToolManager, SrcEditorIntf, IDETextConverter,
|
ProjectIntf, CodeToolManager, SrcEditorIntf, IDETextConverter,
|
||||||
H2PasStrConsts, H2PasConvert, IDETextConvListEdit;
|
H2PasStrConsts, H2PasConvert, IDETextConvListEdit, CompOptsIntf;
|
||||||
|
|
||||||
type
|
type
|
||||||
|
|
||||||
@ -99,7 +99,6 @@ type
|
|||||||
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
|
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
|
||||||
procedure CHeaderFilesCheckTreeViewSelectionChanged(Sender: TObject);
|
procedure CHeaderFilesCheckTreeViewSelectionChanged(Sender: TObject);
|
||||||
procedure CloseButtonClick(Sender: TObject);
|
procedure CloseButtonClick(Sender: TObject);
|
||||||
procedure ConstantsInsteadOfEnumsCheckBoxChange(Sender: TObject);
|
|
||||||
procedure ConvertAndBuildButtonClick(Sender: TObject);
|
procedure ConvertAndBuildButtonClick(Sender: TObject);
|
||||||
procedure ConvertButtonClick(Sender: TObject);
|
procedure ConvertButtonClick(Sender: TObject);
|
||||||
procedure DeleteCHeadersButtonClick(Sender: TObject);
|
procedure DeleteCHeadersButtonClick(Sender: TObject);
|
||||||
@ -356,11 +355,6 @@ begin
|
|||||||
Close;
|
Close;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TH2PasDialog.ConstantsInsteadOfEnumsCheckBoxChange(Sender: TObject);
|
|
||||||
begin
|
|
||||||
|
|
||||||
end;
|
|
||||||
|
|
||||||
procedure TH2PasDialog.ConvertAndBuildButtonClick(Sender: TObject);
|
procedure TH2PasDialog.ConvertAndBuildButtonClick(Sender: TObject);
|
||||||
begin
|
begin
|
||||||
if Convert=mrOk then
|
if Convert=mrOk then
|
||||||
|
Loading…
Reference in New Issue
Block a user