Develop and Download Open Source Software

Browse Subversion Repository

Diff of /UserSessionUnit.pas

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

revision 7 by yamat0jp, Wed Dec 30 09:56:24 2015 UTC revision 8 by yamat0jp, Thu Dec 31 08:51:02 2015 UTC
# Line 22  type Line 22  type
22      { Public declarations }      { Public declarations }
23      FPage: Boolean;      FPage: Boolean;
24      user_number: integer;      user_number: integer;
25      Thumbnail: Boolean;      FThumbnail: Boolean;
26      Serial: integer;      Serial: integer;
27      property DM: TDataModule3 read GetDM;      property DM: TDataModule3 read GetDM;
28    end;    end;
# Line 43  end; Line 43  end;
43  procedure TIWUserSession.IWUserSessionBaseCreate(Sender: TObject);  procedure TIWUserSession.IWUserSessionBaseCreate(Sender: TObject);
44  begin  begin
45    FPage := true;    FPage := true;
46    Thumbnail:=true;    FThumbnail:=true;
47  end;  end;
48    
49  procedure TIWUserSession.IWUserSessionBaseDestroy(Sender: TObject);  procedure TIWUserSession.IWUserSessionBaseDestroy(Sender: TObject);

Legend:
Removed from v.7  
changed lines
  Added in v.8

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26