Changeset 170 for trunk/Packages
- Timestamp:
- Jan 22, 2018, 11:53:29 AM (7 years ago)
- Location:
- trunk/Packages
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Packages/Common/Common.lpk
r54 r170 11 11 <PathDelim Value="\"/> 12 12 <SearchPaths> 13 <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS) "/>13 <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)-$(BuildMode)"/> 14 14 </SearchPaths> 15 <Parsing> 16 <SyntaxOptions> 17 <SyntaxMode Value="Delphi"/> 18 <CStyleOperator Value="False"/> 19 <AllowLabel Value="False"/> 20 <CPPInline Value="False"/> 21 </SyntaxOptions> 22 </Parsing> 23 <CodeGeneration> 24 <Optimizations> 25 <OptimizationLevel Value="0"/> 26 </Optimizations> 27 </CodeGeneration> 28 <Linking> 29 <Debugging> 30 <GenerateDebugInfo Value="False"/> 31 </Debugging> 32 </Linking> 33 <Other> 34 <CompilerMessages> 35 <IgnoredMessages idx5024="True"/> 36 </CompilerMessages> 37 </Other> 15 38 </CompilerOptions> 16 39 <Description Value="Various libraries"/> -
trunk/Packages/Common/UListViewSort.pas
r104 r170 81 81 FOnChange: TNotifyEvent; 82 82 FStringGrid1: TStringGrid; 83 procedure DoOnKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);84 procedure DoOnResize(Sender: TObject);83 procedure GridDoOnKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState); 84 procedure GridDoOnResize(Sender: TObject); 85 85 public 86 86 constructor Create(AOwner: TComponent); override; … … 110 110 { TListViewFilter } 111 111 112 procedure TListViewFilter. DoOnKeyUp(Sender: TObject; var Key: Word;112 procedure TListViewFilter.GridDoOnKeyUp(Sender: TObject; var Key: Word; 113 113 Shift: TShiftState); 114 114 begin … … 117 117 end; 118 118 119 procedure TListViewFilter. DoOnResize(Sender: TObject);119 procedure TListViewFilter.GridDoOnResize(Sender: TObject); 120 120 begin 121 121 FStringGrid1.DefaultRowHeight := FStringGrid1.Height; … … 135 135 FStringGrid1.Options := [goFixedHorzLine, goFixedVertLine, goVertLine, 136 136 goHorzLine, goRangeSelect, goEditing, goAlwaysShowEditor, goSmoothScroll]; 137 FStringGrid1.OnKeyUp := DoOnKeyUp;138 FStringGrid1.OnResize := DoOnResize;137 FStringGrid1.OnKeyUp := GridDoOnKeyUp; 138 FStringGrid1.OnResize := GridDoOnResize; 139 139 end; 140 140 … … 197 197 if AMsg.Msg = WM_NOTIFY then 198 198 begin 199 Code := PHDNotify(vMsgNotify.NMHdr)^.Hdr.Code;199 Code := NMHDR(PHDNotify(vMsgNotify.NMHdr)^.Hdr).Code; 200 200 case Code of 201 201 HDN_ENDTRACKA, HDN_ENDTRACKW: -
trunk/Packages/CoolTranslator/CoolTranslator.lpk
r10 r170 1 <?xml version="1.0" ?>1 <?xml version="1.0" encoding="UTF-8"?> 2 2 <CONFIG> 3 3 <Package Version="4"> 4 4 <PathDelim Value="\"/> 5 5 <Name Value="CoolTranslator"/> 6 <Type Value="RunAndDesignTime"/> 6 7 <AddToProjectUsesSection Value="True"/> 7 8 <Author Value="Chronos (robie@centrum.cz)"/> 8 9 <CompilerOptions> 9 <Version Value="1 0"/>10 <Version Value="11"/> 10 11 <PathDelim Value="\"/> 11 12 <SearchPaths> 12 <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS) "/>13 <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)-$(BuildMode)"/> 13 14 </SearchPaths> 15 <Parsing> 16 <SyntaxOptions> 17 <SyntaxMode Value="Delphi"/> 18 <CStyleOperator Value="False"/> 19 <AllowLabel Value="False"/> 20 <CPPInline Value="False"/> 21 </SyntaxOptions> 22 </Parsing> 23 <CodeGeneration> 24 <Optimizations> 25 <OptimizationLevel Value="0"/> 26 </Optimizations> 27 </CodeGeneration> 28 <Linking> 29 <Debugging> 30 <GenerateDebugInfo Value="False"/> 31 </Debugging> 32 </Linking> 14 33 <Other> 15 <CompilerPath Value="$(CompPath)"/> 34 <CompilerMessages> 35 <IgnoredMessages idx5024="True"/> 36 </CompilerMessages> 16 37 </Other> 17 38 </CompilerOptions> … … 38 59 <OutDir Value="Languages"/> 39 60 </i18n> 40 <Type Value="RunAndDesignTime"/>41 61 <RequiredPkgs Count="2"> 42 62 <Item1> -
trunk/Packages/TemplateGenerics/TemplateGenerics.lpk
r3 r170 1 <?xml version="1.0" ?>1 <?xml version="1.0" encoding="UTF-8"?> 2 2 <CONFIG> 3 3 <Package Version="4"> 4 4 <PathDelim Value="\"/> 5 5 <Name Value="TemplateGenerics"/> 6 <Type Value="RunAndDesignTime"/> 6 7 <AddToProjectUsesSection Value="True"/> 7 8 <Author Value="Chronos (robie@centrum.cz)"/> … … 12 13 <IncludeFiles Value="Generic"/> 13 14 <OtherUnitFiles Value="Specialized;Generic;Additional"/> 14 <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS) "/>15 <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)-$(BuildMode)"/> 15 16 </SearchPaths> 17 <Parsing> 18 <SyntaxOptions> 19 <SyntaxMode Value="Delphi"/> 20 <CStyleOperator Value="False"/> 21 <AllowLabel Value="False"/> 22 <CPPInline Value="False"/> 23 </SyntaxOptions> 24 </Parsing> 16 25 <CodeGeneration> 17 26 <Optimizations> 27 <OptimizationLevel Value="0"/> 18 28 <VariablesInRegisters Value="True"/> 19 <OptimizationLevel Value="3"/>20 29 </Optimizations> 21 30 </CodeGeneration> 31 <Linking> 32 <Debugging> 33 <GenerateDebugInfo Value="False"/> 34 </Debugging> 35 </Linking> 22 36 <Other> 23 37 <CompilerMessages> 24 < UseMsgFile Value="True"/>38 <IgnoredMessages idx5024="True"/> 25 39 </CompilerMessages> 26 <CompilerPath Value="$(CompPath)"/>27 40 </Other> 28 41 </CompilerOptions> … … 48 61 <Item5> 49 62 <Filename Value="Generic\GenericFileList.inc"/> 63 <UnitName Value="GenericFileList"/> 50 64 </Item5> 51 65 <Item6> … … 142 156 </Item28> 143 157 </Files> 144 <Type Value="RunAndDesignTime"/>145 158 <RequiredPkgs Count="2"> 146 159 <Item1>
Note:
See TracChangeset
for help on using the changeset viewer.