Develop and Download Open Source Software

bitmaplisttool

Browse Subversion Repository

/[bitmaplisttool]/Unit3.pas

Diff of /Unit3.pas

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 6 by yamat0jp, Mon Jul 20 13:11:27 2015 UTC revision 7 by yamat0jp, Mon Jul 20 22:47:05 2015 UTC
# Line 9  uses Line 9  uses
9  type  type
10    TForm3 = class(TForm)    TForm3 = class(TForm)
11      Image1: TImage;      Image1: TImage;
12        procedure FormResize(Sender: TObject);
13    private    private
14      { Private 宣言 }      { Private 宣言 }
15    public    public
# Line 22  implementation Line 23  implementation
23    
24  {$R *.dfm}  {$R *.dfm}
25    
26    uses Unit2;
27    
28    procedure TForm3.FormResize(Sender: TObject);
29    begin
30      Form2.UpDown1.Position:=ClientWidth;
31      Form2.UpDown2.Position:=ClientHeight;
32    end;
33    
34  end.  end.
Legend:
Removed from v.6  
changed lines
  Added in v.7
Back to OSDN">Back to OSDN
 ViewVC Help
Powered by ViewVC 1.1.26  
About OSDN
Find Software
Develop Software
Help