diff --git a/wst/trunk/ide/lazarus/test/test_import.lpi b/wst/trunk/ide/lazarus/test/test_import.lpi index dd53cbbe2..8620f4f99 100644 --- a/wst/trunk/ide/lazarus/test/test_import.lpi +++ b/wst/trunk/ide/lazarus/test/test_import.lpi @@ -1,17 +1,20 @@ - + + - + + + - - - - + + + + @@ -29,348 +32,336 @@ - + - - - + + + + - - - - - - + + + + + + + - - + + - - - + + - - + + - - + - + - - - - - + + - - + + - + - - - - + - + + - - - - - - - + + - - - - - + + - - + - - - - - + + - - - - - + + - - - + + - - - + + + - - + + - - + - - + - - + + - - - - - - + + + + + + - - - + + + - - + + + - - - + + + - - + + + - - + + + - - + + + - - + + + - - + + + - - + + - - + + + - + + - - - - - - + + + - - - + + + - - + + + - - + + + - - + + + - - + + + - - - + + + + + + + + + + + + + + - + - - - - - - - - + + + + + + + + - - - - - - - - - + - - + + - - + @@ -381,16 +372,22 @@ - + + + + + + + diff --git a/wst/trunk/ide/lazarus/test/test_import.lpr b/wst/trunk/ide/lazarus/test/test_import.lpr index 5a9f9f108..93d7b8af0 100644 --- a/wst/trunk/ide/lazarus/test/test_import.lpr +++ b/wst/trunk/ide/lazarus/test/test_import.lpr @@ -7,8 +7,8 @@ uses cthreads, {$ENDIF}{$ENDIF} Interfaces, // this includes the LCL widgetset - Forms - { add your units here }, wstimportdlg, uform2; + Forms, + wstimportdlg, uform2; begin Application.Initialize; diff --git a/wst/trunk/ide/lazarus/test/uform2.lrs b/wst/trunk/ide/lazarus/test/uform2.lrs deleted file mode 100644 index f3ecf59c5..000000000 --- a/wst/trunk/ide/lazarus/test/uform2.lrs +++ /dev/null @@ -1,8 +0,0 @@ -LazarusResources.Add('TForm2','FORMDATA',[ - 'TPF0'#6'TForm2'#5'Form2'#4'Left'#3'B'#1#6'Height'#3','#1#3'Top'#3#19#1#5'Wid' - +'th'#3#144#1#18'HorzScrollBar.Page'#3#143#1#18'VertScrollBar.Page'#3'+'#1#13 - +'ActiveControl'#7#7'Button1'#7'Caption'#6#5'Form2'#12'ClientHeight'#3','#1#11 - +'ClientWidth'#3#144#1#0#7'TButton'#7'Button1'#4'Left'#3#190#0#6'Height'#2#25 - +#3'Top'#2'A'#5'Width'#2'K'#25'BorderSpacing.InnerBorder'#2#4#7'Caption'#6#7 - +'Button1'#7'OnClick'#7#12'Button1Click'#8'TabOrder'#2#0#0#0#0 -]); diff --git a/wst/trunk/ide/lazarus/test/uform2.pas b/wst/trunk/ide/lazarus/test/uform2.pas index 653381d64..52fe8c541 100644 --- a/wst/trunk/ide/lazarus/test/uform2.pas +++ b/wst/trunk/ide/lazarus/test/uform2.pas @@ -5,25 +5,26 @@ unit uform2; interface uses - Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, Buttons; + StdCtrls, Forms; type - { TForm2 } - TForm2 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private - { private declarations } + public - { public declarations } + end; var Form2: TForm2; implementation + +{$R *.lfm} + uses wstimportdlg;//, HeapTrc; { TForm2 } @@ -40,9 +41,8 @@ begin end; end; -initialization +//initialization //SetHeapTraceOutput('heapTrace.txt'); - {$I uform2.lrs} end.