From daca7f3037761f634224d39698c73c37e71acaf3 Mon Sep 17 00:00:00 2001 From: paul Date: Wed, 21 Dec 2011 02:25:51 +0000 Subject: [PATCH] examples: remove lrs files from messages example git-svn-id: trunk@34335 - --- .gitattributes | 2 -- examples/messages/uasynccall.lrs | 35 -------------------------------- examples/messages/uasynccall.pas | 7 +++---- examples/messages/unit1.lrs | 20 ------------------ examples/messages/unit1.pas | 7 +++---- 5 files changed, 6 insertions(+), 65 deletions(-) delete mode 100644 examples/messages/uasynccall.lrs delete mode 100644 examples/messages/unit1.lrs diff --git a/.gitattributes b/.gitattributes index a680875d03..0f03f4ad65 100644 --- a/.gitattributes +++ b/.gitattributes @@ -3801,10 +3801,8 @@ examples/messages/project1.lpi svneol=native#text/plain examples/messages/project1.lpr svneol=native#text/pascal examples/messages/readme.txt svneol=native#text/plain examples/messages/uasynccall.lfm svneol=native#text/plain -examples/messages/uasynccall.lrs svneol=native#text/pascal examples/messages/uasynccall.pas svneol=native#text/plain examples/messages/unit1.lfm svneol=native#text/plain -examples/messages/unit1.lrs svneol=native#text/pascal examples/messages/unit1.pas svneol=native#text/pascal examples/multithreading/criticalsectionexample1.lpi svneol=native#text/plain examples/multithreading/criticalsectionexample1.lpr svneol=native#text/plain diff --git a/examples/messages/uasynccall.lrs b/examples/messages/uasynccall.lrs deleted file mode 100644 index cfe6cf06a0..0000000000 --- a/examples/messages/uasynccall.lrs +++ /dev/null @@ -1,35 +0,0 @@ -{ This is an automatically generated lazarus resource file } - -LazarusResources.Add('TForm1','FORMDATA',[ - 'TPF0'#6'TForm1'#5'Form1'#4'Left'#3'"'#1#6'Height'#3','#1#3'Top'#3#155#0#5'Wi' - +'dth'#3#144#1#18'HorzScrollBar.Page'#3#143#1#18'VertScrollBar.Page'#3'+'#1#7 - +'Caption'#6#22'QueueAsyncCall example'#12'ClientHeight'#3','#1#11'ClientWidt' - +'h'#3#144#1#0#7'TButton'#7'Button1'#22'AnchorSideLeft.Control'#7#5'Owner'#21 - +'AnchorSideTop.Control'#7#5'Owner'#4'Left'#2#4#6'Height'#2#25#3'Top'#2#4#5'W' - +'idth'#2'|'#20'BorderSpacing.Around'#2#4#7'Caption'#6#11'Direct call'#7'OnCl' - +'ick'#7#12'Button1Click'#8'TabOrder'#2#0#0#0#7'TButton'#7'Button2'#22'Anchor' - +'SideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#7'Button1'#18'Anch' - +'orSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#7'Button1'#20 - +'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#2#4#6'Height'#2#25#3'Top'#2'!' - +#5'Width'#2'|'#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#18'BorderSpacin' - +'g.Left'#2#4#17'BorderSpacing.Top'#2#4#7'Caption'#6#10'Async call'#7'OnClick' - +#7#12'Button2Click'#8'TabOrder'#2#1#0#0#5'TMemo'#5'Memo1'#22'AnchorSideLeft.' - +'Control'#7#7'Button1'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideT' - +'op.Control'#7#5'Owner'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSide' - +'Right.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#5'Owner'#21'Ancho' - +'rSideBottom.Side'#7#9'asrBottom'#4'Left'#3#132#0#6'Height'#3'$'#1#3'Top'#2#4 - +#5'Width'#3#8#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#20 - +'BorderSpacing.Around'#2#4#8'ReadOnly'#9#10'ScrollBars'#7#10'ssAutoBoth'#8'T' - +'abOrder'#2#2#0#0#11'TRadioGroup'#11'RadioGroup1'#22'AnchorSideLeft.Control' - +#7#7'Button2'#23'AnchorSideRight.Control'#7#7'Button2'#20'AnchorSideRight.Si' - +'de'#7#9'asrBottom'#4'Left'#2#4#6'Height'#2'H'#3'Top'#2'K'#5'Width'#2'|'#7'A' - +'nchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoFill'#9#7'Caption'#6#10'Pa' - +'rameters'#28'ChildSizing.LeftRightSpacing'#2#6#28'ChildSizing.TopBottomSpac' - +'ing'#2#6#29'ChildSizing.EnlargeHorizontal'#7#24'crsHomogenousChildResize'#27 - +'ChildSizing.EnlargeVertical'#7#24'crsHomogenousChildResize'#28'ChildSizing.' - +'ShrinkHorizontal'#7#14'crsScaleChilds'#26'ChildSizing.ShrinkVertical'#7#14 - +'crsScaleChilds'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom' - +#27'ChildSizing.ControlsPerLine'#2#1#12'ClientHeight'#2'6'#11'ClientWidth'#2 - +'x'#9'ItemIndex'#2#0#13'Items.Strings'#1#6#16'Integer (simple)'#6#17'Record ' - +'(advanced)'#0#8'TabOrder'#2#3#0#0#0 -]); diff --git a/examples/messages/uasynccall.pas b/examples/messages/uasynccall.pas index d73668de65..ca8a9fdde7 100644 --- a/examples/messages/uasynccall.pas +++ b/examples/messages/uasynccall.pas @@ -5,7 +5,7 @@ unit uasynccall; interface uses - Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, StdCtrls, + Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls, ExtCtrls; @@ -32,6 +32,8 @@ var implementation +{$R *.lfm} + type TMyData = record S: string; @@ -123,8 +125,5 @@ begin Dispose(PMyData(Data)); end; -initialization - {$I uasynccall.lrs} - end. diff --git a/examples/messages/unit1.lrs b/examples/messages/unit1.lrs deleted file mode 100644 index 1dfaa8ac14..0000000000 --- a/examples/messages/unit1.lrs +++ /dev/null @@ -1,20 +0,0 @@ -LazarusResources.Add('TForm1','FORMDATA',[ - 'TPF0'#6'TForm1'#5'Form1'#4'Left'#3'"'#1#6'Height'#3','#1#3'Top'#3#155#0#5'Wi' - +'dth'#3#144#1#18'HorzScrollBar.Page'#3#143#1#18'VertScrollBar.Page'#3'+'#1#7 - +'Caption'#6#16'Messages example'#12'ClientHeight'#3','#1#11'ClientWidth'#3 - +#144#1#0#7'TButton'#7'Button1'#22'AnchorSideLeft.Control'#7#5'Owner'#21'Anch' - +'orSideTop.Control'#7#5'Owner'#4'Left'#2#4#6'Height'#2#25#3'Top'#2#4#5'Width' - +#2'h'#20'BorderSpacing.Around'#2#4#7'Caption'#6#12'Send Message'#7'OnClick'#7 - +#12'Button1Click'#8'TabOrder'#2#0#0#0#7'TButton'#7'Button2'#22'AnchorSideLef' - +'t.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#7'Button1'#18'AnchorSideT' - +'op.Side'#7#9'asrBottom'#4'Left'#2#4#6'Height'#2#25#3'Top'#2'!'#5'Width'#2'h' - +#20'BorderSpacing.Around'#2#4#7'Caption'#6#11'PostMessage'#7'OnClick'#7#12'B' - +'utton2Click'#8'TabOrder'#2#1#0#0#5'TMemo'#5'Memo1'#22'AnchorSideLeft.Contro' - +'l'#7#7'Button1'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Con' - +'trol'#7#5'Owner'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.' - +'Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#5'Owner'#21'AnchorSideB' - +'ottom.Side'#7#9'asrBottom'#4'Left'#2'p'#6'Height'#3'$'#1#3'Top'#2#4#5'Width' - +#3#28#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#20'BorderS' - +'pacing.Around'#2#4#8'ReadOnly'#9#10'ScrollBars'#7#10'ssAutoBoth'#8'TabOrder' - +#2#2#0#0#0 -]); diff --git a/examples/messages/unit1.pas b/examples/messages/unit1.pas index b663d7c464..ba4c6aee64 100644 --- a/examples/messages/unit1.pas +++ b/examples/messages/unit1.pas @@ -5,7 +5,7 @@ unit Unit1; interface uses - Classes, SysUtils, LResources, Forms, Controls, Graphics, Dialogs, StdCtrls, + Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls, LMessages, LCLIntf; const @@ -32,6 +32,8 @@ var implementation +{$R *.lfm} + { TForm1 } procedure TForm1.Button1Click(Sender: TObject); @@ -85,8 +87,5 @@ begin Memo1.Lines.Add('got message from: ' + S); end; -initialization - {$I unit1.lrs} - end.