* Patch by Martin to add button to show devtools

This commit is contained in:
michael 2021-04-05 07:12:39 +00:00
parent 3fbcdefcc6
commit 0024cc8683
2 changed files with 161 additions and 114 deletions

View File

@ -1,11 +1,11 @@
object MainForm: TMainForm
Left = 508
Left = 480
Height = 541
Top = 119
Width = 698
Top = 120
Width = 737
Caption = 'IDE Design demo'
ClientHeight = 541
ClientWidth = 698
ClientWidth = 737
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
LCLVersion = '2.1.0.0'
@ -13,24 +13,24 @@ object MainForm: TMainForm
Left = 0
Height = 44
Top = 497
Width = 698
Width = 737
Align = alBottom
ClientHeight = 44
ClientWidth = 698
ClientWidth = 737
TabOrder = 0
object Project: TLabel
Left = 25
Height = 16
Height = 15
Top = 15
Width = 42
Width = 37
Caption = 'Project'
ParentColor = False
end
object FEProject: TFileNameEdit
Left = 80
Height = 27
Height = 23
Top = 8
Width = 608
Width = 647
FileName = '/home/michael/P2JS/trunk/packages/webwidget/designdemo/designdemo.html'
DialogTitle = 'Select Project HTML File'
Filter = 'HTML Files|*.html|All files|*.*'
@ -51,7 +51,7 @@ object MainForm: TMainForm
Left = 0
Height = 36
Top = 0
Width = 698
Width = 737
ButtonHeight = 34
ButtonWidth = 34
Caption = 'TBWidgets'
@ -63,7 +63,7 @@ object MainForm: TMainForm
Action = AGo
end
object ToolButton1: TToolButton
Left = 73
Left = 107
Height = 34
Top = 2
Caption = 'ToolButton1'
@ -74,25 +74,30 @@ object MainForm: TMainForm
Top = 2
Action = AGoExternal
end
object TBExternalGo1: TToolButton
Left = 73
Top = 2
Action = AOpenDev
end
end
object PCDesigner: TPageControl
Left = 0
Height = 461
Top = 36
Width = 643
Width = 682
ActivePage = TSBrowser
Align = alClient
TabIndex = 0
TabOrder = 2
object TSBrowser: TTabSheet
Caption = 'Design browser'
ClientHeight = 431
ClientWidth = 688
ClientHeight = 433
ClientWidth = 674
object BrowserWindow1: TBrowserWindow
Left = 0
Height = 431
Height = 433
Top = 0
Width = 688
Width = 674
Align = alClient
TabOrder = 0
Chromium.OnConsoleMessage = ChromiumConsoleMessage
@ -136,7 +141,7 @@ object MainForm: TMainForm
end
end
object Panel1: TPanel
Left = 648
Left = 687
Height = 461
Top = 36
Width = 50
@ -172,7 +177,7 @@ object MainForm: TMainForm
end
end
object Splitter1: TSplitter
Left = 643
Left = 682
Height = 461
Top = 36
Width = 5
@ -186,101 +191,124 @@ object MainForm: TMainForm
Left = 384
Top = 16
Bitmap = {
4C7A0B0000002000000020000000C50B00000000000078DAED5D699055C5150E
080C030308837112C7199CC8BE86715844A84A0C1907480A49A8CAA2322E7183
A43204D1C7366429A389A2565295582E643181594C2096F22711A91290004EC8
A615E33683C4441390C588C6999C637D973AB67DEFEBBEB7EFBB03F4ABFAEABD
D77DBBBFBEDDA74F2FB7CFB9F3BE5EFBA1791E56A0CF10C278421DC0BF87A4CC
791E610D612FA12B041CB79A30CC21EF50C2DD84E311BC2ADE22AC239426E49E
427845C9FB1061236115A11EE0DF4D8437946BF7136A62725F4AF8AFC8EB45C2
65843E1169FA102E27BC24D2BD49981FE3BE25F7BD84228BF47D09F72B65A8B1
686F59E7B904EDB752698B528334F788340F3A90DF7B457EEB0CFAD871D1DE45
0EF8B92D5E16FD6258C4B56B44592F0BB9E623849290B87308C309BD94F04522
DFD511FC6DA28FF511E1E3088F118E887C1E15F135847D22EE75C23522BE48F4
CDBD113AB513D76C14E16391F61DC20384C5845B08D721FE5CC241C231C252E8
83FDC8E762914F33C23A75BA9A3E1345F95788F056845D1352EEEF207EB9089B
8DB0DF8AB0D522FF099A7CEA44FC9522FC9F847709FDF0FFDB90694619E13748
5323D2F426FC8FF09A08BB4AE47F8986FF12117F95083F04FE62FCFF1DE130AE
1B45D882DFD51AFE8322EC6A917FAD867F82885F29C29F4058BD08BB4FF0DF8E
DFCBF2D4BFEC5BE3F3C85F9308FF14EE85F5C20F508F4F097EEE7347217FDF10
F2C779CD16F9B408F91B1C224BC1D87E44EA1EFACC117D33C05F991BF11713FE
AEE8DA2F2AFD2F68B3DD11FD5FCAE8159AF812F4B7A290F495D0A13D94F07A91
EFAA08FE61D0915D1843FB3AD0BFC58476A17F2BF35CBF4E9475BD03FEFB447E
77185C5F2AF4D7FBFA420CEE55229F0ED3392AF4F99B22EDFD366D813A5FAFCC
3F2EB02CFB7CA50C3C865E11352643CEEB457BC79A7F29F5B05FE9778731D7E4
BE7225B006E3CB61E5DA0EDBFB0E918775A25F98CEBFEF74B92641DF5C1DB1FE
60BDB607325759E0F5D7B8309DEAE191920CF25838127380FE05E01B00FDD78A
B9C056C243C013086BC51A7580435E5ED37E0DF9DFCCF72CE2FAC9B508EA2287
6B97F03C302177056107E6FBCC753EF773C25CC268F4FBC9842AC202D4D1485C
BB1269CF4DA0FBDBB016FF28CA32366A0D4B9F33B18EE0797939612AE1E91863
5F05B8F9BB07F2AAB448FFDE3C4CFC6E33AD07B437D7DB14FC5F9AA0FD783DD6
93308DB0DD441EE8F3555E7FE19EAB1CC86F39E6E82C0F4B0CFA581BE4A72CAE
EC68DA82DBB13FF22E89B8F672C83AF7A3490EFBF068EC0BE4C2F61570DDC3E8
3FACDB062971BC06F9096113DAB55899772D437A9EF7D569F69478CC1EC3F3A4
A8FD077C2F50C2AFC39CE6FBE0E6B5CE66C471FF789CF03CE126CC9578AD76AD
5A7EC9A1E11EC86BDB601F4884F7C47EC65211361CF3BDC1987FBCADA4B91969
7ACA3610EBD9120D3FB7F9CF51F7D5CABC8BE75763F1FF631C0F0C445FD9A7E4
350E692A95309E97FF92CBAFE11F41F805AE19ABE11F87FF77609ED789B5714E
C33F5EC33F19F716C6CF7DEF7159574AFD2F57F6E9BAA0F783FAAF12F1DC87FE
A5D47F15BEB7858DD742FEE628E1D783E32EC8DFB3BCEF22E48FC7E217B88CD8
2BE76BBFA2E4B1204AFEC45ED328F49552256E2EFAD6AFB0CF5014D2FF1E54F7
57302E954006361AE81F96EF510EF5CF24E815D6C15F32D4BF152ED611C8A7CC
44FF2AE30F8FF9E50EF8AB30FEF01AF146C3F1773BC64C96FD8624E32FBE39AF
274DE763D8E3E1794B85E86F95966BC572F48D4AE4556E59F66AA49B8ABCCA20
4767E6592B8F419BF33EF974E4519D60EEB01D6BDAFE906196D1CFA14EAAD1A7
46637C1C8C396A7FAC959F4C2A43D84B5D0CD965B91CA3AC418A95BDF215B8F6
C6A4F36FCD7AE7CBD8C76C831E7D0863C6368435E19A9202AC8782F61811EC8D
7B7878787858E9519E3B7E8F70C0627F39290EE0B95D1F70776584DBC47D5F58
C03A9F01CE13E72C3268F7F7D585E7FF40FC5C3CFBE950F7331CC5E7E3EF10F1
ED29C47777FE3AE4D11E725E2169BC97FFEEC11FE8DF1905E49E29F4EF6D198E
3FB7620CBC5D73CE314D30D777A3CE327A787878789C76EBC1B3F01CE2A8C3F1
E628F21C6AC0DF9AE2B8D762C01FDC773B9EF1B940701EED88C5BCA8C9619B36
99CEF33CFFC9CD8FF9243F479E5E687E706F467A3EB33FAD50FCE0FEB548FF6A
F0AC246DFE28EEB4F9F371BBE0C73983F979DA3B58578C7429FFE0DE89F30637
28DC9BA2EEDB11FF7CD83F74E1FBEA90FB1E9156FF07A72CC35E536E57F2A794
C198DBA5FC2B6530E276DDFF60FF71204CD60AA1FF6D9FAF9E64E35FD6F3AF96
14E79FCD86F6972D8AAD5D521C413D0CF56B1C0F0FA7F6279F255C9476DF32B4
FFDF8D33881519DBFF1FC759DD4129D8FFDB806D67673AB2FF8F0BAE8B4596DC
93614FEA42F7F359D44B2DDBFB1587DC0B2CEFFDEE34B85916D98EC5C2FEDF25
379FBFDD051BF6E111FC8DAEDB5B709F78E614C1FFB4E3FB1E82B3E2F29ABF19
D8FFEBF06F4BEED290FBE9D4E96AC5FE5CC55A9C057DCE907BA8C65E5B62461E
FB7B898DCA79D4E7F2709FA5F862D0619E05BF2A4F65B03DD7C531F71F0DE4A4
D6B2FE7565D8A7847DD890DBC4FEDFA40CBD94F2FCC590DBC4FE3F0CEC87E00B
4A9AB3097FB6E8A3BB0DFD8FE42D83E57DDBDAFFE7EBEB37B02EB1E4B6B5FF77
8D38F6FFAE6063FFEF72FED18579D49484F6FF7191C4FE7F92F0DD13F79C454D
C239B0B7FFF7F6FF1E1E1E1EA7FABEDA00D8886E70B8F71F60036CE3C27CE7F5
22FCBE00672F77A9FEF9C07F5101CF7F5EA8E15F28E217A6D0B691F97B7ECF6F
C22FFA33FB241B9801BFEC477B4CE79D29F11B97C1807F4688AED8227DBFC1B7
45641942CE0A484C0FD1BFBB42AE7F44F1776052866B43F6739ED2E95F61E39C
0B197F1629D79A94A15E197F722E6DA34DCA5080317BADC27F4CD7BE052AC331
F8C22CB5D50F0ECAB05270FF01E5D95AE07AE827B88DCEBBA6508640261F73E1
3F396619A6B9F47DE0E1E151B0F5DF8AD374FD37D3AFFF4E8AF5073F67FC34E1
8C8CF89FC535DFCA88FF195CF3CD0CEB7F7656F59F87E3ECACF8B1E66A0F3B87
E6829F7D6A8584D7E16C4BB056EBE19A1FE7ECD8BFF62C8DAFC1438A7E5BE692
1FFEF00E095BB659083F47F17310E01DF58C475C7EF8B9FA9392FF1BA8F3A8E7
FE2F4B1F8209F87F9A609C7934908538FCB0FD58981043FCFE5BA2FD9F3460BB
FFE3123B63EEFFB8987FDE5208DF781E1E1E1EDDCCFEBFA51BD8FF9BD85F1D15
E7E55CE9FE8E18F6FFCD0EDBB43986FD5FB7E1671FC831EABCC1217F1C9BC096
5385DFCBDF7BCF13B4EB8B02F187B6FF69C29F69FD5BF80A0F5B83EE2C00FF42
13BD90317F6386FC8D86F9A4C1DF68918F6BFE46CB7C5CF237C6D0D571E75F3B
549BAD9863850BFBFFB509C6AAA4F6FF6BFD3AC6C3C3C3C323A3FD1E637F9029
EFF7E45D233BF43724E71F3B4CFD11B9F2B764F3FC48FA63F2FCE9F0873CBBAC
2DE4FD2BE783B5FE18D3AE7F94E1047716EDAFBE83CBCB7FB7E2CF5AFFB66438
FE34A7E4EFCDFB83F3F0F0F0F088FB5E1E6BDFF92E9E177523FE8EB0E7C90679
34843CFFF7CF5FBB3F7F0BD0E090BF21C8D7EB98534A57B27FA88919714F848D
F5BB599441E19F90611D4CF4B2784AF5A94CF5AF1FFFBA0D7FD6F3AFD372FEEB
E1E1E17112CC13D8D7C912C27AF83AAD4DC9CFE82CE5195E25FC143C1376F68A
3EC5ECF715EF009FC3CFD82D79CFC373F1B7351C1710AE8F78D7C0031ABFB9EC
B3F98726EFFBA5CF54C27F22C6A141F0ADE3DCFE0267110EE4C9A308EFB78BFB
ECE33311FC771AA4AFC0FB9AE3F26F09E13EC3C0C73DE3F390AB24FE907B87AC
A54CD2FF0C6DF06A8232E8FCAF9BDED35BF0799EB3E07B1808FE7F32013FE3C7
EC13CDC2FFB8CAAF7B97DEC72DF8B93F7F0269E23C37AC0DB1BF3D689107B7FF
48D80D77081FD026692784F4811F59DEC73FF85D06B0DB5D8CB04D78475B942F
974111FB3971E4F975C8E58BACFB852DF10B9A6B5FCBA303F724E8573925AF9C
A9FE11699627E0AF56F2D2BDD3E1A63CFC351176DB1FB0A750FA4491E62CB5EA
A37C781EFEDE21BED69B75EB5981973479F555AED96C38FE3F1F837FAF9207EB
E85B95F7A7541AF26F8BC1BF35E43C48277C489E6F31FF792406FF668D3DCEDC
38EFC252DE2B6ACABFC1E1BCB335067F935F1778D8E2FFBC21AD6A
4C7A0C00000020000000200000008B0E00000000000078DAED5D7B7056C5156F
10F2803C8060A510F2452AEF579A101E220CD6D2C8A31DA40468AB1284220A85
26201A5EE18DB64AEDB433AD23101EB6900479D491F0472B322360080881B63A
B50212A4B63C82BC8325B77B32E77E73B2B97BEFDE7BF7FBBE007B677E937CFB
FAEDDD3DE7ECD9BD77F78EFA45F6374669B802BB5A33F462188E80FF5B8798F3
4186450C87190C01206E21439A42DE360CAF33D4D8F0F2B8C9B09A21D927773F
862FB8B22F316C6158C0908B80FF8B19BEE2D29E61C8F2C8FD04C30D52D64986
2719A26DF244333CC5708AE4BBCE30DAC37D53EE3718625CE48F6558C3D521CB
457FD3362FF0D17FF3B9BE4896C8F31B92679D02F97D8394B75A42C76A487FC7
28E087BEF89CE8459A4DDA45A4AE4F0AD27C8B215E10D79EA11343532E7C2229
77A10DFF11A263D124BC27C32E862BA49C77497C164325893BCF3085C4C710DD
3C6C63536B31CD1612DE03F37ECDB096613AC34B0CCF627C07866A866B0CF968
0FCE60398F91724A30ACD6CA56B3AB0FA9FF3C12BE15C3A608EABD1CE3E792B0
6118F61712B69094DFDBA29CE1247E1209FF0FC36D86E6F87B19CA34A02DC39F
314F16C9D38CE17F0CE748D833A4FCC72DF81F27F1CF90F04BC81F87BFFFCA70
19D3756528C3FF332DF8AB49D864527EB6057F6F123F9F84BF8F61B924EC4DC2
FF0AFE3FC7A1FDA96EF57290BF6212FE3DBC17B00BBFC576FC90F083CE5D45F9
9B4DE40FCA1A46CA2925F2D74A204BE6D87E85DA1E768D20BA69E21FC08DF18F
31FC8BB3B53FE6F4CFECB30A1BFDA732FAB4457C3CEA5B8C207F006D6814179E
4BCA5D60C39F8636D2C031345681FD8D63384DEC6FC021FD6A52D72205FC6F92
F25E95489F4CEC573D5DF0C0BD80945325EBA3A23DBF4EF2AE71D317D8E6459C
FFD1D765DD4773758031F469BB3119E53C97F4B727FF8B6B87339CDE5D465F13
74651262118E2F97B9B4556EEF5B200FAB895EC8FADFAFA99C93A06E2EB4997F
805D3B84321708F3FCABA7C8A66A68844806612CEC823E408B30F025A0FDDB8A
BEC01E86B710EF63D8569CA32628E48539ED4C2CFF45B86712D79CCE45B02D0A
30ED0CF0037D72A732EC477F1FB81E023D6718C9D00DF53E83A123C3186CA32E
98763EE6EDE0C3F61FC1B9783BAC4B0FBB392CBB5AE23C02FCF21486FE0C1F79
18FB52911BFE4661590117F9EBFC30F2FF11D976C0FE8676EB87BFF37DF41FCC
C79A300C60D827230FECFA39CCBFF09E3B2A90DF14F4D1411E6648E8D811949F
B65E65C7A22FA01F5B60D9F136699F4259073D4A57A8C3DD705DA040B4AE80E9
DE46FD01DB96C4C5C11C643DC30EECD738CEEF9A83F9C1EF1B6EB1A604637677
F093ECD61FF0EF182EFC59F4697E85DC30D7D98971A01FEF317CC6F002FA4A30
579BCAD79F72587027C2DCD65C0722E14D703D239F8475427FAF15FA1FB7B83C
2F629E26B40FC87C36DE821FFA7C13B67D26E777817FD5037F7F1BE21189A82B
955C593D314F800B03BFFC4F507F0BFECE0C7FC4343D2CF87BE2EF57D1CFABC5
B97181057F2F0BFE0CBC37113FE8DE7BB4ADB8F69FCBADD31968F7CDF6EF48E2
4187FECBB57F47FCBB57345E13F91BC1854F438E5FA3FC7D02EB2E44FE602C3E
0175C4B57248FB33AE8C3176F247D69ABAA2AE2473712351B7B6E13A438C40FF
D6F1EB2B382EC5A30C6C91B03F20DF5D15DA9F74B42B60837F22697F5355CC23
B09CB632F6971B7F60CC4F51C0DF11C71F98233E2F39FEEEC33113643FCFCFF8
8B7FA1AC0F64FD315CE301BF2595E85BC0E55C310575238065A5B8AC7B26E6EB
8F65B545396AE93057EE8E7D0EEBE403B18C4C1FBEC33E9CD3B640190619FD11
B64926EA54371C1F5BA18FDA02E7CA1FF895215C4B9D8EB20B72D99D9B83C471
6BE5F330EDF37EFD6F8BF9CE4F711DF308DAD1B770CCD88B61C598263E0CF321
B33F3A9B6BE31A1A1A1A1AAEEC28F88EBF6438EB627DD92FCEE273BB68E43622
8497C97D3F1CC6361F849CC1F72C22D0EFF5DA42F337881F89CF7EAAF8F50C45
F14EFC5524FE7408E21B3BFF702CE3B4E07D05BFF15AFE1B07BF697F0785917B
30B1BF2F4770FC598963E02B16EF398612C0B5CAEE5D460D0D0D0D8D7B6E3E78
3F3E87B8AA70BCB98A65B691E0DF1AC271AF5482DFBCEFD3F88C4F05CCF7D1AE
B8F08B8A15F669B1AC9FA7F9EF6C7EF427E139F2C070F323F74ECC0FEFEC0F08
173F726F27F9BF349F95849ADF8E3BD4FC4EDC2AF8F13D83D10EFD6DCE2BBAA8
947FE43E80EF1B3CC771EFB0BB6F45FCA371FF83817F270BEEBB73A8F41F3969
1D0ECB72AB923FAE0ED2DC2AE59FAB8314B76AFDC3FD1F6745B2160EFBEFF6F9
EA1D36FE45DAFF2A0DA1FF5922B9FFB294DB6BE71757B01DDAE8398E8686D2FD
273F647824D4BA25B9FFBF02DF414C8DF0FEFF1A7C57372904FBFFDD00F6CE0E
56B4FFDF2BA02D26BAE4CEC0FDA42A6C3FBC8BFA84CBFEFE4221F71897F7FE7A
28B84116611F8B8BFDFF2AB9E1FDDB72DCC3DEC986BF50757F13EEE033271BFE
8F14DF776B7C579CA6F9A7C4FE7F2B5C70C99D2CB89F5A2B5BCDED3FE7B118DF
05FD5492BB8DC57E6D8A410EFBEF29B670EFA37EEAC07D3F7716831546B9E0E7
E5A92DEE3DB78A03EE63127292EDB2FDADEA50C9857D53925B66FFBF4C1D9A72
F5F9BB24B7CCFE7F11E01C82095C9E0718FEE642472B24CF1F71AC83CBFB76BB
FFDF49D79F035BE292DBEDFE7FD5F0B2FF5F15DCECFF57E97F18E847F5F3B9FF
DF2BFCECFF4F2767F7787DCF22CBA70FACF7FFEBFDFF1A1A1A1A77FBBA5A02EE
11DDAC70EDDFC466DC1B273A3BAF29C3C130BC7B59CE9FCF87FC8F84F1FDCF87
2DF873487C4E08FAD6B67CCDAFF965F8893EC399648911E0A77A7448D6EF0C11
BF741D24F807096C45193DFB0DCFB6B0AD83E05D018A8102FB5B2E48FF0E77DE
814C1DA60AD6733EB4B2BF648F738160FC99C8A595A9432E37FE14A8DC1B2D53
87308CD98B39FE6B56FD1BA63A5CC3B33093DDDA070575984FB88F627DF684B9
1D9A136EA9F75D435007532677A9383FD9631D06A83CFB404343236CF3BF79F7
E8FC6FB09EFFDD11F30F78CEF87D86FB22C4FF09A6591A21FE8F31CD9208B6FF
B048B5BF03C70391E2C739D769D17B682AF8E14C2D41F8707CB7C59CAB45A9E6
C7F7ECE07CED2116670D5EE2ECDB1C95FC781EDE25B2976D0886B7E7CE3930F1
35FF8E87577E3CE7EA3857FE57D8E676CFFD3FA76708FAE0DFE0639C79D79405
2FFCB8F723C7275AEBF5375FEB3FA180DBF51F9538E071FD4785FFF95238CEC6
D3D0D0D06864FBFF4B1BC1FE7F99FD5757C9FB72AA6C7F9587FDFF250AFBB4C4
C3FEBF46C30F67207B68F33C85FC5EF60496DE2DFC5AFEEA9E2758CE2FC2C42F
ECFF7B843FA2EDEFE2AC70D11CF44018F87364EC4284F90B23C85F28594E28F8
0B5D94A39ABFD065392AF90B3DD86AAFFED77E7ECF96C7B142C5FEFFC53EC62A
BFFBFF17EB798C868686864684D67BA4CF830CF17A8FE31C59E17943D4FFD82F
7B1E91AAF396DC3C3FA2E73169FED0F00B9E5D6687F3FEB9F7832DCF630C75FB
631D82DC91E87FFE1B5C5AFE1B157FA4ED6F6904C79F92109DF7A6CF83D3D0D0
D0D0F0FA5D1ED767E7AB785ED488F8AB44CF9325CAC8133CFFD7CF5F1B3F7F29
224F217F9E59AEB6317795AD84F3A1FA4488BB0FEEB1BE1D893A70FCBD23D806
7DB42CDE553A1551FBABC7BF46C31F69FFEB9EF47F35343434EE003F01CE3A99
C15084679D6687E89CD121DC33BC009E53F0B1E8DD2B76C5C1B9AFF80DF011F0
8CDD25EF83F85CFC9605475F866936DF1A586B716E2E9CD9FC3B99EFFDB2AB3F
C3459B712809CFD651BEFF02DF4538EB50460C7EDFCEEBB38F1FD8F0BF26913F
15BFD7EC95BF4CC07D9FC419F780B128577ECE436E26984BC9E4DF887DF0A58F
3A589DBF2E7B4F37F1CCF302177C6F23CCDFDFF5C10FF8039C89E6E2FC719EDF
EA5B7ADF71C10FFAFC28E6F1F2DC305BB0FFB6DA4519D0FF5D70DF701539035A
266F6F810EFCDEE57DFC1BBE6580FB76A763D80EFC469BDD592E4936EB395EE4
F93CCAE549B0FD642FF1098BB4E71C6CE0211F7A55C09555206B7F489EB93EF8
33B9B2ACBEE9F082037F96CDBEED06FB29389D88B178979A3FA3BC93037F33C1
59EB2556F35982531665C57269764A8EFF9F79E03FCC9501367A25F7FD948024
FF5E0FFC7B04EF83D4E219920FB9F07FDEF1C0BFD3623FCE482FDFC2E2BE2B2A
CBBF59A1DFB9D5037FB19E1768B885A12FD7D7850B178C63C78E19BB76EDAA03
FC0F61A1BC4E9C38612C59B2C4C8C8C8108EBF10B774E952E3E4C993CA78CF9D
3B67CC9A35CB888E8E96F6036262628CBCBC3CE3FCF9F3BEB8CBCBCB8D76EDDA
D52B3B2929C9183F7EBCB16CD932A3A8A8A80EF0FFB871E38CC4C4C47A69DBB7
6F6F1C3C78D013F7B66DDB8CD8D8D86059696969C6A64D9B8C9A9A1A611E88DB
B871A311080482F9E2E2E28CEDDBB7BBBE6FCA3D75EA54E3E6CD9BD2F96FDCB8
614C9E3CB95E1D64DB01FA9BB6F9CA952B3DF7DFF2E5CBEBF5858C3CCC9C3933
9867D2A449F5E2860E1DDA40D69C2E683B332DC8A4938E99720EFDCDB73984D3
7E91A907F4456A6A6A502FEC7413F4DB2C0F648DBFCCB8A8A828611D6EDDBA65
DCBE7DBB5EBEF5EBD707D3807D105DE9E9E9411DB3927327BD372FBEDDE0B7A9
9B60A34436D5BC2FD06FF3AAAEAEB6E437AF55AB5649F5434E4E4EB0EDAC6CF5
D1A3478365AC58B1C2B20C118F0C3FB4BB99A6B2B2B2413C8C2366FCBA75EB6C
F941A6A92EC9F0AF5DBB3698A6ACACAC413C8499F190D6CBFD4F983041C8BF66
CD9A60BADDBB773788873631E3C16EC8F2D330D03519DD82F1DA4EFE602C71E2
87F66AD9B2A5B42D1A3B766C50FE2E5EBC6899C61CDBE3E3E32DEDBD9DEE4D9B
364DC80D65252424D4A5EBDBB7AF948C6ED8B0419A9FE7AEADADADF71BC66833
2D8CD5A20B6C23D84848076328DF9F6EEF1BAEEBD7AF1B1D3A7408DADF53A74E
D9A68731C22C3B3737D7B7FF3465CA946079B367CF764C0F7A0D63A5932EC85C
D0D66639292929D23E2AF80AE0339879C197B0D32DAB3687B6A3FE47454585AB
BA83CF44EB006328C8A49D1F0471206B667F7BF5BF683BD0BE00801E817D005D
013B0D00DB02E38BA963B4CDDDDEB7953C804C9A7A21EB7FE7E7E72B9D93806E
C23D8BE61F60D7323333EB64CE49C754CFBF8E1F3F2EB4A9FAB2BFFE0FEB924D
7B
}
end
object ALWidgets: TActionList
@ -299,5 +327,12 @@ object MainForm: TMainForm
ImageIndex = 1
OnExecute = AGoExternalExecute
end
object AOpenDev: TAction
Caption = 'AOpenDev'
Enabled = False
ImageIndex = 11
OnExecute = AOpenDevExecute
OnUpdate = AGoUpdate
end
end
end

