Kaynağa Gözat

图片文件不存在的异常

lqq 9 yıl önce
ebeveyn
işleme
5f4f305963

Dosya farkı çok büyük olduğundan ihmal edildi
+ 3 - 1
Client/Lxtalk.dproj


BIN
Client/Lxtalk.res


Dosya farkı çok büyük olduğundan ihmal edildi
+ 1 - 1
Controls/RealICQComponents.dproj


BIN
Controls/RealICQComponents.res


+ 5 - 0
Controls/RealICQUI/RealICQColors.pas

@@ -151,6 +151,11 @@ begin
   Bitmap1 := TBitmap.Create;
   Bitmap2 := TBitmap.Create;
   Bitmap2.SetSize(ANewWidth, ANewHeight);
+  if not FileExists(AFileName) then
+  begin
+    Result := TBitmap.Create;
+    Exit;
+  end;
   try
     try
       if AnsiSameText(ExtractFileExt(AFileName), '.png') then

+ 2 - 2
ZWT/XML/DefaultConfig.xml

@@ -6,8 +6,8 @@
 	<MainFormTop Value="-1"/>
 	<MainFormWidth Value="258"/>
 	<MainFormHeight Value="734"/>
-	<TalkingFormLeft Value="442"/>
-	<TalkingFormTop Value="123"/>
+	<TalkingFormLeft Value="695"/>
+	<TalkingFormTop Value="128"/>
 	<TalkingFormWidth Value="663"/>
 	<TalkingFormHeight Value="507"/>
 	<ShowMainFormOnStart Value="True"/>