Browse Source

Signed-off-by: lqq <lqq@wswin.cn>

lqq 9 years ago
parent
commit
8a739e67d2
3 changed files with 33 additions and 33 deletions
  1. 9 9
      Client/MainFrm.dfm
  2. 1 1
      Controls/RealICQClient/RealICQClient.pas
  3. 23 23
      Controls/RealICQComponents.dproj

+ 9 - 9
Client/MainFrm.dfm

@@ -11066,7 +11066,7 @@ object MainForm: TMainForm
     Left = 463
     Top = 441
     Bitmap = {
-      494C010108000900F40220002000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
+      494C010108000900F80220002000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
       00000000000036000000280000008000000060000000010020000000000000C0
       0000000000000000000000000000000000000000000000000000000000000000
       0000000000000000000000000000000000000000000000000000000000000000
@@ -13643,7 +13643,7 @@ object MainForm: TMainForm
     Left = 367
     Top = 440
     Bitmap = {
-      494C010106000900F40210001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
+      494C010106000900F80210001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
       0000000000003600000028000000400000002000000001002000000000000020
       0000000000000000000000000000000000000000000000000000000000000000
       0000000000000000000000000000000000000000000010185A0018299C002139
@@ -14043,7 +14043,7 @@ object MainForm: TMainForm
     Left = 400
     Top = 440
     Bitmap = {
-      494C010101000400F40210001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
+      494C010101000400F80210001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
       0000000000003600000028000000400000001000000001002000000000000010
       0000000000000000000000000000000000000000000000000000000000000000
       0000000000000000000000000000000000000000000000000000000000000000
@@ -14217,7 +14217,7 @@ object MainForm: TMainForm
     Left = 496
     Top = 442
     Bitmap = {
-      494C010102000400F40210001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
+      494C010102000400F80210001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
       0000000000003600000028000000400000001000000001002000000000000010
       0000000000000000000000000000000000000000000000000000000000000000
       0000000000000000000000000000000000000000000000000000000000000000
@@ -14601,7 +14601,7 @@ object MainForm: TMainForm
     Left = 366
     Top = 472
     Bitmap = {
-      494C010102000400F40210001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
+      494C010102000400F80210001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
       0000000000003600000028000000400000001000000001002000000000000010
       0000000000000000000000000000000000000000000000000000000000000000
       0000000000000000000000000000000000000000000000000000000000000000
@@ -14744,7 +14744,7 @@ object MainForm: TMainForm
     Left = 399
     Top = 473
     Bitmap = {
-      494C010103000400F40210001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
+      494C010103000400F80210001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
       0000000000003600000028000000400000001000000001002000000000000010
       0000000000000000000000000000000000000000000000000000000000000000
       0000949494009494940094949400949494009494940094949400949494009494
@@ -14889,7 +14889,7 @@ object MainForm: TMainForm
     Left = 335
     Top = 440
     Bitmap = {
-      494C010105000900F40218001800FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
+      494C010105000900F80218001800FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
       0000000000003600000028000000600000003000000001002000000000000048
       0000000000000000000000000000000000000000000000000000000000000000
       0000000000000000000000000000000000000000000000000000000000000000
@@ -15777,7 +15777,7 @@ object MainForm: TMainForm
     Left = 280
     Top = 72
     Bitmap = {
-      494C010106000900F4020B000B00FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
+      494C010106000900F8020B000B00FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
       00000000000036000000280000002C000000160000000100200000000000200F
       00000000000000000000000000000000000000000000000000008CA5C6001852
       B5001839C6001831BD001839C6001852B5008CA5C60000000000000000000000
@@ -15916,7 +15916,7 @@ object MainForm: TMainForm
     Left = 312
     Top = 72
     Bitmap = {
-      494C010106000900F40209000900FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
+      494C010106000900F80209000900FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
       000000000000360000002800000024000000120000000100200000000000200A
       00000000000000000000000000000000000000000000F7F7F7002163B5001842
       C6002139C6001842C6002163B500F7F7F7000000000000000000F7F7F7002984

+ 1 - 1
Controls/RealICQClient/RealICQClient.pas

@@ -1851,7 +1851,7 @@ begin
     RealICQMessage := SendedMessages.Objects[iLoop] as TRealICQMessage;
     if GetTickCount - RealICQMessage.MessageID >= 60000 then  //等待了60秒还未收到消息反馈,提示消息发送失败
     begin
-      FRealICQClient.DoSendMessageFailed(RealICQMessage);
+      FRealICQClient.Do(RealICQMessage);
       SendedMessages.Delete(iLoop);
     end
     else if GetTickCount - RealICQMessage.MessageID >= 30000 then //等待了30秒未收到消息反馈,转为服务器中转方式发送

+ 23 - 23
Controls/RealICQComponents.dproj

@@ -35,18 +35,29 @@
     <DelphiCompile Include="RealICQComponents.dpk">
       <MainSource>MainSource</MainSource>
     </DelphiCompile>
-    <DCCReference Include="adortl.dcp" />
-    <DCCReference Include="dbrtl.dcp" />
-    <DCCReference Include="DCEF_D7.dcp" />
-    <DCCReference Include="dclOffice2k.dcp" />
-    <DCCReference Include="designide.dcp" />
-    <DCCReference Include="DirectX9_D2005.dcp" />
-    <DCCReference Include="dsnap.dcp" />
-    <DCCReference Include="DSPack_D2005.dcp" />
-    <DCCReference Include="IndyCore90.dcp" />
-    <DCCReference Include="IndyProtocols90.dcp" />
-    <DCCReference Include="IndySystem90.dcp" />
-    <DCCReference Include="inet.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\adortl.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\dbrtl.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\DCEF_D7.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\dclOffice2k.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\designide.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\DirectX9_D2005.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\dsnap.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\DSPack_D2005.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\IndyCore90.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\IndyProtocols90.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\IndySystem90.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\inet.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\rtl.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\soaprtl.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\vcl.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\vclactnband.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\vcldb.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\vclie.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\vclimg.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\vcljpg.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\VclSmp.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\vclx.dcp" />
+    <DCCReference Include="$(SystemRoot)\system32\xmlrtl.dcp" />
     <DCCReference Include="RealICQClient\AESLib.pas" />
     <DCCReference Include="RealICQClient\AudioTransmitter.pas" />
     <DCCReference Include="RealICQClient\BlowFish.pas" />
@@ -125,17 +136,6 @@
     <DCCReference Include="RealICQUI\SingleBorderHintWindow.pas" />
     <DCCReference Include="RealICQUI\WebBrowserWithUI.pas" />
     <DCCReference Include="RealICQUI\xFonts.pas" />
-    <DCCReference Include="rtl.dcp" />
-    <DCCReference Include="soaprtl.dcp" />
-    <DCCReference Include="vcl.dcp" />
-    <DCCReference Include="vclactnband.dcp" />
-    <DCCReference Include="vcldb.dcp" />
-    <DCCReference Include="vclie.dcp" />
-    <DCCReference Include="vclimg.dcp" />
-    <DCCReference Include="vcljpg.dcp" />
-    <DCCReference Include="VclSmp.dcp" />
-    <DCCReference Include="vclx.dcp" />
-    <DCCReference Include="xmlrtl.dcp" />
     <None Include="ModelSupport_RealICQComponents\default.txaPackage" />
     <None Include="ModelSupport_RealICQComponents\default.txvpck" />
     <None Include="ModelSupport_RealICQComponents\Encrypt\default.txaPackage" />