ApplicationModel.st
changeset 464 25e6380399c6
parent 438 c3d379e83de7
child 472 40eaf3d339c9
equal deleted inserted replaced
463:75a8e06ef324 464:25e6380399c6
   419 
   419 
   420 openDialogInterface:anInterfaceSymbol
   420 openDialogInterface:anInterfaceSymbol
   421     "create an instance of the application and open a view as
   421     "create an instance of the application and open a view as
   422      specified by anInterfaceSymbol."
   422      specified by anInterfaceSymbol."
   423 
   423 
   424     ^ self new openDialogInterface:anInterfaceSymbol
   424     ^ self openDialogInterface:anInterfaceSymbol withBindings:nil
       
   425 
       
   426     "Modified: 5.9.1995 / 17:54:50 / claus"
       
   427     "Created: 14.2.1997 / 20:33:10 / cg"
       
   428     "Modified: 28.2.1997 / 14:07:36 / cg"
       
   429 !
       
   430 
       
   431 openDialogInterface:anInterfaceSymbol withBindings:bindings
       
   432     "create an instance of the application and open a view as
       
   433      specified by anInterfaceSymbol."
       
   434 
       
   435     ^ self new openDialogInterface:anInterfaceSymbol withBindings:bindings
   425 
   436 
   426     "Modified: 5.9.1995 / 17:54:50 / claus"
   437     "Modified: 5.9.1995 / 17:54:50 / claus"
   427     "Modified: 13.1.1997 / 20:55:02 / cg"
   438     "Modified: 13.1.1997 / 20:55:02 / cg"
   428     "Created: 14.2.1997 / 20:33:10 / cg"
   439     "Created: 28.2.1997 / 14:07:24 / cg"
   429 !
   440 !
   430 
   441 
   431 openInterface:anInterfaceSymbol
   442 openInterface:anInterfaceSymbol
   432     "create an instance of the application and open a view as
   443     "create an instance of the application and open a view as
   433      specified by anInterfaceSymbol."
   444      specified by anInterfaceSymbol."
   963 !
   974 !
   964 
   975 
   965 openDialogInterface:aSelector
   976 openDialogInterface:aSelector
   966     "open a dialog"
   977     "open a dialog"
   967 
   978 
   968     ^ SimpleDialog new openFor:self interface:aSelector
   979     ^ self openDialogInterface:aSelector withBindings:nil
       
   980 
       
   981     "Modified: 28.2.1997 / 14:08:01 / cg"
       
   982 !
       
   983 
       
   984 openDialogInterface:aSelector withBindings:bindings
       
   985     "open a dialog"
       
   986 
       
   987     ^ SimpleDialog new openFor:self interface:aSelector withBindings:bindings
       
   988 
       
   989     "Created: 28.2.1997 / 14:07:45 / cg"
   969 !
   990 !
   970 
   991 
   971 openWindow
   992 openWindow
   972     "open the window - assumes that the builder has already setup
   993     "open the window - assumes that the builder has already setup
   973      the interface."
   994      the interface."
  1253 ! !
  1274 ! !
  1254 
  1275 
  1255 !ApplicationModel class methodsFor:'documentation'!
  1276 !ApplicationModel class methodsFor:'documentation'!
  1256 
  1277 
  1257 version
  1278 version
  1258     ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.43 1997-02-18 11:02:04 ca Exp $'
  1279     ^ '$Header: /cvs/stx/stx/libview2/ApplicationModel.st,v 1.44 1997-02-28 13:24:07 cg Exp $'
  1259 ! !
  1280 ! !
  1260 ApplicationModel initialize!
  1281 ApplicationModel initialize!