View File

@ -19,6 +19,7 @@ type
{ TMainForm }
TMainForm = class(TForm)
AOpenDev: TAction;
AGoExternal: TAction;
AGo: TAction;
ALWidgets: TActionList;
@ -37,6 +38,7 @@ type
Splitter1: TSplitter;
Splitter2: TSplitter;
TBExternalGo: TToolButton;
TBExternalGo1: TToolButton;
TSInspector: TTabSheet;
TSBrowser: TTabSheet;
TSLog: TTabSheet;
@ -46,6 +48,7 @@ type
procedure AGoExecute(Sender: TObject);
procedure AGoExternalExecute(Sender: TObject);
procedure AGoUpdate(Sender: TObject);
procedure AOpenDevExecute(Sender: TObject);
procedure BrowserWindow1BrowserClosed(Sender: TObject);
procedure BrowserWindow1BrowserCreated(Sender: TObject);
procedure ChromiumConsoleMessage(Sender: TObject;
@ -149,6 +152,15 @@ begin
(Sender as Taction).Enabled:=FAllowGo;
end;
procedure TMainForm.AOpenDevExecute(Sender: TObject);
var
p: TPoint;
begin
p.X := 0;
p.Y := 0;
BrowserWindow1.Chromium.ShowDevTools(p,nil);
end;
procedure TMainForm.BrowserWindow1BrowserClosed(Sender: TObject);
begin
Close;