2003.10.10 (金) 22:49:48 <u*j*2*6*> about.dfmの大きさが劇的に小さくなるので修正にいれてみました
shuusei24192:aboutダイアログの画像をjpg形式に変更

diff --dos -ur 24191/aboutform.dfm 24192/aboutform.dfm
--- 24191/aboutform.dfm	Sun Jan 26 14:58:58 2003
+++ 24192/aboutform.dfm	Fri Oct 10 22:35:30 2003
@@ -16,9812 +16,760 @@
   OnCreate = FormCreate
   PixelsPerInch = 96
   TextHeight = 13
-  object bmp: TImage
+  object jpg: TImage
     Left = 0
     Top = 0
     Width = 330
     Height = 316
     AutoSize = True
     Picture.Data = {
-      07544269746D6170B6C80400424DB6C804000000000036000000280000004A01

(あまりに長いので途中省略)

+      A500613D13ED4B03EE7B53D668D4680FFFD9}
   end
   object PaintBox1: TPaintBox
     Left = 112
diff --dos -ur 24191/aboutform.pas 24192/aboutform.pas
--- 24191/aboutform.pas	Wed Mar 26 14:52:44 2003
+++ 24192/aboutform.pas	Fri Oct 10 22:36:30 2003
@@ -21,11 +21,11 @@
 
 uses
   Windows, Messages, SysUtils, Classes2, Graphics, Controls, Forms, Dialogs,
-  ExtCtrls, ShellApi, StdCtrls, constants, Classes;
+  ExtCtrls, ShellApi, StdCtrls, constants, Classes, jpeg;
 
 type
   TSlavaNapAbout = class(TForm)
-    bmp: TImage;
+    jpg: TImage;
     PaintBox1: TPaintBox;
     PaintBox2: TPaintBox;
     procedure PaintBox1Click(Sender: TObject);
@@ -56,8 +56,8 @@
 
 procedure TSlavaNapAbout.FormCreate(Sender: TObject);
 begin
- ClientWidth:=bmp.Width;
- ClientHeight:=bmp.Height;
+ ClientWidth:=jpg.Width;
+ ClientHeight:=jpg.Height;
  Caption:='SlavaNapについて:     '+SLAVANAP_BUILD_TEXT;
 end;