소스 검색

图片文件不存在的异常

lqq 9 년 전
부모
커밋
5f4f305963
6개의 변경된 파일11개의 추가작업 그리고 4개의 파일을 삭제
  1. 3 1
      Client/Lxtalk.dproj
  2. BIN
      Client/Lxtalk.res
  3. 1 1
      Controls/RealICQComponents.dproj
  4. BIN
      Controls/RealICQComponents.res
  5. 5 0
      Controls/RealICQUI/RealICQColors.pas
  6. 2 2
      ZWT/XML/DefaultConfig.xml

파일 크기가 너무 크기때문에 변경 상태를 표시하지 않습니다.
+ 3 - 1
Client/Lxtalk.dproj


BIN
Client/Lxtalk.res


파일 크기가 너무 크기때문에 변경 상태를 표시하지 않습니다.
+ 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"/>