[Newbies] Drag and dropped jpg (playing cards) - how to put in the "new morph" menu and create a PlayingCard class?

[mstram]

Hi Edgar,

Thx, I found Freecell SqueakPoker (the start of a poker game) on
squeaksource, both will be helpful, as will all the rest of tips in this
thread.


Edgar J. De Cleene wrote:
> 
> 
> Also in my FunSqueak3.10alpha.7 you have the old FreCel still working.
> 
> MisDibujos elegirImagen!
> 
> 
> "-- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- "!
> 
> MisDibujos class
> 	instanceVariableNames: 'current'!
> 
> !MisDibujos class methodsFor: 'as yet unclassified' stamp: 'edc 1/19/2006
> 11:30'!
> current
> ^current! !
> 
> !MisDibujos class methodsFor: 'as yet unclassified' stamp: 'edc 1/19/2006
> 11:31'!
> current: anObject
> current := anObject! !
> 
> !MisDibujos class methodsFor: 'as yet unclassified' stamp: 'edc 1/24/2006
> 10:06'!
> elegirImagen
> 	"could translate to chooseImage ,Lets the user choose folder with
> pictures  .
> 	Hay que hacer MisDibujos elegirImagen"
> 	| oldFolder newFolder listaArchivos misFotos |
> 	misFotos := self new.
> 	oldFolder := FileDirectory default.
> 	newFolder := FileList2 modalFolderSelector.
> 	FileDirectory setDefaultDirectory: newFolder pathName.
> 	
> 	listaArchivos := FileDirectory default fileNamesMatching: '*.jpg'.
> 	misFotos at: #Yellow put: (Form fromFileNamed: 'Yellow.gif').
> 	1
> 		to: 5
> 		do: [:i | 
> 			
> 
> misFotos at:  i  put:(  RWBinaryOrTextStream with: (StandardFileStream
> readOnlyFileNamed: (listaArchivos at: i))contents) .
> 
> 			].
> 	FileDirectory setDefaultDirectory: oldFolder pathName.
> 	
> 	self current: misFotos
> 	
> ! !
> _______________________________________________
> Beginners mailing list
> Beginners at lists.squeakfoundation.org
> http://lists.squeakfoundation.org/mailman/listinfo/beginners
> 
> 

-- 
View this message in context: http://n4.nabble.com/Drag-and-dropped-jpg-playing-cards-how-to-put-in-the-new-morph-menu-and-create-a-PlayingCard-class-tp276728p277100.html
Sent from the Squeak - Beginners mailing list archive at Nabble.com.