Re: [Pharo-users] Magritte extension

[Asbath Sama biyalou via Pharo-users]

--- Begin Message ---

On 17/03/2017 12:23, Mariano Martinez Peck wrote:
> Hi,
>
> Before a longer answer, what is TBSMagritteReport ? Is it yours or is
> it some magritte extension for Bootstrap?
It is a magritte extension for Bootstrap. Or which one are you using?
>
> Thanks,
>
> On Fri, Mar 17, 2017 at 3:54 AM, Asbath Sama biyalou
> <asamabiya...@yahoo.com <mailto:asamabiya...@yahoo.com>> wrote:
>
>     Hello.
>
>     I am using Magritte to generate reports for a pharo class. I want to
>     customize generated components in order to have a better design.
>
>     My class is Match
>
>     Object subclass: #Match
>         instanceVariableNames: 'date_match hour_match status actions
>     stadium
>     comments teams goals1 goals2 competition'
>         classVariableNames: ''
>         category: MyProject-Entity'
>
>
>     Descriptions for some variables.
>
>     Stadium is also a Class.
>
>     Match>>descriptionStadium
>     <magritteDescription>
>     ^ MASingleOptionDescription new
>         label: 'Stadium';
>         priority: 305;
>         accessor: #stadium;
>         options: Team allStadiumsName;
>         componentClass: TBSMagritteSelectListComponent;
>         beRequired;
>         yourself
>
>
>     Match>>descriptionTeams
>     <magritteDescription>
>     ^ MAMultipleOptionDescription new
>         label: 'Teams';
>         priority: 805;
>         accessor: #teams;
>         options: Team allTeamsName;
>         componentClass: MAMultiselectListComponent;
>         yourself
>
>
>     The generated component in the form is not very pretty. I want to have
>     multiple checkbox.
>
>
>     Match>>descriptionStatus
>     <magritteDescription>
>     ^ MASingleOptionDescription new
>         label: 'Status';
>         priority: 505;
>         accessor: #status;
>         options: #('Pas en cours' 'En Cours' 'Mi-temps' 'Terminé');
>         componentClass: TBSMagritteSelectListComponent;
>         yourself
>
>
>     For the report I use the class SEMatchReport
>
>     TBSMagritteReport subclass: #SEMatchReport
>         instanceVariableNames: 'report'
>         classVariableNames: ''
>         category: 'MyProject-Components'
>
>
>     SEMatchReport class>>from
>         | report matchs commandColumn |
>         matchs := Match selectAll.
>         report:= self rows: matchs description: (self
>             filteredDescriptionsFrom: matchs anyOne).
>
>         commandColumn := MACommandColumn new.
>
>         (SEMatchReport new session isSimpleAdmin)
>         ifTrue: [
>             report addColumn: (commandColumn
>                 addCommandOn: report selector: #editMatch: text:
>     'Modifier';
>     yourself;
>                 addCommandOn: report selector: #addAction: text: 'Ajouter
>     une action'; yourself ) ]
>         ifFalse: [
>             report addColumn: (commandColumn
>                 addCommandOn: report selector: #editMatch: text:
>     'Modifier';
>     yourself;
>                 addCommandOn: report selector: #deleteMatch: text:
>     'Supprimer'; yourself;
>                 addCommandOn: report selector: #addAction: text: 'Ajouter
>     une action'; yourself ) ].
>
>         ^ report
>
>     I want to put some bootstrapp icons near commandColumn actions. like
>     pencil or delete on 'Supprimer'.
>
>
>     SEMatchReport class>>filteredDescriptionsFrom: aMatch
>         ^ aMatch magritteDescription select: [ :each | #(date_match
>     hour_match stadium goals1 goals2 teams)
>             includes: each accessor selector ]
>
>     I notice that on the generated report on column stadium we have
>     aStadium. We don't have the value (the name). I don't know how to
>     mention it in the filtered descriptions.
>
>     Change the color of lines in the report, etc. All that things.
>
>     Sorry for the bad english.
>
>     Thanks.
>
>     Asbath
>
>
>
>
> -- 
> Mariano
> http://marianopeck.wordpress.com
Asbath

--- End Message ---