fstate.pas

传奇客户端

   DBotMemo.SetImgIndex (g_WMainImages,DlgConf.DBotMemo.Image{532});
   DBotMemo.Left :=DlgConf.DBotMemo.Left{753};
   DBotMemo.Top :=DlgConf.DBotMemo.Top{204};

   DBotExit.SetImgIndex (g_WMainImages,DlgConf.DBotExit.Image{138});
   DBotExit.Left :=DlgConf.DBotExit.Left{560};
   DBotExit.Top :=DlgConf.DBotExit.Top{104};
   DBotLogout.SetImgIndex (g_WMainImages,DlgConf.DBotLogout.Image{136});
   DBotLogout.Left :=DlgConf.DBotLogout.Left{560 - 30};
   DBotLogout.Top :=DlgConf.DBotLogout.Top{104};


   {-----------------------------------------------------------}

   //Belt 快捷栏
   DBelt1.Left := SCREENWIDTH div 2 - 115;//285;
   DBelt1.Width := 32;
   DBelt1.Top := 59;
   DBelt1.Height := 29;

   DBelt2.Left := DBelt1.Left + 43;//328;
   DBelt2.Width := 32;
   DBelt2.Top := 59;
   DBelt2.Height := 29;

   DBelt3.Left := DBelt2.Left + 43;//371;
   DBelt3.Width := 32;
   DBelt3.Top := 59;
   DBelt3.Height := 29;

   DBelt4.Left := DBelt3.Left + 43;//415;
   DBelt4.Width := 32;
   DBelt4.Top := 59;
   DBelt4.Height := 29;

   DBelt5.Left := DBelt4.Left + 43;//459;
   DBelt5.Width := 32;
   DBelt5.Top := 59;
   DBelt5.Height := 29;

   DBelt6.Left := DBelt5.Left + 43;//503;
   DBelt6.Width := 32;
   DBelt6.Top := 59;
   DBelt6.Height := 29;


   {-----------------------------------------------------------}

   //酒捞袍 啊规狼 滚瓢甸
   DGold.SetImgIndex (g_WMainImages, 29); //捣农扁 3俺 鞍澜
   DGold.Left := 10;
   DGold.Top  := 190;

   DRepairItem.SetImgIndex (g_WMainImages, 26);
   DRepairItem.Left := 254;
   DRepairItem.Top := 183;
   DRepairItem.Width := 48;
   DRepairItem.Height := 22;
   DClosebag.SetImgIndex (g_WMainImages, 371);
   DCloseBag.Left := 309;
   DCloseBag.Top := 203;
   DCloseBag.Width := 14;
   DCloseBag.Height := 20;

   {-----------------------------------------------------------}

   //惑牢 措拳芒
   d := g_WMainImages.Images[384];
   if d <> nil then begin
      DMerchantDlg.Left := 0;
      DMerchantDlg.Top := 0;
      DMerchantDlg.SetImgIndex (g_WMainImages, 384);
   end;
   DMerchantDlgClose.Left := 399;
   DMerchantDlgClose.Top := 1;
   DMerchantDlgClose.SetImgIndex (g_WMainImages, 64);
   {-----------------------------------------------------------}
   //配置窗口
   d := g_WMainImages.Images[204];
   if d <> nil then begin
      DConfigDlg.SetImgIndex (g_WMainImages, 204);
      DConfigDlg.Left := (SCREENWIDTH - d.Width) div 2;
      DConfigDlg.Top := (SCREENHEIGHT - d.Height) div 2;
   end;
   DConfigDlgOk.SetImgIndex (g_WMainImages, 361);
   DConfigDlgOk.Left := 514;
   DConfigDlgOk.Top := 287;
   DConfigDlgClose.Left := 584;
   DConfigDlgClose.Top := 6;
   DConfigDlgClose.SetImgIndex (g_WMainImages, 64);

   {-----------------------------------------------------------}

   //皋春芒
   d := g_WMainImages.Images[385];
   if d <> nil then begin
      DMenuDlg.Left := 138;
      DMenuDlg.Top  := 163;
      DMenuDlg.SetImgIndex (g_WMainImages, 385);
   end;
   DMenuPrev.Left := 43;
   DMenuPrev.Top := 175;
   DMenuPrev.SetImgIndex (g_WMainImages, 388);
   DMenuNext.Left := 90;
   DMenuNext.Top := 175;
   DMenuNext.SetImgIndex (g_WMainImages, 387);
   DMenuBuy.Left := 215;
   DMenuBuy.Top := 171;
   DMenuBuy.SetImgIndex (g_WMainImages, 386);
   DMenuClose.Left := 291;
   DMenuClose.Top := 0;
   DMenuClose.SetImgIndex (g_WMainImages, 64);

   {-----------------------------------------------------------}

   //迫扁芒
   d := g_WMainImages.Images[392];
   if d <> nil then begin
      DSellDlg.Left := 328;
      DSellDlg.Top  := 163;
      DSellDlg.SetImgIndex (g_WMainImages, 392);
   end;
   DSellDlgOk.Left := 85;
   DSellDlgOk.Top := 150;
   DSellDlgOk.SetImgIndex (g_WMainImages, 393);
   DSellDlgClose.Left := 115;
   DSellDlgClose.Top := 0;
   DSellDlgClose.SetImgIndex (g_WMainImages, 64);
   DSellDlgSpot.Left := 27;
   DSellDlgSpot.Top  := 67;
   DSellDlgSpot.Width := 61;
   DSellDlgSpot.Height := 52;

   {-----------------------------------------------------------}

   //设置魔法快捷对话框
   {
   d := g_WMainImages.Images[229];
   if d <> nil then begin
      DKeySelDlg.Left := (SCREENWIDTH - d.Width) div 2;
      DKeySelDlg.Top  := (SCREENHEIGHT - d.Height) div 2;
      DKeySelDlg.SetImgIndex (g_WMainImages, 229);
   end;
   DKsIcon.Left := 52;   //DMagIcon...
   DKsIcon.Top := 29;
   DKsF1.SetImgIndex (g_WMainImages, 232);
   DKsF1.Left := 34;
   DKsF1.Top  := 83;
   DKsF2.SetImgIndex (g_WMainImages, 234);
   DKsF2.Left := 66;
   DKsF2.Top  := 83;
   DKsF3.SetImgIndex (g_WMainImages, 236);
   DKsF3.Left := 98;
   DKsF3.Top  := 83;
   DKsF4.SetImgIndex (g_WMainImages, 238);
   DKsF4.Left := 130;
   DKsF4.Top  := 83;
   DKsF5.SetImgIndex (g_WMainImages, 240);
   DKsF5.Left := 171;
   DKsF5.Top  := 83;
   DKsF6.SetImgIndex (g_WMainImages, 242);
   DKsF6.Left := 203;
   DKsF6.Top  := 83;
   DKsF7.SetImgIndex (g_WMainImages, 244);
   DKsF7.Left := 235;
   DKsF7.Top  := 83;
   DKsF8.SetImgIndex (g_WMainImages, 246);
   DKsF8.Left := 267;
   DKsF8.Top  := 83;
   DKsNone.SetImgIndex (g_WMainImages, 230);
   DKsNone.Left := 299;
   DKsNone.Top  := 83;
   DKsOk.SetImgIndex (g_WMainImages, 62);
   DKsOk.Left := 222;
   DKsOk.Top  := 131;
   }
   d := g_WMainImages.Images[620];
   if d <> nil then begin
      DKeySelDlg.Left := (SCREENWIDTH - d.Width) div 2;
      DKeySelDlg.Top  := (SCREENHEIGHT - d.Height) div 2;
      DKeySelDlg.SetImgIndex (g_WMainImages, 620);
   end;
   DKsIcon.Left := 51;
   DKsIcon.Top := 31;
   DKsF1.SetImgIndex (g_WMainImages, 232);
   DKsF1.Left := 25;
   DKsF1.Top  := 78;
   DKsF2.SetImgIndex (g_WMainImages, 234);
   DKsF2.Left := 57;
   DKsF2.Top  := 78;
   DKsF3.SetImgIndex (g_WMainImages, 236);
   DKsF3.Left := 89;
   DKsF3.Top  := 78;
   DKsF4.SetImgIndex (g_WMainImages, 238);
   DKsF4.Left := 121;
   DKsF4.Top  := 78;
   DKsF5.SetImgIndex (g_WMainImages, 240);
   DKsF5.Left := 160;
   DKsF5.Top  := 78;
   DKsF6.SetImgIndex (g_WMainImages, 242);
   DKsF6.Left := 192;
   DKsF6.Top  := 78;
   DKsF7.SetImgIndex (g_WMainImages, 244);
   DKsF7.Left := 224;
   DKsF7.Top  := 78;
   DKsF8.SetImgIndex (g_WMainImages, 246);
   DKsF8.Left := 256;
   DKsF8.Top := 78;

   DKsConF1.SetImgIndex (g_WMainImages, 626);
   DKsConF1.Left := 25;
   DKsConF1.Top  := 120;
   DKsConF2.SetImgIndex (g_WMainImages, 628);
   DKsConF2.Left := 57;
   DKsConF2.Top  := 120;
   DKsConF3.SetImgIndex (g_WMainImages, 630);
   DKsConF3.Left := 89;
   DKsConF3.Top  := 120;
   DKsConF4.SetImgIndex (g_WMainImages, 632);
   DKsConF4.Left := 121;
   DKsConF4.Top  := 120;
   DKsConF5.SetImgIndex (g_WMainImages, 634);
   DKsConF5.Left := 160;
   DKsConF5.Top  := 120;
   DKsConF6.SetImgIndex (g_WMainImages, 636);
   DKsConF6.Left := 192;
   DKsConF6.Top  := 120;
   DKsConF7.SetImgIndex (g_WMainImages, 638);
   DKsConF7.Left := 224;
   DKsConF7.Top  := 120;
   DKsConF8.SetImgIndex (g_WMainImages, 640);
   DKsConF8.Left := 256;
   DKsConF8.Top := 120;


   DKsNone.SetImgIndex (g_WMainImages, 623);
   DKsNone.Left := 296;
   DKsNone.Top  := 78;

   DKsOk.SetImgIndex (g_WMainImages, 621);
   DKsOk.Left := 296;
   DKsOk.Top  := 120;
   {-----------------------------------------------------------}
   //弊缝 芒
   d := g_WMainImages.Images[120];
   if d <> nil then begin
      DGroupDlg.Left := (SCREENWIDTH - d.Width) div 2;
      DGroupDlg.Top  := (SCREENHEIGHT - d.Height) div 2;
      DGroupDlg.SetImgIndex (g_WMainImages, 120);
   end;
   DGrpDlgClose.SetImgIndex (g_WMainImages, 64);
   DGrpDlgClose.Left := 260;
   DGrpDlgClose.Top := 0;
   DGrpAllowGroup.SetImgIndex (g_WMainImages, 122);
   DGrpAllowGroup.Left := 20;
   DGrpAllowGroup.Top := 18;
   DGrpCreate.SetImgIndex (g_WMainImages, 123);
   DGrpCreate.Left := 21+1;
   DGrpCreate.Top := 202+1;
   DGrpAddMem.SetImgIndex (g_WMainImages, 124);
   DGrpAddMem.Left := 96+1;
   DGrpAddMem.Top := 202+1;
   DGrpDelMem.SetImgIndex (g_WMainImages, 125);
   DGrpDelMem.Left := 171+1;
   DGrpDelMem.Top := 202+1;

   {-----------------------------------------------------------}

   d := g_WMainImages.Images[389];  //郴 背券芒
   if d <> nil then begin
      DDealDlg.Left := SCREENWIDTH - d.Width;
      DDealDlg.Top  := 0;
      DDealDlg.SetImgIndex (g_WMainImages, 389);
   end;
   DDGrid.Left := 21;
   DDGrid.Top  := 56;
   DDGrid.Width := 36 * 5;
   DDGrid.Height := 33 * 2;
   DDealOk.SetImgIndex (g_WMainImages, 391);
   DDealOk.Left := 155;
   DDealOk.Top := 193-65;
   DDealClose.SetImgIndex (g_WMainImages, 64);
   DDealClose.Left := 220;
   DDealClose.Top := 42;
   DDGold.SetImgIndex (g_WMainImages, 28);
   DDGold.Left := 11;
   DDGold.Top  := 202-65;

   d := g_WMainImages.Images[390];  //惑措规 背券芒
   if d <> nil then begin
      DDealRemoteDlg.Left := DDealDlg.Left - d.Width;
      DDealRemoteDlg.Top  := 0;
      DDealRemoteDlg.SetImgIndex (g_WMainImages, 390);
   end;
   DDRGrid.Left := 21;
   DDRGrid.Top  := 56;
   DDRGrid.Width := 36 * 5;
   DDRGrid.Height := 33 * 2;
   DDRGold.SetImgIndex (g_WMainImages, 28);
   DDRGold.Left := 11;
   DDRGold.Top  := 202-65;

   {-----------------------------------------------------------}
   //巩颇芒
   d := g_WMainImages.Images[180];
   if d <> nil then begin
      DGuildDlg.Left := 0;
      DGuildDlg.Top := 0;
      DGuildDlg.SetImgIndex (g_WMainImages, 180);
   end;
   DGDClose.Left := 584;
   DGDClose.Top  := 6;
   DGDClose.SetImgIndex (g_WMainImages, 64);
   DGDHome.Left := 13;
   DGDHome.Top  := 411;
   DGDHome.SetImgIndex (g_WMainImages, 198);
   DGDList.Left := 13;
   DGDList.Top  := 429;
   DGDList.SetImgIndex (g_WMainImages, 200);
   DGDChat.Left := 94;
   DGDChat.Top  := 429;
   DGDChat.SetImgIndex (g_WMainImages, 190);
   DGDAddMem.Left := 243;
   DGDAddMem.Top  := 411;
   DGDAddMem.SetImgIndex (g_WMainImages, 182);
   DGDDelMem.Left := 243;
   DGDDelMem.Top  := 429;
   DGDDelMem.SetImgIndex (g_WMainImages, 192);
   DGDEditNotice.Left := 325;
   DGDEditNotice.Top  := 411;
   DGDEditNotice.SetImgIndex (g_WMainImages, 196);
   DGDEditGrade.Left := 325;
   DGDEditGrade.Top  := 429;
   DGDEditGrade.SetImgIndex (g_WMainImages, 194);
   DGDAlly.Left := 407;
   DGDAlly.Top  := 411;
   DGDAlly.SetImgIndex (g_WMainImages, 184);
   DGDBreakAlly.Left := 407;
   DGDBreakAlly.Top  := 429;
   DGDBreakAlly.SetImgIndex (g_WMainImages, 186);
   DGDWar.Left := 529;
   DGDWar.Top  := 411;
   DGDWar.SetImgIndex (g_WMainImages, 202);
   DGDCancelWar.Left := 529;
   DGDCancelWar.Top  := 429;
   DGDCancelWar.SetImgIndex (g_WMainImages, 188);

   DGDUp.Left := 595;
   DGDUp.Top  := 239;
   DGDUp.SetImgIndex (g_WMainImages, 373);
   DGDDown.Left := 595;
   DGDDown.Top  := 291;
   DGDDown.SetImgIndex (g_WMainImages, 372);

   //巩颇 傍瘤荤亲 俊叼飘
   DGuildEditNotice.SetImgIndex (g_WMainImages, 204);
   DGEOk.SetImgIndex (g_WMainImages, 361);
   DGEOk.Left := 514;
   DGEOk.Top := 287;
   DGEClose.SetImgIndex (g_WMainImages, 64);
   DGEClose.Left := 584;
   DGEClose.Top := 6;


   {-----------------------------------------------------------}
   //瓷仿摹 炼例芒
   DAdjustAbility.SetImgIndex (g_WMainImages, 226);
   DAdjustAbilClose.SetImgIndex (g_WMainImages, 64);
   DAdjustAbilClose.Left := 316;
   DAdjustAbilClose.Top := 1;
   DAdjustAbilOk.SetImgIndex (g_WMainImages, 62);
   DAdjustAbilOk.Left := 220;
   DAdjustAbilOk.Top := 298;

   DPlusDC.SetImgIndex (g_WMainImages, 227);
   DPlusDC.Left := 217;
   DPlusDC.Top := 101;
   DPlusMC.SetImgIndex (g_WMainImages, 227);
   DPlusMC.Left := 217;
   DPlusMC.Top := 121;
   DPlusSC.SetImgIndex (g_WMainImages, 227);
   DPlusSC.Left := 217;
   DPlusSC.Top := 140;
   DPlusAC.SetImgIndex (g_WMainImages, 227);
   DPlusAC.Left := 217;
   DPlusAC.Top := 160;
   DPlusMAC.SetImgIndex (g_WMainImages, 227);
   DPlusMAC.Left := 217;
   DPlusMAC.Top := 181;
   DPlusHP.SetImgIndex (g_WMainImages, 227);
   DPlusHP.Left := 217;
   DPlusHP.Top := 201;
   DPlusMP.SetImgIndex (g_WMainImages, 227);
   DPlusMP.Left := 217;
   DPlusMP.Top := 220;
   DPlusHit.SetImgIndex (g_WMainImages, 227);
   DPlusHit.Left := 217;
   DPlusHit.Top := 240;
   DPlusSpeed.SetImgIndex (g_WMainImages, 227);
   DPlusSpeed.Left := 217;
   DPlusSpeed.Top := 261;

   DMinusDC.SetImgIndex (g_WMainImages, 228);
   DMinusDC.Left := 227;
   DMinusDC.Top := 101;
   DMinusMC.SetImgIndex (g_WMainImages, 228);
   DMinusMC.Left := 227;
   DMinusMC.Top := 121;