![(please configure the [header_logo] section in trac.ini)](/LibreDevelop/chrome/site/your_project_logo.png){kind=logo}
Changeset 4 for trunk/StudioPackage
- Timestamp:
- Aug 1, 2012, 11:10:12 PM (12 years ago)
- Location:
- trunk/StudioPackage
- Files:
-
- 4 added
- 9 edited
-
Forms/UFormMain.lfm (modified) (6 diffs)
-
Forms/UFormMain.lrt (modified) (1 diff)
-
Forms/UFormMain.pas (modified) (5 diffs)
-
Forms/UFormProject.lfm (modified) (2 diffs)
-
Forms/UFormProject.pas (modified) (3 diffs)
-
Forms/UFormSourceCode.lfm (added)
-
Forms/UFormSourceCode.lrt (added)
-
Forms/UFormSourceCode.pas (added)
-
Languages/UFormProject.po (added)
-
LibreDevelopStudio.lpk (modified) (4 diffs)
-
LibreDevelopStudio.pas (modified) (1 diff)
-
UDataModule.lfm (modified) (1 diff)
-
UDataModule.pas (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/StudioPackage/Forms/UFormMain.lfm
r3 r4 1 1 object FormMain: TFormMain 2 Left = 2 553 Height = 4474 Top = 755 Width = 6112 Left = 266 3 Height = 520 4 Top = 113 5 Width = 747 6 6 Caption = 'LibreDevelop Studio' 7 ClientHeight = 4 288 ClientWidth = 6117 ClientHeight = 495 8 ClientWidth = 747 9 9 Menu = MainMenu1 10 OnShow = FormShow 10 11 LCLVersion = '1.1' 11 12 object StatusBar1: TStatusBar 12 13 Left = 0 13 Height = 2 014 Top = 4 0815 Width = 61114 Height = 21 15 Top = 474 16 Width = 747 16 17 Panels = <> 17 18 end … … 20 21 Height = 26 21 22 Top = 0 22 Width = 61123 Width = 747 23 24 Caption = 'ToolBar1' 24 25 Images = ImageList1 … … 43 44 Top = 2 44 45 Action = AProjectClose 46 end 47 end 48 object PageControl1: TPageControl 49 Left = 547 50 Height = 343 51 Top = 26 52 Width = 200 53 ActivePage = TabSheetProject 54 Align = alRight 55 TabIndex = 0 56 TabOrder = 2 57 TabPosition = tpRight 58 object TabSheetProject: TTabSheet 59 Caption = 'TabSheetProject' 60 end 61 end 62 object PageControl2: TPageControl 63 Left = 0 64 Height = 343 65 Top = 26 66 Width = 200 67 ActivePage = TabSheet2 68 Align = alLeft 69 TabIndex = 0 70 TabOrder = 3 71 TabPosition = tpLeft 72 object TabSheet2: TTabSheet 73 Caption = 'TabSheet2' 74 end 75 end 76 object PageControl3: TPageControl 77 Left = 0 78 Height = 105 79 Top = 369 80 Width = 747 81 ActivePage = TabSheet3 82 Align = alBottom 83 TabIndex = 0 84 TabOrder = 4 85 object TabSheet3: TTabSheet 86 Caption = 'TabSheet3' 87 end 88 end 89 object Splitter1: TSplitter 90 Left = 200 91 Height = 343 92 Top = 26 93 Width = 5 94 end 95 object Splitter2: TSplitter 96 Left = 542 97 Height = 343 98 Top = 26 99 Width = 5 100 Align = alRight 101 ResizeAnchor = akRight 102 end 103 object PageControl4: TPageControl 104 Left = 205 105 Height = 343 106 Top = 26 107 Width = 337 108 ActivePage = TabSheetSource 109 Align = alClient 110 TabIndex = 0 111 TabOrder = 7 112 object TabSheetSource: TTabSheet 113 Caption = 'TabSheetSource' 45 114 end 46 115 end … … 53 122 object MenuItem3: TMenuItem 54 123 Action = AProjectNew 124 Bitmap.Data = { 125 36040000424D3604000000000000360000002800000010000000100000000100 126 2000000000000004000064000000640000000000000000000000000000000000 127 0000000000000000000000000000000000000000000000000000000000000000 128 0000000000000000000000000000000000000000000000000000000000000000 129 0000000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000 130 00FF000000FF000000FF000000FF000000FF0000000000000000000000000000 131 0000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 132 FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF0000000000000000000000000000 133 0000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 134 FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF0000000000000000000000000000 135 0000000000FFFFFFFFFFFFFFFFFFFF0000FFFF0000FFFF0000FFFF0000FFFF00 136 00FFFF0000FFFFFFFFFFFFFFFFFF000000FF0000000000000000000000000000 137 0000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 138 FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF0000000000000000000000000000 139 0000000000FFFFFFFFFFFFFFFFFFFF0000FFFF0000FFFF0000FFFF0000FFFF00 140 00FFFF0000FFFFFFFFFFFFFFFFFF000000FF0000000000000000000000000000 141 0000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 142 FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF0000000000000000000000000000 143 0000000000FFFFFFFFFFFFFFFFFFFF0000FFFF0000FFFF0000FFFF0000FFFF00 144 00FFFF0000FFFFFFFFFFFFFFFFFF000000FF0000000000000000000000000000 145 0000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 146 FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF0000000000000000000000000000 147 0000000000FFFFFFFFFFFFFFFFFFFF0000FFFF0000FFFF0000FFFF0000FFFFFF 148 FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF0000000000000000000000000000 149 0000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 150 FFFF000000FF000000FF000000FF000000FF0000000000000000000000000000 151 0000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 152 FFFF000000FFBDBDBDFF000000FF000000000000000000000000000000000000 153 0000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 154 FFFF000000FF000000FF00000000000000000000000000000000000000000000 155 0000000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000 156 00FF000000FF0000000000000000000000000000000000000000000000000000 157 0000000000000000000000000000000000000000000000000000000000000000 158 0000000000000000000000000000000000000000000000000000 159 } 55 160 end 56 161 object MenuItem8: TMenuItem 57 162 Action = AProjectOpen 163 Bitmap.Data = { 164 36040000424D3604000000000000360000002800000010000000100000000100 165 2000000000000004000064000000640000000000000000000000000000000000 166 0000000000000000000000000000000000000000000000000000000000000000 167 0000000000000000000000000000000000000000000000000000000000000000 168 0000000000000000000000000000000000000000000000000000000000000000 169 0000000000000000000000000000000000000000000000000000000000FF0000 170 00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000 171 00FF000000FF0000000000000000000000000000000000000000000000FF0000 172 00FF008484FF008484FF008484FF008484FF008484FF008484FF008484FF0084 173 84FF008484FF000000FF00000000000000000000000000000000000000FF00FF 174 FFFF000000FF008484FF008484FF008484FF008484FF008484FF008484FF0084 175 84FF008484FF008484FF000000FF000000000000000000000000000000FFFFFF 176 FFFF00FFFFFF000000FF008484FF008484FF008484FF008484FF008484FF0084 177 84FF008484FF008484FF008484FF000000FF0000000000000000000000FF00FF 178 FFFFFFFFFFFF00FFFFFF000000FF008484FF008484FF008484FF008484FF0084 179 84FF008484FF008484FF008484FF008484FF000000FF00000000000000FFFFFF 180 FFFF00FFFFFFFFFFFFFF00FFFFFF000000FF000000FF000000FF000000FF0000 181 00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF00FF 182 FFFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FF 183 FFFF000000FF0000000000000000000000000000000000000000000000FFFFFF 184 FFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFF 185 FFFF000000FF0000000000000000000000000000000000000000000000FF00FF 186 FFFFFFFFFFFF00FFFFFF000000FF000000FF000000FF000000FF000000FF0000 187 00FF000000FF0000000000000000000000000000000000000000000000000000 188 00FF000000FF000000FF00000000000000000000000000000000000000000000 189 00000000000000000000000000FF000000FF000000FF00000000000000000000 190 0000000000000000000000000000000000000000000000000000000000000000 191 0000000000000000000000000000000000FF000000FF00000000000000000000 192 0000000000000000000000000000000000000000000000000000000000FF0000 193 00000000000000000000000000FF00000000000000FF00000000000000000000 194 0000000000000000000000000000000000000000000000000000000000000000 195 00FF000000FF000000FF00000000000000000000000000000000000000000000 196 0000000000000000000000000000000000000000000000000000000000000000 197 0000000000000000000000000000000000000000000000000000 198 } 58 199 end 59 200 object MenuItem9: TMenuItem 60 201 Action = AProjectOpenRecent 202 Bitmap.Data = { 203 36040000424D3604000000000000360000002800000010000000100000000100 204 2000000000000004000064000000640000000000000000000000000000000000 205 0000000000000000000000000000000000000000000000000000000000000000 206 0000000000000000000000000000000000000000000000000000000000000000 207 0000000000000000000000000000000000000000000000000000000000000000 208 0000000000000000000000000000000000000000000000000000000000FF0000 209 00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000 210 00FF000000FF0000000000000000000000000000000000000000000000FF0000 211 00FF008484FF008484FF008484FF008484FF008484FF008484FF008484FF0084 212 84FF008484FF000000FF00000000000000000000000000000000000000FF00FF 213 FFFF000000FF008484FF008484FF008484FF008484FF008484FF008484FF0084 214 84FF008484FF008484FF000000FF000000000000000000000000000000FFFFFF 215 FFFF00FFFFFF000000FF008484FF008484FF008484FF008484FF008484FF0084 216 84FF008484FF008484FF008484FF000000FF0000000000000000000000FF00FF 217 FFFFFFFFFFFF00FFFFFF000000FF008484FF008484FF008484FF008484FF0084 218 84FF008484FF008484FF008484FF008484FF000000FF00000000000000FFFFFF 219 FFFF00FFFFFFFFFFFFFF00FFFFFF000000FF000000FF000000FF000000FF0000 220 00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF00FF 221 FFFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FF 222 FFFF000000FF0000000000000000000000000000000000000000000000FFFFFF 223 FFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFFFFFF00FFFFFFFFFF 224 FFFF000000FF0000000000000000000000000000000000000000000000FF00FF 225 FFFFFFFFFFFF00FFFFFF000000FF000000FF000000FF000000FF000000FF0000 226 00FF000000FF0000000000000000000000000000000000000000000000000000 227 00FF000000FF000000FF00000000000000000000000000000000000000000000 228 00000000000000000000000000FF000000FF000000FF00000000000000000000 229 0000000000000000000000000000000000000000000000000000000000000000 230 0000000000000000000000000000000000FF000000FF00000000000000000000 231 0000000000000000000000000000000000000000000000000000000000FF0000 232 00000000000000000000000000FF00000000000000FF00000000000000000000 233 0000000000000000000000000000000000000000000000000000000000000000 234 00FF000000FF000000FF00000000000000000000000000000000000000000000 235 0000000000000000000000000000000000000000000000000000000000000000 236 0000000000000000000000000000000000000000000000000000 237 } 61 238 end 62 239 object MenuItem10: TMenuItem 63 240 Action = AProjectSave 241 Bitmap.Data = { 242 36040000424D3604000000000000360000002800000010000000100000000100 243 2000000000000004000064000000640000000000000000000000000000000000 244 0000000000000000000000000000000000000000000000000000000000000000 245 0000000000000000000000000000000000000000000000000000000000000000 246 0000000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000 247 00FF000000FF000000FF000000FF000000FF000000FF00000000000000000000 248 00FF008484FF008484FF000000FF000000FF000000FF000000FF000000FF0000 249 00FFFFFFFFFFFFFFFFFF000000FF008484FF000000FF00000000000000000000 250 00FF008484FF008484FF000000FF000000FF000000FF000000FF000000FF0000 251 00FFFFFFFFFFFFFFFFFF000000FF008484FF000000FF00000000000000000000 252 00FF008484FF008484FF000000FF000000FF000000FF000000FF000000FF0000 253 00FFFFFFFFFFFFFFFFFF000000FF008484FF000000FF00000000000000000000 254 00FF008484FF008484FF000000FF000000FF000000FF000000FF000000FF0000 255 00FF000000FF000000FF000000FF008484FF000000FF00000000000000000000 256 00FF008484FF008484FF008484FF008484FF008484FF008484FF008484FF0084 257 84FF008484FF008484FF008484FF008484FF000000FF00000000000000000000 258 00FF008484FF008484FF000000FF000000FF000000FF000000FF000000FF0000 259 00FF000000FF000000FF008484FF008484FF000000FF00000000000000000000 260 00FF008484FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 261 FFFFFFFFFFFFFFFFFFFF000000FF008484FF000000FF00000000000000000000 262 00FF008484FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 263 FFFFFFFFFFFFFFFFFFFF000000FF008484FF000000FF00000000000000000000 264 00FF008484FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 265 FFFFFFFFFFFFFFFFFFFF000000FF008484FF000000FF00000000000000000000 266 00FF008484FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 267 FFFFFFFFFFFFFFFFFFFF000000FF008484FF000000FF00000000000000000000 268 00FF008484FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 269 FFFFFFFFFFFFFFFFFFFF000000FF000000FF000000FF00000000000000000000 270 00FF008484FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 271 FFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFF000000FF00000000000000000000 272 00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000 273 00FF000000FF000000FF000000FF000000FF000000FF00000000000000000000 274 0000000000000000000000000000000000000000000000000000000000000000 275 0000000000000000000000000000000000000000000000000000 276 } 64 277 end 65 278 object MenuItem11: TMenuItem 66 279 Action = AProjectSaveAs 280 Bitmap.Data = { 281 36040000424D3604000000000000360000002800000010000000100000000100 282 2000000000000004000064000000640000000000000000000000000000000000 283 0000000000000000000000000000000000000000000000000000000000000000 284 0000000000000000000000000000000000000000000000000000000000000000 285 0000000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000 286 00FF000000FF000000FF000000FF000000FF000000FF00000000000000000000 287 00FF008484FF008484FF000000FF000000FF000000FF000000FF000000FF0000 288 00FFFFFFFFFFFFFFFFFF000000FF008484FF000000FF00000000000000000000 289 00FF008484FF008484FF000000FF000000FF000000FF000000FF000000FF0000 290 00FFFFFFFFFFFFFFFFFF000000FF008484FF000000FF00000000000000000000 291 00FF008484FF008484FF000000FF000000FF000000FF000000FF000000FF0000 292 00FFFFFFFFFFFFFFFFFF000000FF008484FF000000FF00000000000000000000 293 00FF008484FF008484FF000000FF000000FF000000FF000000FF000000FF0000 294 00FF000000FF000000FF000000FF008484FF000000FF00000000000000000000 295 00FF008484FF008484FF008484FF008484FF008484FF008484FF008484FF0084 296 84FF008484FF008484FF008484FF008484FF000000FF00000000000000000000 297 00FF008484FF008484FF000000FF000000FF000000FF000000FF000000FF0000 298 00FF000000FF000000FF008484FF008484FF000000FF00000000000000000000 299 00FF008484FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 300 FFFFFFFFFFFFFFFFFFFF000000FF008484FF000000FF00000000000000000000 301 00FF008484FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 302 FFFFFFFFFFFFFFFFFFFF000000FF008484FF000000FF00000000000000000000 303 00FF008484FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 304 FFFFFFFFFFFFFFFFFFFF000000FF008484FF000000FF00000000000000000000 305 00FF008484FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 306 FFFFFFFFFFFFFFFFFFFF000000FF008484FF000000FF00000000000000000000 307 00FF008484FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 308 FFFFFFFFFFFFFFFFFFFF000000FF000000FF000000FF00000000000000000000 309 00FF008484FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF 310 FFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFF000000FF00000000000000000000 311 00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000 312 00FF000000FF000000FF000000FF000000FF000000FF00000000000000000000 313 0000000000000000000000000000000000000000000000000000000000000000 314 0000000000000000000000000000000000000000000000000000 315 } 67 316 end 68 317 object MenuItem12: TMenuItem 69 318 Action = AProjectClose 319 Bitmap.Data = { 320 36040000424D3604000000000000360000002800000010000000100000000100 321 2000000000000004000064000000640000000000000000000000000000000000 322 0000000000000000000000000000000000000000000000000000000000000000 323 0000000000000000000000000000000000000000000000000000000000000000 324 0000000000000000000000000000000000000000000000000000000000000000 325 0000000000000000000000000000000000003A3AE2FFC0C0C0FF000000000000 326 000000000000000000003A3AE2FFC0C0C0FF0000000000000000000000000000 327 0000000000000000000000000000000000000000000000000000000000000000 328 0000000000003A3AE2FF3A3AE2FF3A3AE2FFC0C0C0FF00000000000000000000 329 00000000000000000000000000003A3AE2FFC0C0C0FF00000000000000000000 330 0000000000003A3AE2FF3A3AE2FF3A3AE2FFC0C0C0FF00000000000000000000 331 000000000000000000003A3AE2FFC0C0C0FF0000000000000000000000000000 332 000000000000000000003838E0FF3838E0FF3838E0FFC0C0C0FF000000000000 333 0000000000003838E0FF3838E0FFC0C0C0FF0000000000000000000000000000 334 00000000000000000000000000003535DDFF3535DDFF3535DDFFC0C0C0FF0000 335 00003535DDFF3535DDFFC0C0C0FF000000000000000000000000000000000000 336 0000000000000000000000000000000000003232DAFF3232DAFF3232DAFF3232 337 DAFF3232DAFFC0C0C0FF00000000000000000000000000000000000000000000 338 000000000000000000000000000000000000000000002F2FD7FF2F2FD7FF2F2F 339 D7FFC0C0C0FF0000000000000000000000000000000000000000000000000000 340 0000000000000000000000000000000000002C2CD4FF2C2CD4FF2C2CD4FF2C2C 341 D4FF2C2CD4FFC0C0C0FF00000000000000000000000000000000000000000000 342 00000000000000000000000000002929D1FF2929D1FF2929D1FFC0C0C0FF0000 343 00002929D1FFC0C0C0FF00000000000000000000000000000000000000000000 344 0000000000002626CEFF2626CEFF2626CEFF2626CEFFC0C0C0FF000000000000 345 0000000000002626CEFF2626CEFFC0C0C0FF0000000000000000000000000000 346 00002020C8FF2020C8FF2020C8FF2020C8FFC0C0C0FF00000000000000000000 347 000000000000000000002020C8FF2020C8FFC0C0C0FF00000000000000000000 348 00001818C0FF1818C0FFC0C0C0FF000000000000000000000000000000000000 349 00000000000000000000000000001818C0FF1818C0FFC0C0C0FF000000000000 350 0000000000000000000000000000000000000000000000000000000000000000 351 0000000000000000000000000000000000000000000000000000000000000000 352 0000000000000000000000000000000000000000000000000000000000000000 353 0000000000000000000000000000000000000000000000000000 354 } 70 355 end 71 356 object MenuItem13: TMenuItem … … 74 359 object MenuItem14: TMenuItem 75 360 Action = AExit 361 Bitmap.Data = { 362 36040000424D3604000000000000360000002800000010000000100000000100 363 2000000000000004000064000000640000000000000000000000000000000000 364 0000000000000000000000000000000000FF0000000000000000000000000000 365 0000000000000000000000000000000000000000000000000000000000000000 366 00000000000000000000000000FF000000FF0000000000000000000000000000 367 0000000000000000000000000000000000000000000000000000000000000000 368 000000000000000000FF008484FF000000FF0000000000000000000000000000 369 0000000000000000000000000000000000000000000000000000000000000000 370 0000000000FF008484FF008484FF000000FF0000000000000000000000000000 371 0000000000000000000000000000000000000000000000000000000000FF0000 372 00FF008484FF008484FF008484FF000000FF000000FF000000FF000000FF0000 373 00FF000000FF000000FF000000FF000000000000000000000000000000000000 374 00FF008484FF008484FF008484FF000000FFFFFFFFFFFFFFFFFF000000FF0000 375 0000000000000000000000000000000000000000000000000000000000000000 376 00FF008484FF008484FF000000FF000000FFFFFFFFFFFFFFFFFF000000FF0000 377 0000000000000000000000000000840000FF0000000000000000000000000000 378 00FF008484FF008484FF008484FF000000FFFFFFFFFFFFFFFFFF000000FF0000 379 00000000000000000000840000FF840000FF0000000000000000000000000000 380 00FF008484FF008484FF008484FF000000FFFFFFFFFFFFFFFFFF000000FF0000 381 000000000000840000FF840000FF840000FF840000FF840000FF000000000000 382 00FF008484FF008484FF008484FF000000FFFFFFFFFFFFFFFFFF000000FF0000 383 0000840000FF840000FF840000FF840000FF840000FF840000FF000000000000 384 00FF008484FF008484FF008484FF000000FFFFFFFFFFFFFFFFFF000000FF0000 385 000000000000840000FF840000FF840000FF840000FF840000FF000000000000 386 00FF008484FF008484FF000000FFFFFFFFFFFFFFFFFFFFFFFFFF000000FF0000 387 00000000000000000000840000FF840000FF0000000000000000000000000000 388 00FF008484FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF0000 389 0000000000000000000000000000840000FF0000000000000000000000000000 390 00FF000000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF0000 391 0000000000000000000000000000000000000000000000000000000000000000 392 00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000 393 0000000000000000000000000000000000000000000000000000000000000000 394 0000000000000000000000000000000000000000000000000000000000000000 395 0000000000000000000000000000000000000000000000000000 396 } 76 397 end 77 398 end … … 80 401 object MenuItem4: TMenuItem 81 402 Action = AClipboardCopy 403 Bitmap.Data = { 404 36040000424D3604000000000000360000002800000010000000100000000100 405 2000000000000004000064000000640000000000000000000000000000000000 406 0000000000000000000000000000000000000000000000000000000000000000 407 0000000000000000000000000000000000000000000000000000000000000000 408 00000000000000000000000000000000000000000000840000FF840000FF8400 409 00FF840000FF840000FF840000FF840000FF840000FF840000FF000000000000 410 00000000000000000000000000000000000000000000840000FFFFFFFFFFFFFF 411 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF840000FF000000000000 412 00000000000000000000000000000000000000000000840000FFFFFFFFFF0000 413 00FF000000FF000000FF000000FF000000FFFFFFFFFF840000FF000000000000 414 00FF000000FF000000FF000000FF000000FF000000FF840000FFFFFFFFFFFFFF 415 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF840000FF000000000000 416 00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF840000FFFFFFFFFF0000 417 00FF000000FF000000FF000000FF000000FFFFFFFFFF840000FF000000000000 418 00FFFFFFFFFF000000FF000000FF000000FF000000FF840000FFFFFFFFFFFFFF 419 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF840000FF000000000000 420 00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF840000FFFFFFFFFF0000 421 00FF000000FFFFFFFFFF840000FF840000FF840000FF840000FF000000000000 422 00FFFFFFFFFF000000FF000000FF000000FF000000FF840000FFFFFFFFFFFFFF 423 FFFFFFFFFFFFFFFFFFFF840000FFFFFFFFFF840000FF00000000000000000000 424 00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF840000FFFFFFFFFFFFFF 425 FFFFFFFFFFFFFFFFFFFF840000FF840000FF0000000000000000000000000000 426 00FFFFFFFFFF000000FF000000FFFFFFFFFF000000FF840000FF840000FF8400 427 00FF840000FF840000FF840000FF000000000000000000000000000000000000 428 00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FFFFFFFFFF000000FF0000 429 0000000000000000000000000000000000000000000000000000000000000000 430 00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF000000FF000000FF000000000000 431 0000000000000000000000000000000000000000000000000000000000000000 432 00FF000000FF000000FF000000FF000000FF000000FF00000000000000000000 433 0000000000000000000000000000000000000000000000000000000000000000 434 0000000000000000000000000000000000000000000000000000000000000000 435 0000000000000000000000000000000000000000000000000000000000000000 436 0000000000000000000000000000000000000000000000000000000000000000 437 0000000000000000000000000000000000000000000000000000 438 } 82 439 end 83 440 object MenuItem5: TMenuItem 84 441 Action = AClipboardPaste 442 Bitmap.Data = { 443 36040000424D3604000000000000360000002800000010000000100000000100 444 2000000000000004000064000000640000000000000000000000FF00FF00FF00 445 FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00 446 FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00 447 FF00FF00FF00FF00FF00FF00FF00FF00FF00840000FF840000FF840000FF8400 448 00FF840000FF840000FF840000FF840000FF840000FF840000FFFF00FF000000 449 00FF000000FF000000FF000000FF000000FF840000FFFFFFFFFFFFFFFFFFFFFF 450 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF840000FF000000FF8484 451 84FF008484FF848484FF008484FF848484FF840000FFFFFFFFFF000000FF0000 452 00FF000000FF000000FF000000FF000000FFFFFFFFFF840000FF000000FF0084 453 84FF848484FF008484FF848484FF008484FF840000FFFFFFFFFFFFFFFFFFFFFF 454 FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF840000FF000000FF8484 455 84FF008484FF848484FF008484FF848484FF840000FFFFFFFFFF000000FF0000 456 00FF000000FFFFFFFFFF840000FF840000FF840000FF840000FF000000FF0084 457 84FF848484FF008484FF848484FF008484FF840000FFFFFFFFFFFFFFFFFFFFFF 458 FFFFFFFFFFFFFFFFFFFF840000FFFFFFFFFF840000FFFF00FF00000000FF8484 459 84FF008484FF848484FF008484FF848484FF840000FFFFFFFFFFFFFFFFFFFFFF 460 FFFFFFFFFFFFFFFFFFFF840000FF840000FFFF00FF00FF00FF00000000FF0084 461 84FF848484FF008484FF848484FF008484FF840000FF840000FF840000FF8400 462 00FF840000FF840000FF840000FF000000FFFF00FF00FF00FF00000000FF8484 463 84FF008484FF848484FF008484FF848484FF008484FF848484FF008484FF8484 464 84FF008484FF848484FF008484FF000000FFFF00FF00FF00FF00000000FF0084 465 84FF848484FF000000FF000000FF000000FF000000FF000000FF000000FF0000 466 00FF000000FF848484FF848484FF000000FFFF00FF00FF00FF00000000FF8484 467 84FF848484FF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00 468 FF00000000FF848484FF008484FF000000FFFF00FF00FF00FF00000000FF0084 469 84FF848484FF008484FF000000FF00FFFFFF000000FF000000FF00FFFFFF0000 470 00FF848484FF008484FF848484FF000000FFFF00FF00FF00FF00FF00FF000000 471 00FF000000FF000000FF000000FF000000FF00FFFFFF00FFFFFF000000FF0000 472 00FF000000FF000000FF000000FFFF00FF00FF00FF00FF00FF00FF00FF00FF00 473 FF00FF00FF00FF00FF00FF00FF00000000FF000000FF000000FF000000FFFF00 474 FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00 475 FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00 476 FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00 477 } 85 478 end 86 479 object MenuItem6: TMenuItem 87 480 Action = AClipboardCut 481 Bitmap.Data = { 482 36040000424D3604000000000000360000002800000010000000100000000100 483 2000000000000004000064000000640000000000000000000000FFFFFF00FFFF 484 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 485 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 486 FF00FFFFFF00FFFFFF00800000FF800000FFFFFFFF00FFFFFF00FFFFFF00FFFF 487 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 488 FF00FFFFFF00800000FFFFFFFF00FFFFFF00800000FFFFFFFF00FFFFFF008000 489 00FF800000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 490 FF00FFFFFF00800000FFFFFFFF00FFFFFF00800000FFFFFFFF00800000FFFFFF 491 FF00FFFFFF00800000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 492 FF00FFFFFF00800000FFFFFFFF00FFFFFF00800000FFFFFFFF00800000FFFFFF 493 FF00FFFFFF00800000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 494 FF00FFFFFF00FFFFFF00800000FF800000FF800000FFFFFFFF00800000FFFFFF 495 FF00FFFFFF00800000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 496 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00800000FFFFFFFF00800000FF8000 497 00FF800000FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 498 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00800000FF000000FF800000FFFFFF 499 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 500 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FFFFFFFF00FFFF 501 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 502 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FF000000FFFFFF 503 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 504 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00000000FFFFFFFF00000000FFFFFF 505 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 506 FF00FFFFFF00FFFFFF00FFFFFF00000000FF000000FFFFFFFF00000000FF0000 507 00FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 508 FF00FFFFFF00FFFFFF00FFFFFF00000000FFFFFFFF00FFFFFF00FFFFFF000000 509 00FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 510 FF00FFFFFF00FFFFFF00FFFFFF00000000FFFFFFFF00FFFFFF00FFFFFF000000 511 00FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 512 FF00FFFFFF00FFFFFF00FFFFFF00000000FFFFFFFF00FFFFFF00FFFFFF000000 513 00FFFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 514 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF 515 FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00 516 } 88 517 end 89 518 object MenuItem7: TMenuItem -
trunk/StudioPackage/Forms/UFormMain.lrt
r3 r4 1 1 TFORMMAIN.CAPTION=LibreDevelop Studio 2 2 TFORMMAIN.TOOLBAR1.CAPTION=ToolBar1 3 TFORMMAIN.TABSHEETPROJECT.CAPTION=TabSheetProject 4 TFORMMAIN.TABSHEET2.CAPTION=TabSheet2 5 TFORMMAIN.TABSHEET3.CAPTION=TabSheet3 6 TFORMMAIN.TABSHEETSOURCE.CAPTION=TabSheetSource 3 7 TFORMMAIN.MENUITEM1.CAPTION=Project 4 8 TFORMMAIN.MENUITEM13.CAPTION=- -
trunk/StudioPackage/Forms/UFormMain.pas
r3 r4 7 7 uses 8 8 Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, Menus, 9 ActnList, ComCtrls ;9 ActnList, ComCtrls, ExtCtrls; 10 10 11 11 type … … 47 47 MenuItem8: TMenuItem; 48 48 MenuItem9: TMenuItem; 49 PageControl1: TPageControl; 50 PageControl2: TPageControl; 51 PageControl3: TPageControl; 52 PageControl4: TPageControl; 53 Splitter1: TSplitter; 54 Splitter2: TSplitter; 49 55 StatusBar1: TStatusBar; 56 TabSheetProject: TTabSheet; 57 TabSheet2: TTabSheet; 58 TabSheet3: TTabSheet; 59 TabSheetSource: TTabSheet; 50 60 ToolBar1: TToolBar; 51 61 ToolButton1: TToolButton; … … 55 65 procedure AExitExecute(Sender: TObject); 56 66 procedure AViewProjectManagerExecute(Sender: TObject); 67 procedure FormShow(Sender: TObject); 57 68 private 58 { private declarations }69 procedure DockInit; 59 70 public 60 71 { public declarations } … … 69 80 70 81 uses 71 UFormProject ;82 UFormProject, UFormSourceCode; 72 83 73 84 { TFormMain } … … 83 94 end; 84 95 96 procedure TFormMain.FormShow(Sender: TObject); 97 begin 98 DockInit; 99 end; 100 101 procedure TFormMain.DockInit; 102 begin 103 FormSourceCode.ManualDock(TabSheetSource, nil, alClient); 104 FormSourceCode.Align := alClient; 105 FormSourceCode.Show; 106 FormProject.ManualDock(TabSheetProject, nil, alClient); 107 FormProject.Align := alClient; 108 FormProject.Show; 109 end; 110 85 111 end. 86 112 -
trunk/StudioPackage/Forms/UFormProject.lfm
r3 r4 14 14 Width = 331 15 15 Align = alClient 16 DefaultItemHeight = 1617 16 PopupMenu = PopupMenuFile 18 17 ReadOnly = True … … 39 38 end 40 39 object ActionList1: TActionList 41 Images = FormMain.ImageList142 40 left = 184 43 41 top = 40 -
trunk/StudioPackage/Forms/UFormProject.pas
r3 r4 45 45 46 46 uses 47 UDataModule, UFormMain, UFormSourceCode , UFormTargetCode, UFormCodeTree;47 UDataModule, UFormMain, UFormSourceCode; 48 48 49 49 resourcestring … … 107 107 begin 108 108 if Assigned(TreeViewProject.Selected) then 109 Core.Project.Files.Remove(TObject(TreeViewProject.Selected.Data));109 DataModule1.Project.Files.Remove(TObject(TreeViewProject.Selected.Data)); 110 110 UpdateProjectTree; 111 111 end; … … 135 135 NewNode: TTreeNode; 136 136 begin 137 with Core, TreeViewProject, Items do137 with DataModule1, TreeViewProject, Items do 138 138 try 139 139 BeginUpdate; -
trunk/StudioPackage/LibreDevelopStudio.lpk
r3 r4 9 9 <SearchPaths> 10 10 <OtherUnitFiles Value="Forms"/> 11 <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS) \"/>11 <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/> 12 12 </SearchPaths> 13 13 <Parsing> … … 23 23 </Other> 24 24 </CompilerOptions> 25 <Files Count=" 4">25 <Files Count="5"> 26 26 <Item1> 27 27 <Filename Value="Forms\UFormMain.pas"/> … … 40 40 <UnitName Value="UFormProject"/> 41 41 </Item4> 42 <Item5> 43 <Filename Value="Forms\UFormSourceCode.pas"/> 44 <UnitName Value="UFormSourceCode"/> 45 </Item5> 42 46 </Files> 43 47 <i18n> … … 47 51 </i18n> 48 52 <Type Value="RunAndDesignTime"/> 49 <RequiredPkgs Count=" 3">53 <RequiredPkgs Count="4"> 50 54 <Item1> 51 <PackageName Value=" TemplateGenerics"/>55 <PackageName Value="synedit"/> 52 56 </Item1> 53 57 <Item2> 54 <PackageName Value=" LCL"/>58 <PackageName Value="TemplateGenerics"/> 55 59 </Item2> 56 60 <Item3> 61 <PackageName Value="LCL"/> 62 </Item3> 63 <Item4> 57 64 <PackageName Value="FCL"/> 58 </Item 3>65 </Item4> 59 66 </RequiredPkgs> 60 67 <UsageOptions> -
trunk/StudioPackage/LibreDevelopStudio.pas
r3 r4 8 8 9 9 uses 10 UFormMain, UProject, UDataModule, UFormProject, LazarusPackageIntf; 10 UFormMain, UProject, UDataModule, UFormProject, UFormSourceCode, 11 LazarusPackageIntf; 11 12 12 13 implementation -
trunk/StudioPackage/UDataModule.lfm
r2 r4 1 1 object DataModule1: TDataModule1 2 OnCreate = DataModuleCreate 2 3 OldCreateOrder = False 3 4 Height = 297 -
trunk/StudioPackage/UDataModule.pas
r2 r4 6 6 7 7 uses 8 Classes, SysUtils, FileUtil ;8 Classes, SysUtils, FileUtil, UProject, Forms; 9 9 10 10 type 11 12 { TDataModule1 } 13 11 14 TDataModule1 = class(TDataModule) 15 procedure DataModuleCreate(Sender: TObject); 12 16 private 13 17 { private declarations } 14 18 public 15 { public declarations }19 Project: TProject; 16 20 end; 17 21 … … 19 23 DataModule1: TDataModule1; 20 24 25 21 26 implementation 22 27 23 28 {$R *.lfm} 24 29 30 uses 31 UFormSourceCode, UFormMain, UFormProject; 32 33 { TDataModule1 } 34 35 procedure TDataModule1.DataModuleCreate(Sender: TObject); 36 begin 37 Application.CreateForm(TFormMain, FormMain); 38 Application.CreateForm(TFormProject, FormProject); 39 Application.CreateForm(TFormSourceCode, FormSourceCode); 40 end; 41 25 42 end. 26 43
Note:
See TracChangeset
for help on using the changeset viewer.
