paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-30 15:10:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

LazDataDesktop: cleanup

Browse Source 
git-svn-id: trunk@49399 -
This commit is contained in:
maxim 2015-06-21 20:39:38 +00:00
parent 2c96091403
commit 76ae0b8ea1
1 changed files with 9 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

34
tools/lazdatadesktop/frmmain.lfm
View File

@ -5,7 +5,7 @@ object MainForm: TMainForm
Width = 666 Width = 666
ActiveControl = PCDD ActiveControl = PCDD
Caption = 'Lazarus Database Desktop' Caption = 'Lazarus Database Desktop'
ClientHeight = 464 ClientHeight = 460
ClientWidth = 666 ClientWidth = 666
Menu = MainMenu1 Menu = MainMenu1
OnClose = FormClose OnClose = FormClose
@ -15,7 +15,7 @@ object MainForm: TMainForm
OnShow = FormShow OnShow = FormShow
Position = poScreenCenter Position = poScreenCenter
SessionProperties = 'Height;Left;Top;Width;WindowState' SessionProperties = 'Height;Left;Top;Width;WindowState'
LCLVersion = '1.1' LCLVersion = '1.5'
object TBMain: TToolBar object TBMain: TToolBar
Left = 0 Left = 0
Height = 26 Height = 26
@ -46,6 +46,7 @@ object MainForm: TMainForm
end end
object ToolButton1: TToolButton object ToolButton1: TToolButton
Left = 73 Left = 73
Height = 24
Top = 2 Top = 2
Width = 10 Width = 10
Style = tbsSeparator Style = tbsSeparator
@ -62,6 +63,7 @@ object MainForm: TMainForm
end end
object ToolButton2: TToolButton object ToolButton2: TToolButton
Left = 227 Left = 227
Height = 24
Top = 2 Top = 2
Width = 10 Width = 10
Style = tbsSeparator Style = tbsSeparator
@ -73,6 +75,7 @@ object MainForm: TMainForm
end end
object ToolButton3: TToolButton object ToolButton3: TToolButton
Left = 261 Left = 261
Height = 24
Top = 2 Top = 2
Width = 10 Width = 10
Style = tbsSeparator Style = tbsSeparator
@ -110,7 +113,7 @@ object MainForm: TMainForm
end end
object PCDD: TPageControl object PCDD: TPageControl
Left = 0 Left = 0
Height = 418 Height = 414
Top = 26 Top = 26
Width = 666 Width = 666
ActivePage = TSRecent ActivePage = TSRecent
@ -119,11 +122,11 @@ object MainForm: TMainForm
TabOrder = 1 TabOrder = 1
object TSRecent: TTabSheet object TSRecent: TTabSheet
Caption = 'Dictionaries' Caption = 'Dictionaries'
ClientHeight = 384 ClientHeight = 388
ClientWidth = 658 ClientWidth = 658
object LVDicts: TListView object LVDicts: TListView
Left = 0 Left = 0
Height = 384 Height = 388
Top = 0 Top = 0
Width = 658 Width = 658
Align = alClient Align = alClient
@ -191,7 +194,7 @@ object MainForm: TMainForm
object PStatus: TPanel object PStatus: TPanel
Left = 0 Left = 0
Height = 20 Height = 20
Top = 444 Top = 440
Width = 666 Width = 666
Align = alBottom Align = alBottom
BevelOuter = bvNone BevelOuter = bvNone
@ -262,7 +265,6 @@ object MainForm: TMainForm
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000000000 00FF000000FF000000FF000000FF000000FF000000FF000000FF000000000000
0000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000
} }
OnClick = ANewExecute
end end
object MIOpen: TMenuItem object MIOpen: TMenuItem
Action = AOpen Action = AOpen
@ -302,7 +304,6 @@ object MainForm: TMainForm
000000000000000000000000000000000000000000FF000000FF000000FF0000 000000000000000000000000000000000000000000FF000000FF000000FF0000
00FF000000000000000000000000000000000000000000000000 00FF000000000000000000000000000000000000000000000000
} }
OnClick = AOpenExecute
end end
object MISave: TMenuItem object MISave: TMenuItem
Action = ASave Action = ASave
@ -342,22 +343,18 @@ object MainForm: TMainForm
01FF010101FF010101FF010101FF010101FF010101FF010101FF010101FF0101 01FF010101FF010101FF010101FF010101FF010101FF010101FF010101FF0101
01FF010101FF010101FF010101FF010101FF010101FF010101FF 01FF010101FF010101FF010101FF010101FF010101FF010101FF
} }
OnClick = ASaveExecute
end end
object MISaveAs: TMenuItem object MISaveAs: TMenuItem
Action = ASaveAs Action = ASaveAs
OnClick = SaveAsExecute
end end
object MICloseSep: TMenuItem object MICloseSep: TMenuItem
Caption = '-' Caption = '-'
end end
object MIClose: TMenuItem object MIClose: TMenuItem
Action = AClose Action = AClose
OnClick = ACloseExecute
end end
object MICloseAll: TMenuItem object MICloseAll: TMenuItem
Action = ACloseAll Action = ACloseAll
OnClick = ACloseAllExecute
end end
object MISep: TMenuItem object MISep: TMenuItem
Caption = '-' Caption = '-'
@ -400,7 +397,6 @@ object MainForm: TMainForm
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
FF00FFFFFF00FFFFFF00FFFFFF006D9CD4FF6A9AD2FF6697CFFF FF00FFFFFF00FFFFFF00FFFFFF006D9CD4FF6A9AD2FF6697CFFF
} }
OnClick = AExitExecute
end end
end end
object MenuItem2: TMenuItem object MenuItem2: TMenuItem
@ -462,7 +458,6 @@ object MainForm: TMainForm
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000
} }
OnClick = ANewTableExecute
end end
object MINewField: TMenuItem object MINewField: TMenuItem
Action = ANewField Action = ANewField
@ -502,7 +497,6 @@ object MainForm: TMainForm
FF00F0FBFF00F0FBFF00F0FBFF00F0FBFF00F0FBFF00F0FBFF00F0FBFF00F0FB FF00F0FBFF00F0FBFF00F0FBFF00F0FBFF00F0FBFF00F0FBFF00F0FBFF00F0FB
FF00F0FBFF00F0FBFF00F0FBFF00F0FBFF00F0FBFF00F0FBFF00 FF00F0FBFF00F0FBFF00F0FBFF00F0FBFF00F0FBFF00F0FBFF00
} }
OnClick = ANewFieldExecute
end end
object MenuItem4: TMenuItem object MenuItem4: TMenuItem
Action = ANewIndex Action = ANewIndex
@ -542,7 +536,6 @@ object MainForm: TMainForm
31FF6C4E31FF6C4E31FF6C4E3100000000000000000000000000000000000000 31FF6C4E31FF6C4E31FF6C4E3100000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000
} }
OnClick = ANewIndexExecute
end end
object MenuItem7: TMenuItem object MenuItem7: TMenuItem
Action = AAddForeignKey Action = AAddForeignKey
@ -582,7 +575,6 @@ object MainForm: TMainForm
00FF000000FF000000FF000000FF000000FF000000FF00000000000000000000 00FF000000FF000000FF000000FF000000FF000000FF00000000000000000000
0000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000
} }
OnClick = AAddForeignKeyExecute
end end
object MenuItem5: TMenuItem object MenuItem5: TMenuItem
Action = AAddDomain Action = AAddDomain
@ -622,7 +614,6 @@ object MainForm: TMainForm
FAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFA FAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFA
FAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFAFAFF FAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFAFAFFFAFAFAFF
} }
OnClick = AAddDomainExecute
end end
object MenuItem6: TMenuItem object MenuItem6: TMenuItem
Action = AAddSequence Action = AAddSequence
@ -662,7 +653,6 @@ object MainForm: TMainForm
0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000
} }
OnClick = AAddSequenceExecute
end end
object MIDDSep2: TMenuItem object MIDDSep2: TMenuItem
Caption = '-' Caption = '-'
@ -705,7 +695,6 @@ object MainForm: TMainForm
00000000000006060600060606000E0E0EFF424242FF4A4A4AFF3E3E3EFF2C2C 00000000000006060600060606000E0E0EFF424242FF4A4A4AFF3E3E3EFF2C2C
2CFF000000FF0606060006060600000000000000000000000000 2CFF000000FF0606060006060600000000000000000000000000
} }
OnClick = ADeleteObjectExecute
end end
object MIDDSep3: TMenuItem object MIDDSep3: TMenuItem
Caption = '-' Caption = '-'
@ -748,7 +737,6 @@ object MainForm: TMainForm
FFFFC0C0C0FFC0C0C0FFC0C0C0FFC0C0C0FFC0DCC0FFC0DCC0FFC0DCC0FFC0DC FFFFC0C0C0FFC0C0C0FFC0C0C0FFC0C0C0FFC0DCC0FFC0DCC0FFC0DCC0FFC0DC
C0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF C0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
} }
OnClick = AGenerateSQLExecute
end end
object MICreateCode: TMenuItem object MICreateCode: TMenuItem
Action = ACreateCode Action = ACreateCode
@ -788,22 +776,18 @@ object MainForm: TMainForm
00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000 00FF000000FF000000FF000000FF000000FF000000FF000000FF000000FF0000
00FF000000FF000000FF000000FF000000FF0000000000000000 00FF000000FF000000FF000000FF000000FF0000000000000000
} }
OnClick = ACreateCodeExecute
end end
end end
object MIConnection: TMenuItem object MIConnection: TMenuItem
Caption = 'Connections' Caption = 'Connections'
object MINewConnection: TMenuItem object MINewConnection: TMenuItem
Action = ANewConnection Action = ANewConnection
OnClick = ANewConnectionExecute
end end
object MIOpenRecentConnection: TMenuItem object MIOpenRecentConnection: TMenuItem
Action = AOpenConnection Action = AOpenConnection
OnClick = OpenRecentConnection
end end
object MIDeleteRecentConnection: TMenuItem object MIDeleteRecentConnection: TMenuItem
Action = ADeleteConnection Action = ADeleteConnection
OnClick = ADeleteConnectionExecute
end end
end end
end end