diff --git a/MainUnit.dfm b/MainUnit.dfm index 087bedc..de1ef6d 100644 --- a/MainUnit.dfm +++ b/MainUnit.dfm @@ -5804,7 +5804,7 @@ object MainForm: TMainForm Top = 5 Width = 948 Height = 660 - ActivePage = tsEditCreature + ActivePage = tsQuestItem Align = alClient MultiLine = True TabOrder = 0 @@ -13565,7 +13565,7 @@ object MainForm: TMainForm Top = 5 Width = 948 Height = 660 - ActivePage = tsEditGO + ActivePage = tsGOQuestItem Align = alClient TabOrder = 1 object tsSearchGO: TTabSheet @@ -15222,7 +15222,7 @@ object MainForm: TMainForm end object tsGOLoot: TTabSheet Caption = 'GO Loot' - ImageIndex = 4 + ImageIndex = 3 OnShow = tsGOLootShow DesignSize = ( 940 @@ -15689,7 +15689,7 @@ object MainForm: TMainForm end object tsGOInvolvedIn: TTabSheet Caption = 'Involved in' - ImageIndex = 5 + ImageIndex = 4 OnShow = tsGOInvolvedInShow object pcGameObjectInfo: TPageControl Left = 0 @@ -15874,9 +15874,330 @@ object MainForm: TMainForm TabOrder = 1 end end + object tsGOQuestItem: TTabSheet + Caption = 'GO QuestItem' + ImageIndex = 5 + DesignSize = ( + 940 + 632) + object Label5: TLabel + Left = 64 + Top = 21 + Width = 88 + Height = 13 + Caption = 'GO Quest item List' + end + object lbgoqiItemId: TLabel + Left = 264 + Top = 372 + Width = 29 + Height = 13 + Caption = 'ItemId' + end + object btGOQuestItemAdd: TSpeedButton + Left = 456 + Top = 392 + Width = 23 + Height = 22 + Glyph.Data = { + 36050000424D3605000000000000360400002800000010000000100000000100 + 080000000000000100000000000000000000000100000000000000000000FFFF + FF003DD36D000985120091F7AB0026AD330067E58C0027872A0053DB7C0032C2 + 5B007AF09B0015971E00289A300059E8860046DD770039CB64000F8D1A002292 + 290089F4A5002181240068EE910021A62E005CE0840053E4810060EA8B0045D7 + 71002A9230007FF39F004EE17D000F84150058DF7F00238A260060E487003ACF + 69000B8A1500268228004ADF7A0034C55F0040D670008DF6A80064ED8E00289F + 3100258C2A0036C862002B96320076F099005BE4860044DA740023962A00138E + 1A0023A9300056E684002386260064E48A0056E282004ADC7800258F2B000B87 + 15005EE1860041D8720039CD67008BF5A6000E8E1800118F1900228325002489 + 2800299C310025AB320051DA7B0026842900248C28005EEA8A0022942A005AE8 + 880024AB30002A9430003BCD67000A8413000A8814000C8916004BDD7900299E + 320047DE780046D872003FD56F003ED46E0033C45E002384250027862900258B + 2900258D290054E4820023952B002B95310021A72D0049DC7700289C300022A9 + 2F0044DB750025AD320041D7710037C861007EF39F00258F2A004AE07A00299D + 310045D8720039CB6500C0C0C000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000000000000000000000000000006C6C6C6C6C6C + 6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C1F3E224E03236C6C6C6C6C6C6C6C6C6C46 + 44213C09456C6C6C6C6C6C6C6C6C6C5A16550225586C6C6C6C6C6C6C6C6C6C67 + 35645465076C6C6C6C6C6C305C48113F362F3B0F1D345740136C6C5E2050375F + 680E62264C6B2B564D6C6C612D474933171C52623B54023C396C6C4A66142818 + 0D5B1C0E2F6455214F6C6C6304273D120A0D17242E063A08106C6C2969600C0B + 1218336A31382A59416C6C6C6C6C6C0C3D2849191A6C6C6C6C6C6C6C6C6C6C42 + 271447534B6C6C6C6C6C6C6C6C6C6C42041B2D1E5D6C6C6C6C6C6C6C6C6C6C51 + 054332152C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C6C} + OnClick = btGOQuestItemAddClick + end + object btGOQuestItemUpd: TSpeedButton + Left = 488 + Top = 391 + Width = 23 + Height = 22 + Enabled = False + Glyph.Data = { + 36060000424D3606000000000000360000002800000020000000100000000100 + 18000000000000060000C40E0000C40E00000000000000000000C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0B0723CC86B1ACB6B15B5672BAD8265C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C076767671 + 7171707070707070898989C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0CE7622FFAE4FFFAD48FFA73DFF972AEA7E18B6784CC0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0787878A7A7A7A3 + A3A39E9E9E949494818181818181C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0CE7F31 + D08A41C0C0C0CA7421FFB763FFB259D47721B67D4FB28D76B17D5AB3530FB28B + 71C0C0C0C0C0C0C0C0C0C0C0C07F7F7F888888C0C0C0757575B1B1B1ACACAC7A + 7A7A828282949494858585616161919191C0C0C0C0C0C0C0C0C0C0C0C0D18638 + FDC285BF6D0DFFC98EFFBE74D67E26C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B67F + 5BC0C0C0C0C0C0C0C0C0C0C0C0848484C1C1C1666666C6C6C6B9B9B97E7E7EC0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0888888C0C0C0C0C0C0C0C0C0C0C0C0C7843B + FFE0BDFFCF9EFFCC96ECA660BA8D62C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0818181DEDEDECECECECACACAA6A6A68E8E8EC0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0BE823B + FFE9D1FFD2A4FFCF9FCF822AB6885EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C07C7C7CE8E8E8D1D1D1CFCFCF7C7C7C8A8A8AC0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B8834B + FFF3E5FFE2C5FFDCB7FFD4A1FFC37EBB864BC0C0C0BD7B45C3763CCA7C3FC383 + 46C3783EAC8A76C0C0C0C0C0C0818181F2F2F2E2E2E2DBDBDBD0D0D0BEBEBE83 + 8383C0C0C08181817F7F7F848484848484808080919191C0C0C0C0C0C0B59574 + DD9D47DDA04FE0983ED78D3AC98539C0C0C0B27A49FFD9A0FFE5BCFFE4C0FFE2 + BCFFE4BAA3694DC0C0C0C0C0C09494949292929696968F8F8F888888818181C0 + C0C07D7D7DCFCFCFDDDDDDDFDFDFDDDDDDDCDCDC787878C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0AB7A5BCB7D38FFD3A0FFD1 + A2FFE0B1A86439C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0838383818181CFCFCFD0D0D0D8D8D8707070C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0B48460F8B776FFCC94FFCF + 98FFDFB0B46A35C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C08A8A8AB7B7B7C9C9C9CBCBCBD7D7D7747474C0C0C0C0C0C0C0C0C0 + C0C0C0C1874CC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0DE8731FFBE75FFCA88AB52 + 0BFECC9BC37232C0C0C0C0C0C0C0C0C0C0C0C0868686C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0878787BABABAC3C3C35B5B5BCCCCCC7A7A7AC0C0C0C0C0C0C0C0C0 + C0C0C0BB966ED27F11C3965DC0C0C0C18B51E18728FFB057FFC179CB7426C0C0 + C0C4793FC77237C0C0C0C0C0C0C0C0C0C0C0C0949494717171909090C0C0C089 + 8989848484ABABABBCBCBC787878C0C0C08181817F7F7FC0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0CC9048F68E1AFC952AFFA13AFFA743FFBF75D07622B38C6BC0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C08A8A8A8888889393939C + 9C9CA1A1A1BABABA7979798F8F8FC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0BA9063CE8832D47E20CE7C26B77533C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C08E8E8E8080807A + 7A7A7A7A7A757575C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0} + NumGlyphs = 2 + OnClick = btGOQuestItemUpdClick + end + object btGOQuestItemDel: TSpeedButton + Left = 517 + Top = 392 + Width = 23 + Height = 22 + Enabled = False + Glyph.Data = { + 36060000424D3606000000000000360000002800000020000000100000000100 + 18000000000000060000C40E0000C40E00000000000000000000C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + 2427AE161CAC5A5AA9C0C0C0C0C0C0C0C0C0C0C0C0C0C0C05353A94F4FA2C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0696969616161818181C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C07E7E7E787878C0C0C0C0C0C0C0C0C0C0C0C0C0C0C04E4EAB + 1844F6194DF81031D22021AAC0C0C0C0C0C0C0C0C04A4AAF0928D7092ED70313 + B34D4DADC0C0C0C0C0C0C0C0C07C7C7C878787888888717171656565C0C0C0C0 + C0C0C0C0C07C7C7C7070707070705B5B5B7D7D7DC0C0C0C0C0C0C0C0C02022B1 + 2451F91F52FF1D4FFF1744E81017AFC0C0C04747AC0D2EDD1142F90D3DF50B3B + F0041ABC6F6FAAC0C0C0C0C0C06868688E8E8E8F8F8F8E8E8E7F7F7F5F5F5FC0 + C0C07979797575758585858181817D7D7D6060608C8C8CC0C0C0C0C0C0C0C0C0 + 1832DB285BFF2456FF2253FF1B4BF1060EAF0F30DD164AFE1344F91041F60E3E + F60A3CF02C2CA2C0C0C0C0C0C0C0C0C07979799393939191919090908686865A + 5A5A7676768A8A8A8686868383838282827D7D7D676767C0C0C0C0C0C07777B3 + 1F37DD3A6FFF2C5EFF295AFF2657FF2052FC1C4FFF194AFD1646FA1445FA0F3D + F21119AFC0C0C0C0C0C0C0C0C09595957E7E7E9C9C9C9595959494949292928E + 8E8E8D8D8D8B8B8B888888878787808080606060C0C0C0C0C0C0C0C0C0C0C0C0 + 6969B81A25C53D6AFB3567FF2C5DFF2859FF2253FF1D4EFF1A4DFF123DED2324 + ABC0C0C0C0C0C0C0C0C0C0C0C0C0C0C09090906F6F6F9C9C9C9A9A9A95959593 + 93939090908E8E8E8C8C8C7F7F7F676767C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C02F2FB32E4EE73668FF2E5EFF2859FF2254FF163DEA2C2CA8C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C07171718A8A8A9A9A9A96 + 96969393939090908080806A6A6AC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0253FDF3B6DFF3464FF2E5EFF2759FF1B46EA2121ACC0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C08282829D9D9D99 + 9999969696939393828282666666C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C02B2CC04B7CFF4170FF3B6BFF396CFF2D5EFF2558FF1336D74A4A + B2C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0757575A5A5A5A0A0A09D + 9D9D9C9C9C9696969292927575757E7E7EC0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0253BD95080FF4575FF3662FA0C13C13C6DFF2A5BFF2053FD0B1D + C2C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C07F7F7FA7A7A7A2A2A298 + 98986666669D9D9D9494948E8E8E666666C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C04F4FBD527CFA5081FF4B7DFF181FC5C0C0C01B22C4386AFF2456FF1A4A + F21419B1C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0868686A6A6A6A7A7A7A5A5A56E + 6E6EC0C0C06F6F6F9B9B9B919191868686626262C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0252DD66A9CFF5788FF2B46E77070B9C0C0C0C0C0C01621C73065FF1F51 + FF1439DD4444AFC0C0C0C0C0C0C0C0C0C0C0C07D7D7DB4B4B4ABABAB89898994 + 9494C0C0C0C0C0C06E6E6E9797978F8F8F787878797979C0C0C0C0C0C0C0C0C0 + C0C0C04B4BC83951E25782FB2929C6C0C0C0C0C0C0C0C0C0C0C0C01628D3265A + FF0F2EE32123B5C0C0C0C0C0C0C0C0C0C0C0C08989898D8D8DA9A9A9777777C0 + C0C0C0C0C0C0C0C0C0C0C07474749292927979796B6B6BC0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C03E3EB9C0C0C0C0C0C0C0C0C0C0C0C0C0C0C06B6BB62E2E + B5C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C07B7B7BC0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0909090717171C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0 + C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0} + NumGlyphs = 2 + OnClick = btGOQuestItemDelClick + end + object lvgoqiGOQuestItem: TJvListView + Left = 64 + Top = 40 + Width = 659 + Height = 305 + Anchors = [akLeft, akTop, akRight] + Columns = < + item + AutoSize = True + Caption = 'CreatureEntry' + end + item + AutoSize = True + Caption = 'Idx' + end + item + AutoSize = True + Caption = 'itemId' + end + item + AutoSize = True + Caption = 'VerifiedBuild' + end> + HideSelection = False + ReadOnly = True + RowSelect = True + TabOrder = 0 + ViewStyle = vsReport + OnChange = lvgoqiGOQuestItemChange + OnSelectItem = lvgoqiGOQuestItemSelectItem + ColumnsOrder = '0=171,1=168,2=168,3=168' + ExtendedColumns = < + item + end + item + end + item + end + item + end> + end + object edgoqiGameObjectEntry: TLabeledEdit + Left = 64 + Top = 391 + Width = 80 + Height = 21 + EditLabel.Width = 83 + EditLabel.Height = 13 + EditLabel.Caption = 'GameObjectEntry' + TabOrder = 1 + Text = '' + end + object edgoqiIdx: TLabeledEdit + Left = 160 + Top = 391 + Width = 80 + Height = 21 + EditLabel.Width = 14 + EditLabel.Height = 13 + EditLabel.Caption = 'Idx' + TabOrder = 2 + Text = '' + end + object edgoqiItemId: TJvComboEdit + Left = 264 + Top = 391 + Width = 80 + Height = 21 + ButtonWidth = 22 + ClickKey = 13 + Glyph.Data = { + 36030000424D3603000000000000360000002800000010000000100000000100 + 18000000000000030000120B0000120B00000000000000000000FFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFD79C64 + DB9E63FFFFFFFFFFFFFFFFFFFFFFFFDA9E63D89D65FFFFFFFFFFFFFFFFFFFFFF + FFD79C64DB9E63FFFFFFC2773FEBB36FEDB570D19059FFFFFFFFFFFFC57D44ED + B571EBB26ECC9164FFFFFFFFFFFFC27840EBB36FECB470D1915AC48355D5955B + D89960CA8C5FFFFFFFFFFFFFC68457D8995FD6965BCE9974FFFFFFFFFFFFC380 + 52D6975DD99A61CB8D5FFFFFFFC68A65C17F54FFFFFFFFFFFFFFFFFFFFFFFFC2 + 8157C58963FFFFFFFFFFFFFFFFFFFFFFFFC68B65C17F54FFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF} + TabOrder = 3 + Text = '' + OnButtonClick = GetItem + end + object edgoqiVerifiedBuild: TLabeledEdit + Left = 360 + Top = 391 + Width = 80 + Height = 21 + EditLabel.Width = 58 + EditLabel.Height = 13 + EditLabel.Caption = 'VerifiedBuild' + TabOrder = 4 + Text = '' + end + object btShowGOQuestItemScript: TButton + Left = 546 + Top = 389 + Width = 161 + Height = 25 + Caption = 'Show GO QuestItem Script' + TabOrder = 5 + OnClick = btScriptGOQuestItemClick + end + object btFullGOQuestItemScript: TButton + Left = 546 + Top = 431 + Width = 161 + Height = 25 + Caption = 'Show FULL GO QuestItem Script' + TabOrder = 6 + OnClick = btFullGOQuestItemScriptClick + end + end object tsGOSmartAI: TTabSheet Caption = 'GO SmartAI' - ImageIndex = 7 + ImageIndex = 6 object lbgtGotoSmartAI: TLabel Left = 15 Top = 67 @@ -15899,7 +16220,7 @@ object MainForm: TMainForm end object tsGOScript: TTabSheet Caption = 'Script' - ImageIndex = 3 + ImageIndex = 7 OnShow = tsGOScriptShow DesignSize = ( 940 diff --git a/MainUnit.pas b/MainUnit.pas index 4f13278..b094234 100644 --- a/MainUnit.pas +++ b/MainUnit.pas @@ -26,7 +26,7 @@ interface SCRIPT_TAB_NO_QUEST = 6; SCRIPT_TAB_NO_CREATURE = 20; - SCRIPT_TAB_NO_GAMEOBJECT = 6; + SCRIPT_TAB_NO_GAMEOBJECT = 7; SCRIPT_TAB_NO_ITEM = 10; SCRIPT_TAB_NO_SMARTAI = 1; SCRIPT_TAB_NO_CONDITIONS = 1; @@ -73,7 +73,7 @@ interface PFX_GAME_EVENT = 'ge'; PFX_GAMEOBJECT = 'gl'; PFX_GAMEOBJECT_TEMPLATE_ADDON = 'gota'; - PFX_GAMEOBJECT_QUEST_ITEM = 'goqi'; + PFX_GAMEOBJECT_QUESTITEM = 'goqi'; PFX_GAMEOBJECT_LOOT_TEMPLATE = 'go'; PFX_ITEM_TEMPLATE = 'it'; PFX_ITEM_LOOT_TEMPLATE = 'il'; @@ -1697,6 +1697,21 @@ TMainForm = class(TForm) lbgotafaction: TLabel; lbgotaflags: TLabel; + //gameobject_questitem + tsGOQuestItem: TTabSheet; + Label5: TLabel; + lvgoqiGOQuestItem: TJvListView; + edgoqiGameObjectEntry: TLabeledEdit; + edgoqiIdx: TLabeledEdit; + edgoqiItemId: TJvComboEdit; + lbgoqiItemId: TLabel; + edgoqiVerifiedBuild: TLabeledEdit; + btGOQuestItemAdd: TSpeedButton; + btGOQuestItemUpd: TSpeedButton; + btGOQuestItemDel: TSpeedButton; + btShowGOQuestItemScript: TButton; + btFullGOQuestItemScript: TButton; + procedure FormActivate(Sender: TObject); procedure btSearchClick(Sender: TObject); procedure FormCreate(Sender: TObject); @@ -1850,6 +1865,18 @@ TMainForm = class(TForm) procedure btScriptCreatureQuestItemClick(Sender: TObject); // Creature Quest Item tab end + // Gameobject Quest Item tab begin + procedure btGOQuestItemAddClick(Sender: TObject); + procedure btGOQuestItemUpdClick(Sender: TObject); + procedure btGOQuestItemDelClick(Sender: TObject); + procedure lvgoqiGOQuestItemChange(Sender: TObject; Item: TListItem; + Change: TItemChange); + procedure lvgoqiGOQuestItemSelectItem(Sender: TObject; Item: TListItem; + Selected: Boolean); + procedure btFullGOQuestItemScriptClick(Sender: TObject); + procedure btScriptGOQuestItemClick(Sender: TObject); + // Gameobject Quest Item tab end + procedure edSearchItemChange(Sender: TObject); procedure btClearSearchItemClick(Sender: TObject); procedure lvSearchItemChange(Sender: TObject; Item: TListItem; @@ -2237,6 +2264,7 @@ TMainForm = class(TForm) procedure CompleteGOLocationScript; procedure CompleteGOLootScript; procedure CompleteGOScript; + procedure CompleteGOQuestItemScript; {items} procedure SearchItem; @@ -6931,6 +6959,9 @@ procedure TMainForm.LoadGO(Entry: integer); LoadQueryToListView(Format('SELECT glt.*, i.name FROM `gameobject_loot_template` glt '+ 'LEFT OUTER JOIN `item_template` i ON i.`entry` = glt.`item` WHERE (glt.`entry`=%d)', [StrToIntDef(edgtdata1.Text,0)]), lvgoGOLoot); + LoadQueryToListView(Format('SELECT `GameObjectEntry`, `idx`, `itemId`, `VerifiedBuild` FROM `gameobject_questitem` WHERE (`GameObjectEntry`=%d)', + [Entry]),lvgoqiGOQuestItem); + except on E: Exception do raise Exception.Create(dmMain.Text[89]+#10#13+E.Message); @@ -6941,7 +6972,7 @@ procedure TMainForm.CompleteGOScript; var gtentry, Fields, Values, s1, s2, Script: string; begin - meGOLog.Clear; + megoLog.Clear; gtentry := edgtEntry.Text; if gtentry='' then exit; SetFieldsAndValues(Fields, Values, 'gameobject_template', PFX_GAMEOBJECT_TEMPLATE, megoLog); @@ -6975,6 +7006,119 @@ procedure TMainForm.CompleteGOScript; megoScript.Text := Script; end; +// -- gameobject_questitem +procedure TMainForm.btGOQuestItemAddClick(Sender: TObject); +begin + with lvgoqiGOQuestItem.Items.Add do + begin + Caption := edgoqiGameObjectEntry.Text; + SubItems.Add(edgoqiIdx.Text); + SubItems.Add(edgoqiItemID.Text); + SubItems.Add(edgoqiVerifiedBuild.Text); + end; +end; + +procedure TMainForm.btGOQuestItemUpdClick(Sender: TObject); +begin + if Assigned(lvgoqiGOQuestItem.Selected) then + begin + with lvgoqiGOQuestItem.Selected do + begin + Caption := edgoqiGameObjectEntry.Text; + SubItems[0] := edgoqiIdx.Text; + SubItems[1] := edgoqiItemID.Text; + SubItems[2] := edgoqiVerifiedBuild.Text; + end; + end; +end; + +procedure TMainForm.btGOQuestItemDelClick(Sender: TObject); +begin +if Assigned(lvgoqiGOQuestItem.Selected) then + lvgoqiGOQuestItem.DeleteSelected; +end; + +procedure TMainForm.btFullGOQuestItemScriptClick(Sender: TObject); +var + i: integer; + entry, Values: string; +begin + PageControl4.ActivePageIndex := SCRIPT_TAB_NO_GAMEOBJECT; + entry := edgoqiGameObjectEntry.Text; + megoScript.Clear; + Values := ''; + if lvgoqiGOQuestItem.Items.Count<>0 then + begin + for i := 0 to lvgoqiGOQuestItem.Items.Count - 2 do + begin + Values := Values + Format('(%s, %s, %s, %s),'#13#10,[ + lvgoqiGOQuestItem.Items[i].Caption, + lvgoqiGOQuestItem.Items[i].SubItems[0], + lvgoqiGOQuestItem.Items[i].SubItems[1], + lvgoqiGOQuestItem.Items[i].SubItems[2] + ]); + end; + i := lvgoqiGOQuestItem.Items.Count - 1; + Values := Values + Format('(%s, %s, %s, %s);',[ + lvgoqiGOQuestItem.Items[i].Caption, + lvgoqiGOQuestItem.Items[i].SubItems[0], + lvgoqiGOQuestItem.Items[i].SubItems[1], + lvgoqiGOQuestItem.Items[i].SubItems[2] + ]); + end; + + if Values<>'' then + begin + megoScript.Text := Format('DELETE FROM `gameobject_questitem` WHERE `GameObjectEntry`= %s ;'#13#10+ + 'INSERT INTO `gameobject_questitem` (GameObjectEntry, Idx, ItemId, VerifiedBuild) VALUES '#13#10'%s ', + [entry, Values]) + end + else + megoScript.Text := Format('DELETE FROM `gameobject_questitem` WHERE `GameObjectEntry`= %s;',[entry]); +end; + +procedure TMainForm.btScriptGOQuestItemClick(Sender: TObject); +begin + PageControl4.ActivePageIndex := SCRIPT_TAB_NO_GAMEOBJECT; +end; + +procedure TMainForm.lvgoqiGOQuestItemChange(Sender: TObject; Item: TListItem; + Change: TItemChange); +begin + btGOQuestItemUpd.Enabled := Assigned(TJvListView(Sender).Selected); + btGOQuestItemDel.Enabled := Assigned(TJvListView(Sender).Selected); +end; + +procedure TMainForm.lvgoqiGOQuestItemSelectItem(Sender: TObject; + Item: TListItem; Selected: Boolean); +begin + if Selected then + begin + with TJvListView(Sender).Selected do + begin + edgoqiGameObjectEntry.Text := Caption; + edgoqiIdx.Text := SubItems[0]; + edgoqiItemID.Text := SubItems[1]; + edgoqiVerifiedBuild.Text := SubItems[2]; + end; + end; +end; + +procedure TMainForm.CompleteGOQuestItemScript; +var + entry, itemidx, Fields, Values: string; +begin + megoLog.Clear; + entry := edgoqiGameObjectEntry.Text; + itemidx := edgoqiIdx.Text; + if (entry='') or (itemidx='') then Exit; + SetFieldsAndValues(Fields, Values, 'gameobject_questitem', PFX_GAMEOBJECT_QUESTITEM, megoLog); + megoScript.Text := Format('DELETE FROM `gameobject_questitem` WHERE (`GameObjectEntry`=%s) AND (`Idx`=%s);'#13#10+ + 'INSERT INTO `gameobject_questitem` (%s) VALUES '#13#10+ + '(%s);'#13#10,[entry, itemidx, Fields, Values]) +end; +// -- gameobject_questitem + procedure TMainForm.edgeCreatureGuidButtonClick(Sender: TObject); begin GetGuid(Sender, 'creature'); @@ -7055,6 +7199,10 @@ procedure TMainForm.tsGOScriptShow(Sender: TObject); 1: CompleteGOScript; 2: CompleteGOLocationScript; 3: CompleteGOLootScript; + 4: {involved in - do nothing}; + 5: CompleteGOQuestItemScript; + 6: {smartai tab - do nothing}; + 7: {scritp tab - do nothing}; end; end;