Changeset 7
- Timestamp:
- Jun 2, 2013, 6:59:07 PM (12 years ago)
- Location:
- os/trunk
- Files:
-
- 7 edited
Legend:
- Unmodified
- Added
- Removed
-
os/trunk/Applications/TestApplication.pas
r6 r7 32 32 Caption := 'TestApp'; 33 33 Form1 := TForm.Create; 34 Form1.Owner := Self; 34 35 Form1.Bounds := TRectangle.Create(50, 80, 200, 120); 35 36 Form1.Name := 'Form1'; … … 37 38 Form1.Screen := Screen; 38 39 Form2 := TForm.Create; 40 Form2.Owner := Self; 39 41 Form2.Bounds := TRectangle.Create(350, 150, 200, 150); 40 42 Form2.Name := 'Form2'; … … 47 49 Button := TButton.Create; 48 50 Button.Parent := Form1; 51 Button.Owner := Form1; 49 52 Button.Bounds := TRectangle.Create(50, 50, 60, 24); 50 53 Button.Visible := True; … … 54 57 Label1 := TLabel.Create; 55 58 Label1.Parent := Form1; 59 Label1.Owner := Form1; 56 60 Label1.Bounds := TRectangle.Create(60, 80, 60, 24); 57 61 Label1.Visible := True; -
os/trunk/Applications/UDesktop.pas
r6 r7 12 12 procedure TaskButtonClick(Sender: TObject); 13 13 protected 14 function HandleMessage(Message: TMessage): Boolean; override;15 14 public 16 15 MenuButton: TButton; … … 18 17 TaskBar: TPanel; 19 18 TestApp: TApplication; 20 TaskButtons: TList<TButton>; 19 TaskButtons: TObjectList<TButton>; 20 function HandleMessage(Message: TMessage): Boolean; override; 21 21 procedure Run; override; 22 22 constructor Create; override; … … 56 56 begin 57 57 inherited; 58 TaskButtons := T List<TButton>.Create;58 TaskButtons := TObjectList<TButton>.Create; 59 59 end; 60 60 … … 67 67 function TDesktopApp.HandleMessage(Message: TMessage): Boolean; 68 68 begin 69 if (Message is TMessageResize) or (Message is TMessageTaskList) then 69 if (Message is TMessageResize) or (Message is TMessageTaskList) then begin 70 70 UpdateTaskBar; 71 Result := True; 72 end else Result := False; 71 73 end; 72 74 … … 76 78 Caption := 'Desktop'; 77 79 MainBar := TForm.Create; 80 MainBar.Owner := Self; 78 81 MainBar.BorderStyle := bsNone; 79 82 MainBar.Name := 'MainBar'; … … 82 85 TaskBar := TPanel.Create; 83 86 TaskBar.Parent := MainBar; 87 TaskBar.Owner := MainBar; 84 88 TaskBar.Name := 'TaskBar'; 85 89 TaskBar.Color := clLightGreen; … … 89 93 MenuButton := TButton.Create; 90 94 MenuButton.Parent := TaskBar; 95 MenuButton.Owner := TaskBar; 91 96 MenuButton.Bounds := TRectangle.Create(0, 0, 50, 24); 92 97 MenuButton.Visible := True; -
os/trunk/System/LDOS.Kernel.pas
r6 r7 21 21 procedure Execute; virtual; 22 22 procedure Terminate; virtual; 23 destructor Destroy; override; 23 24 end; 24 25 … … 87 88 procedure HandleTaskList; 88 89 public 89 Timers: T List<TTimer>;90 Processes: T List<TProcess>;91 Drivers: T List<TDriver>;90 Timers: TObjectList<TTimer>; 91 Processes: TObjectList<TProcess>; 92 Drivers: TObjectList<TDriver>; 92 93 StartOnBoot: TList<TApplication>; 93 94 Screen: TScreen; … … 135 136 constructor TKernel.Create; 136 137 begin 137 Processes := T List<TProcess>.Create;138 Timers := T List<TTimer>.Create;139 Drivers := T List<TDriver>.Create;138 Processes := TObjectList<TProcess>.Create; 139 Timers := TObjectList<TTimer>.Create; 140 Drivers := TObjectList<TDriver>.Create; 140 141 Screen := TScreen.Create; 141 142 Screen.Kernel := Self; … … 227 228 Canvas.Destroy; 228 229 Forms.Destroy; 230 VideoDevice.Destroy; 229 231 inherited; 230 232 end; … … 311 313 312 314 { TProcess } 315 316 destructor TProcess.Destroy; 317 begin 318 if Assigned(Application) then Application.Destroy; 319 inherited; 320 end; 313 321 314 322 procedure TProcess.Execute; -
os/trunk/UFormMain.pas
r6 r7 12 12 private 13 13 { Private declarations } 14 protected 15 procedure PaintWindow(DC: HDC); override; 14 16 public 15 17 published … … 24 26 {$R *.dfm} 25 27 28 { TFormScreen } 29 30 procedure TFormScreen.PaintWindow(DC: HDC); 31 begin 32 // Image1 cover entire form area, do not paint form backround 33 end; 34 26 35 end. -
os/trunk/Xvcl/Xvcl.Classes.pas
r5 r7 2 2 3 3 interface 4 5 uses 6 Xvcl.Generics; 4 7 5 8 type … … 51 54 FOwner: TComponent; 52 55 FName: string; 56 FComponents: TObjectList<TComponent>; 57 procedure SetOwner(const Value: TComponent); 53 58 public 54 59 constructor Create; virtual; 55 property Owner: TComponent read FOwner write FOwner; 60 destructor Destroy; override; 61 property Components: TObjectList<TComponent> read FComponents; 62 property Owner: TComponent read FOwner write SetOwner; 56 63 property Name: string read FName write FName; 57 64 end; … … 161 168 constructor TComponent.Create; 162 169 begin 170 FComponents := TObjectList<TComponent>.Create; 171 end; 172 173 destructor TComponent.Destroy; 174 begin 175 FComponents.Destroy; 176 inherited; 177 end; 178 179 procedure TComponent.SetOwner(const Value: TComponent); 180 begin 181 if Value = FOwner then Exit; 182 if not Assigned(Value) then FOwner.Components.Remove(Self); 183 FOwner := Value; 184 if Assigned(Value) then FOwner.Components.Add(Self); 163 185 end; 164 186 … … 181 203 Self.Y := Y; 182 204 end; 183 184 205 185 206 function TPoint.IsZero: Boolean; -
os/trunk/Xvcl/Xvcl.Generics.pas
r5 r7 33 33 function Compare(Item1, Item2: T): Integer; 34 34 procedure Exchange(Index1, Index2: Integer); 35 procedure Clear; 35 36 property Count: Integer read FCount write SetCount; 36 37 property Items[Index: Integer]: T read GetItem write SetItem; default; 38 end; 39 40 TObjectList<T: class> = class(TList<T>) 41 OwnsObjects: Boolean; 42 constructor Create; virtual; 43 destructor Destroy; override; 37 44 end; 38 45 … … 61 68 FItems[Count - 1] := Item; 62 69 Result := Count - 1; 70 end; 71 72 procedure TList<T>.Clear; 73 begin 74 Count := 0; 63 75 end; 64 76 … … 149 161 end; 150 162 163 { TObjectList<T> } 164 165 constructor TObjectList<T>.Create; 166 begin 167 OwnsObjects := True; 168 end; 169 170 destructor TObjectList<T>.Destroy; 171 var 172 I: Integer; 173 begin 174 if OwnsObjects then 175 for I := 0 to Count - 1 do 176 TObject(FItems[I]).Destroy; 177 Clear; 178 inherited; 179 end; 180 151 181 end. -
os/trunk/lddesktop.dsk
r6 r7 1 1 [Closed Files] 2 File_0=TSourceModule,'c:\program files\embarcadero\rad studio\11.0\SOURCE\ RTL\SYS\System.pas',0,1,23211,1,23232,0,0,,3 File_1=TSourceModule,' C:\Projekty\DelphiLibs\DockManagement\Demo\UDockForm.pas',0,1,1,25,10,0,0,,4 File_2=TSourceModule,'c:\program files\embarcadero\rad studio\11.0\ SOURCE\RTL\SYS\System.Types.pas',0,1,240,9,263,0,0,,5 File_3=TSourceModule,'C:\Projekty\ DelphiLibs\DockManagement\UDockManagement.pas',0,1,885,31,959,0,0,,6 File_4=TSourceModule,'C:\Projekty\ DelphiLibs\DockManagement\Demo\UMainForm.pas',0,1,64,14,84,0,0,,7 File_5=TSourceModule,' C:\Projekty\LibreDevelop\studio\trunk\UCore.pas',0,1,1,19,32,0,0,,8 File_6=TSourceModule,'C:\Projekty\LibreDevelop \platform\trunk\LDPlatform.Core.pas',0,1,13,1,48,0,0,,9 File_7=TSourceModule,'C:\Projekty\LibreDevelop \platform\trunk\LDPlatform.FormMain.pas',0,1,10,24,14,0,0,,10 File_8=TSourceModule,'C:\Projekty\LibreDevelop\ platform\trunk\LDPlatform.FormOptions.pas',0,1,1,37,28,0,0,,11 File_9=TSourceModule,'C:\Projekty\LibreDevelop\ platform\trunk\ULDPlatform.pas',0,1,1,118,17,0,0,,12 File_10=TSourceModule,' c:\program files\embarcadero\rad studio\11.0\source\rtl\common\System.Classes.pas',0,1,9393,1,9414,0,0,,13 File_11=TSourceModule,'C:\Projekty\LibreDevelop\ studio\trunk\Forms\UFormMain.pas',0,1,41,12,59,0,0,,14 File_12=TSourceModule,'C:\Projekty\LibreDevelop\ studio\trunk\Forms\UFormOptions.pas',0,1,1,1,1,0,0,,15 File_13=TSourceModule,' c:\program files\embarcadero\rad studio\10.0\SOURCE\VCL\Vcl.Forms.pas',0,1,1552,1,1575,0,0,{{1693,4}2 File_0=TSourceModule,'c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Forms.pas',0,1,1,65,23,0,0,{{1709,4},{1725,15},{'TScrollWindow'}}{{1812,4},{1912,15},{'TMainMenuBarStyleHook'}}, 3 File_1=TSourceModule,'c:\program files\embarcadero\rad studio\11.0\source\rtl\common\System.Generics.Collections.pas',0,1,434,58,444,0,0,, 4 File_2=TSourceModule,'c:\program files\embarcadero\rad studio\11.0\source\rtl\common\System.Generics.Defaults.pas',0,1,142,1,9,0,0,, 5 File_3=TSourceModule,'C:\Projekty\LibreDevelop_\branches\Xvcl\Drivers\Driver.SystemVCL.pas',0,1,1,1,1,0,0,, 6 File_4=TSourceModule,'C:\Projekty\LibreDevelop_\branches\Xvcl\Drivers\Driver.VideoVCL.pas',0,1,32,11,40,0,0,, 7 File_5=TSourceModule,'c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Graphics.pas',0,1,3391,1,3431,0,0,, 8 File_6=TSourceModule,'C:\Projekty\LibreDevelop_\branches\Xvcl\Xvcl.Graphics.pas',0,1,3,5,26,0,0,, 9 File_7=TSourceModule,'C:\Projekty\LibreDevelop_\branches\Xvcl\UFormMain.pas',0,1,1,65,16,0,0,, 10 File_8=TSourceModule,'C:\Projekty\LibreDevelop\os\trunk\System\LDOS.Kernel.pas',0,1,102,3,120,0,0,, 11 File_9=TSourceModule,'C:\Projekty\LibreDevelop\os\trunk\System\LDOS.Mem.pas',0,1,1,1,28,0,0,, 12 File_10=TSourceModule,'C:\Projekty\LibreDevelop\os\trunk\System\LDOS.Task.pas',0,1,1,3,7,0,0,, 13 File_11=TSourceModule,'C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.VideoVCL.pas',0,1,3,51,61,0,0,, 14 File_12=TSourceModule,'C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.SystemVCL.pas',0,1,27,1,50,0,0,, 15 File_13=TSourceModule,'C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.MouseVCL.pas',0,1,1,115,16,0,0,, 16 16 17 17 [Modules] 18 Module0=C:\Projekty\LibreDevelop\os\trunk\UFormMain.pas 19 Module1=default.htm 20 Module2=C:\Projekty\LibreDevelop\os\trunk\lddesktop.dproj 21 Module3=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Classes.pas 22 Module4=C:\Projekty\LibreDevelop\os\trunk\Applications\UDesktop.pas 23 Module5=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Controls.pas 24 Module6=C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.SystemVCL.pas 25 Module7=C:\Projekty\LibreDevelop\os\trunk\System\LDOS.Kernel.pas 26 Module8=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Forms.pas 27 Module9=C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.VideoVCL.pas 28 Module10=C:\Projekty\LibreDevelop\os\trunk\Applications\TestApplication.pas 29 Module11=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Generics.pas 30 Module12=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Graphics.pas 31 Module13=c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Graphics.pas 32 Module14=C:\Projekty\LibreDevelop_\branches\Xvcl\Xvcl.Classes.pas 33 Module15=C:\Projekty\LibreDevelop\os\trunk\System\LDOS.Task.pas 34 Module16=C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.KeyboardVCL.pas 35 Module17=C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.MouseVCL.pas 36 Module18=C:\Projekty\LibreDevelop_\branches\Xvcl\UFormMain.pas 37 Module19=C:\Projekty\LibreDevelop_\branches\Xvcl\Drivers\Driver.VideoVCL.pas 38 Module20=c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Forms.pas 39 Module21=C:\Projekty\LibreDevelop_\branches\Xvcl\Xvcl.Kernel.pas 40 Module22=c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Controls.pas 41 Module23=C:\Projekty\LibreDevelop_\branches\Xvcl\Xvcl.Graphics.pas 42 Module24=C:\Projekty\LibreDevelop_\branches\Xvcl\Drivers\Driver.SystemVCL.pas 43 Module25=C:\Projekty\LibreDevelop_\branches\Xvcl\Xvcl.Controls.pas 44 Count=26 18 Module0=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Classes.pas 19 Module1=c:\program files\embarcadero\rad studio\11.0\SOURCE\RTL\SYS\System.pas 20 Module2=c:\program files\embarcadero\rad studio\11.0\source\rtl\common\System.Classes.pas 21 Module3=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Generics.pas 22 Module4=c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Controls.pas 23 Module5=c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.ExtCtrls.pas 24 Module6=C:\Projekty\LibreDevelop\os\trunk\UFormMain.pas 25 Module7=C:\Projekty\LibreDevelop\os\trunk\Applications\UDesktop.pas 26 Module8=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Controls.pas 27 Module9=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Graphics.pas 28 Count=10 45 29 EditWindowCount=1 46 30 31 [C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Classes.pas] 32 ModuleType=TSourceModule 33 FormState=0 34 FormOnTop=0 35 36 [c:\program files\embarcadero\rad studio\11.0\SOURCE\RTL\SYS\System.pas] 37 ModuleType=TSourceModule 38 FormState=0 39 FormOnTop=0 40 41 [c:\program files\embarcadero\rad studio\11.0\source\rtl\common\System.Classes.pas] 42 ModuleType=TSourceModule 43 FormState=0 44 FormOnTop=0 45 46 [C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Generics.pas] 47 ModuleType=TSourceModule 48 FormState=0 49 FormOnTop=0 50 51 [c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Controls.pas] 52 ModuleType=TSourceModule 53 FormState=0 54 FormOnTop=0 55 56 [c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.ExtCtrls.pas] 57 ModuleType=TSourceModule 58 FormState=0 59 FormOnTop=0 60 47 61 [C:\Projekty\LibreDevelop\os\trunk\UFormMain.pas] 48 62 ModuleType=TSourceModule … … 50 64 FormOnTop=0 51 65 52 [default.htm] 53 ModuleType=TURLModule 54 55 [C:\Projekty\LibreDevelop\os\trunk\lddesktop.dproj] 56 ModuleType=TBaseProject 57 58 [C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Classes.pas] 66 [C:\Projekty\LibreDevelop\os\trunk\Applications\UDesktop.pas] 59 67 ModuleType=TSourceModule 60 68 FormState=0 61 69 FormOnTop=0 62 70 63 [C:\Projekty\LibreDevelop\os\trunk\ Applications\UDesktop.pas]71 [C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Controls.pas] 64 72 ModuleType=TSourceModule 65 73 FormState=0 66 74 FormOnTop=0 67 75 68 [C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl. Controls.pas]76 [C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Graphics.pas] 69 77 ModuleType=TSourceModule 70 78 FormState=0 71 79 FormOnTop=0 72 80 73 [C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.SystemVCL.pas]74 ModuleType=TSourceModule75 FormState=076 FormOnTop=077 78 [C:\Projekty\LibreDevelop\os\trunk\System\LDOS.Kernel.pas]79 ModuleType=TSourceModule80 FormState=081 FormOnTop=082 83 [C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Forms.pas]84 ModuleType=TSourceModule85 FormState=086 FormOnTop=087 88 [C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.VideoVCL.pas]89 ModuleType=TSourceModule90 FormState=091 FormOnTop=092 93 [C:\Projekty\LibreDevelop\os\trunk\Applications\TestApplication.pas]94 ModuleType=TSourceModule95 FormState=096 FormOnTop=097 98 [C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Generics.pas]99 ModuleType=TSourceModule100 FormState=0101 FormOnTop=0102 103 [C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Graphics.pas]104 ModuleType=TSourceModule105 FormState=0106 FormOnTop=0107 108 [c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Graphics.pas]109 ModuleType=TSourceModule110 FormState=0111 FormOnTop=0112 113 [C:\Projekty\LibreDevelop_\branches\Xvcl\Xvcl.Classes.pas]114 ModuleType=TSourceModule115 FormState=0116 FormOnTop=0117 118 [C:\Projekty\LibreDevelop\os\trunk\System\LDOS.Task.pas]119 ModuleType=TSourceModule120 FormState=0121 FormOnTop=0122 123 [C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.KeyboardVCL.pas]124 ModuleType=TSourceModule125 FormState=0126 FormOnTop=0127 128 [C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.MouseVCL.pas]129 ModuleType=TSourceModule130 FormState=0131 FormOnTop=0132 133 [C:\Projekty\LibreDevelop_\branches\Xvcl\UFormMain.pas]134 ModuleType=TSourceModule135 FormState=1136 FormOnTop=0137 138 [C:\Projekty\LibreDevelop_\branches\Xvcl\Drivers\Driver.VideoVCL.pas]139 ModuleType=TSourceModule140 FormState=0141 FormOnTop=0142 143 [c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Forms.pas]144 ModuleType=TSourceModule145 FormState=0146 FormOnTop=0147 148 [C:\Projekty\LibreDevelop_\branches\Xvcl\Xvcl.Kernel.pas]149 ModuleType=TSourceModule150 FormState=0151 FormOnTop=0152 153 [c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Controls.pas]154 ModuleType=TSourceModule155 FormState=0156 FormOnTop=0157 158 [C:\Projekty\LibreDevelop_\branches\Xvcl\Xvcl.Graphics.pas]159 ModuleType=TSourceModule160 FormState=0161 FormOnTop=0162 163 [C:\Projekty\LibreDevelop_\branches\Xvcl\Drivers\Driver.SystemVCL.pas]164 ModuleType=TSourceModule165 FormState=0166 FormOnTop=0167 168 [C:\Projekty\LibreDevelop_\branches\Xvcl\Xvcl.Controls.pas]169 ModuleType=TSourceModule170 FormState=0171 FormOnTop=0172 173 81 [EditWindow0] 174 ViewCount= 26175 CurrentEditView=C:\Projekty\LibreDevelop\os\trunk\ UFormMain.pas82 ViewCount=10 83 CurrentEditView=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Classes.pas 176 84 View0=0 177 85 View1=1 … … 184 92 View8=8 185 93 View9=9 186 View10=10187 View11=11188 View12=12189 View13=13190 View14=14191 View15=15192 View16=16193 View17=17194 View18=18195 View19=19196 View20=20197 View21=21198 View22=22199 View23=23200 View24=24201 View25=25202 94 PercentageSizes=1 203 95 Create=1 … … 232 124 233 125 [View0] 234 CustomEditViewType=TWelcomePageView 235 WelcomePageURL=bds:/default.htm 126 CustomEditViewType=TEditView 127 Module=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Graphics.pas 128 CursorX=88 129 CursorY=149 130 TopLine=125 131 LeftCol=1 132 Elisions= 133 Bookmarks= 134 EditViewName=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Graphics.pas 236 135 237 136 [View1] 238 137 CustomEditViewType=TEditView 239 Module=C:\Projekty\LibreDevelop_\branches\Xvcl\Drivers\Driver.SystemVCL.pas 138 Module=C:\Projekty\LibreDevelop\os\trunk\UFormMain.pas 139 CursorX=18 140 CursorY=11 141 TopLine=1 142 LeftCol=1 143 Elisions= 144 Bookmarks= 145 EditViewName=C:\Projekty\LibreDevelop\os\trunk\UFormMain.pas 146 147 [View2] 148 CustomEditViewType=TEditView 149 Module=c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.ExtCtrls.pas 150 CursorX=24 151 CursorY=119 152 TopLine=96 153 LeftCol=1 154 Elisions= 155 Bookmarks= 156 EditViewName=c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.ExtCtrls.pas 157 158 [View3] 159 CustomEditViewType=TEditView 160 Module=c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Controls.pas 161 CursorX=29 162 CursorY=1605 163 TopLine=1582 164 LeftCol=1 165 Elisions= 166 Bookmarks= 167 EditViewName=c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Controls.pas 168 169 [View4] 170 CustomEditViewType=TEditView 171 Module=c:\program files\embarcadero\rad studio\11.0\source\rtl\common\System.Classes.pas 172 CursorX=29 173 CursorY=55 174 TopLine=16 175 LeftCol=1 176 Elisions= 177 Bookmarks= 178 EditViewName=c:\program files\embarcadero\rad studio\11.0\source\rtl\common\System.Classes.pas 179 180 [View5] 181 CustomEditViewType=TEditView 182 Module=c:\program files\embarcadero\rad studio\11.0\SOURCE\RTL\SYS\System.pas 240 183 CursorX=1 241 CursorY=1 242 TopLine=1 243 LeftCol=1 244 Elisions= 245 Bookmarks= 246 EditViewName=C:\Projekty\LibreDevelop_\branches\Xvcl\Drivers\Driver.SystemVCL.pas 247 248 [View2] 249 CustomEditViewType=TEditView 250 Module=C:\Projekty\LibreDevelop_\branches\Xvcl\Drivers\Driver.VideoVCL.pas 251 CursorX=11 252 CursorY=40 253 TopLine=32 254 LeftCol=1 255 Elisions= 256 Bookmarks= 257 EditViewName=C:\Projekty\LibreDevelop_\branches\Xvcl\Drivers\Driver.VideoVCL.pas 258 259 [View3] 260 CustomEditViewType=TEditView 261 Module=c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Forms.pas 262 CursorX=1 263 CursorY=1642 264 TopLine=1619 265 LeftCol=1 266 Elisions={{1709,4},{1725,15},{'TScrollWindow'}}{{1812,4},{1912,15},{'TMainMenuBarStyleHook'}} 267 Bookmarks= 268 EditViewName=c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Forms.pas 269 270 [View4] 271 CustomEditViewType=TEditView 272 Module=c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Controls.pas 273 CursorX=5 274 CursorY=1658 275 TopLine=1636 276 LeftCol=1 277 Elisions= 278 Bookmarks= 279 EditViewName=c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Controls.pas 280 281 [View5] 282 CustomEditViewType=TEditView 283 Module=c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Graphics.pas 284 CursorX=1 285 CursorY=3431 286 TopLine=3391 287 LeftCol=1 288 Elisions= 289 Bookmarks= 290 EditViewName=c:\program files\embarcadero\rad studio\11.0\SOURCE\VCL\Vcl.Graphics.pas 184 CursorY=15255 185 TopLine=15232 186 LeftCol=1 187 Elisions= 188 Bookmarks= 189 EditViewName=c:\program files\embarcadero\rad studio\11.0\SOURCE\RTL\SYS\System.pas 291 190 292 191 [View6] 293 192 CustomEditViewType=TEditView 294 Module=C:\Projekty\LibreDevelop _\branches\Xvcl\Xvcl.Graphics.pas295 CursorX= 5296 CursorY= 26297 TopLine= 3298 LeftCol=1 299 Elisions= 300 Bookmarks= 301 EditViewName=C:\Projekty\LibreDevelop _\branches\Xvcl\Xvcl.Graphics.pas193 Module=C:\Projekty\LibreDevelop\os\trunk\Applications\UDesktop.pas 194 CursorX=25 195 CursorY=78 196 TopLine=61 197 LeftCol=1 198 Elisions= 199 Bookmarks= 200 EditViewName=C:\Projekty\LibreDevelop\os\trunk\Applications\UDesktop.pas 302 201 303 202 [View7] 304 CustomEditViewType=TEditView305 Module=C:\Projekty\LibreDevelop_\branches\Xvcl\UFormMain.pas306 CursorX=65307 CursorY=16308 TopLine=1309 LeftCol=1310 Elisions=311 Bookmarks=312 EditViewName=Borland.FormDesignerView313 314 [View8]315 CustomEditViewType=TEditView316 Module=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Classes.pas317 CursorX=17318 CursorY=49319 TopLine=49320 LeftCol=1321 Elisions=322 Bookmarks=323 EditViewName=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Classes.pas324 325 [View9]326 CustomEditViewType=TEditView327 Module=C:\Projekty\LibreDevelop\os\trunk\System\LDOS.Kernel.pas328 CursorX=46329 CursorY=184330 TopLine=171331 LeftCol=1332 Elisions=333 Bookmarks=334 EditViewName=C:\Projekty\LibreDevelop\os\trunk\System\LDOS.Kernel.pas335 336 [View10]337 CustomEditViewType=TEditView338 Module=C:\Projekty\LibreDevelop\os\trunk\Applications\UDesktop.pas339 CursorX=16340 CursorY=84341 TopLine=58342 LeftCol=1343 Elisions=344 Bookmarks=345 EditViewName=C:\Projekty\LibreDevelop\os\trunk\Applications\UDesktop.pas346 347 [View11]348 CustomEditViewType=TEditView349 Module=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Graphics.pas350 CursorX=1351 CursorY=189352 TopLine=166353 LeftCol=1354 Elisions=355 Bookmarks=356 EditViewName=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Graphics.pas357 358 [View12]359 CustomEditViewType=TEditView360 Module=C:\Projekty\LibreDevelop\os\trunk\UFormMain.pas361 CursorX=112362 CursorY=14363 TopLine=1364 LeftCol=1365 Elisions=366 Bookmarks=367 EditViewName=C:\Projekty\LibreDevelop\os\trunk\UFormMain.pas368 369 [View13]370 CustomEditViewType=TEditView371 Module=C:\Projekty\LibreDevelop\os\trunk\System\LDOS.Task.pas372 CursorX=3373 CursorY=7374 TopLine=1375 LeftCol=1376 Elisions=377 Bookmarks=378 EditViewName=C:\Projekty\LibreDevelop\os\trunk\System\LDOS.Task.pas379 380 [View14]381 CustomEditViewType=TEditView382 Module=C:\Projekty\LibreDevelop\os\trunk\lddesktop.dpr383 CursorX=1384 CursorY=29385 TopLine=16386 LeftCol=1387 Elisions=388 Bookmarks=389 EditViewName=C:\Projekty\LibreDevelop\os\trunk\lddesktop.dpr390 391 [View15]392 CustomEditViewType=TEditView393 Module=C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.VideoVCL.pas394 CursorX=32395 CursorY=40396 TopLine=24397 LeftCol=1398 Elisions=399 Bookmarks=400 EditViewName=C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.VideoVCL.pas401 402 [View16]403 CustomEditViewType=TEditView404 Module=C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.SystemVCL.pas405 CursorX=18406 CursorY=6407 TopLine=1408 LeftCol=1409 Elisions=410 Bookmarks=411 EditViewName=C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.SystemVCL.pas412 413 [View17]414 CustomEditViewType=TEditView415 Module=C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.MouseVCL.pas416 CursorX=73417 CursorY=6418 TopLine=1419 LeftCol=1420 Elisions=421 Bookmarks=422 EditViewName=C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.MouseVCL.pas423 424 [View18]425 CustomEditViewType=TEditView426 Module=C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.KeyboardVCL.pas427 CursorX=73428 CursorY=6429 TopLine=1430 LeftCol=1431 Elisions=432 Bookmarks=433 EditViewName=C:\Projekty\LibreDevelop\os\trunk\Drivers\Driver.KeyboardVCL.pas434 435 [View19]436 CustomEditViewType=TEditView437 Module=C:\Projekty\LibreDevelop\os\trunk\Applications\TestApplication.pas438 CursorX=19439 CursorY=33440 TopLine=7441 LeftCol=1442 Elisions=443 Bookmarks=444 EditViewName=C:\Projekty\LibreDevelop\os\trunk\Applications\TestApplication.pas445 446 [View20]447 203 CustomEditViewType=TEditView 448 204 Module=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Controls.pas 449 205 CursorX=14 450 CursorY=7 4451 TopLine=5 3206 CursorY=77 207 TopLine=54 452 208 LeftCol=1 453 209 Elisions= … … 455 211 EditViewName=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Controls.pas 456 212 457 [View21] 213 [View8] 214 CustomEditViewType=TEditView 215 Module=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Classes.pas 216 CursorX=35 217 CursorY=244 218 TopLine=1 219 LeftCol=1 220 Elisions= 221 Bookmarks= 222 EditViewName=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Classes.pas 223 224 [View9] 458 225 CustomEditViewType=TEditView 459 226 Module=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Generics.pas 460 CursorX= 1461 CursorY=1 462 TopLine= 4227 CursorX=56 228 CursorY=174 229 TopLine=164 463 230 LeftCol=1 464 231 Elisions= 465 232 Bookmarks= 466 233 EditViewName=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Generics.pas 467 468 [View22]469 CustomEditViewType=TEditView470 Module=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Forms.pas471 CursorX=50472 CursorY=151473 TopLine=109474 LeftCol=1475 Elisions=476 Bookmarks=477 EditViewName=C:\Projekty\LibreDevelop\os\trunk\Xvcl\Xvcl.Forms.pas478 479 [View23]480 CustomEditViewType=TEditView481 Module=C:\Projekty\LibreDevelop_\branches\Xvcl\Xvcl.Classes.pas482 CursorX=3483 CursorY=9484 TopLine=1485 LeftCol=1486 Elisions=487 Bookmarks=488 EditViewName=C:\Projekty\LibreDevelop_\branches\Xvcl\Xvcl.Classes.pas489 490 [View24]491 CustomEditViewType=TEditView492 Module=C:\Projekty\LibreDevelop_\branches\Xvcl\Xvcl.Controls.pas493 CursorX=48494 CursorY=22495 TopLine=85496 LeftCol=1497 Elisions=498 Bookmarks=499 EditViewName=C:\Projekty\LibreDevelop_\branches\Xvcl\Xvcl.Controls.pas500 501 [View25]502 CustomEditViewType=TEditView503 Module=C:\Projekty\LibreDevelop_\branches\Xvcl\Xvcl.Kernel.pas504 CursorX=21505 CursorY=39506 TopLine=1507 LeftCol=1508 Elisions=509 Bookmarks=510 EditViewName=C:\Projekty\LibreDevelop_\branches\Xvcl\Xvcl.Kernel.pas511 234 512 235 [Watches] … … 857 580 Docked=1 858 581 State=0 859 Left=- 32699860 Top=- 2492582 Left=-8853 583 Top=-309 861 584 Width=5307 862 585 Height=4876 … … 876 599 Docked=1 877 600 State=0 878 Left=- 11386879 Top=- 324601 Left=-9489 602 Top=-274 880 603 Width=1844 881 604 Height=3143 … … 1069 792 Docked=1 1070 793 State=0 1071 Left= 113861072 Top= 324794 Left=9489 795 Top=274 1073 796 Width=1896 1074 797 Height=7029 … … 1131 854 TabPosition=1 1132 855 ActiveTabID=PropertyInspector 1133 TabDockClients=PropertyInspector, ModelViewTool,DataExplorerContainer,TFileExplorerForm1134 856 TabDockClients=PropertyInspector,TFileExplorerForm,DataExplorerContainer,ModelViewTool 857
Note:
See TracChangeset
for help on using the changeset viewer.