Quellcode durchsuchen

图片文件不存在的异常

lqq vor 9 Jahren
Ursprung
Commit
5f4f305963

Datei-Diff unterdrückt, da er zu groß ist
+ 3 - 1
Client/Lxtalk.dproj


BIN
Client/Lxtalk.res


Datei-Diff unterdrückt, da er zu groß ist
+ 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"/>