Suivez et participez au développement du nouvel OpenCellar : PLOC.co
Page d'accueil
 
Français  English  
Open Cellar Home Edition - 1.2 - Le logiciel gratuit pour gérér efficacement votre cave à vins sous Windows. Open Cellar Mobile Edition - Beta 2 - La gestion de cave à vins a enfin sa solution Mobile sur Pocket PC. Open Cellar Cross Platform - Beta 1 - La gestion gratuite de vins disponible sous Mac OSX et Linux. Mon Open Cellar Les forums d'Open Cellar Place des vins
Rechercher : Bienvenue (se connecter - créer un compte)
Facebook


Nuage de tags
Script
31/12/2007
Répondre
Script
sarpro
8 posts
Attention je me lance dans les scripts mais pour un non informaticien c'est pas evident...même après deux verre ou trois..;-).
Je souhaite adapter le script suivant et intégrer la cellule référence et boire de ..à...
Qui peux maider?

Merci d'avance

App.Animate(AnimationType.Work, true);
App.SetCursor(true);


//
// Modifiez ici le titre du report
//
string reportName = "Liste des vins WA";

//
// Creation entete report
//
ReportTable rt = new ReportTable(reportName);

//
// Région
//
ReportColumn rcArea = rt.NewColumn("Région");
rcArea.Size = 80;

//
// Appellation
//
ReportColumn rcApp = rt.NewColumn("Appellation");
rcApp.Size = 120;

//
// Nom
//
ReportColumn rcName = rt.NewColumn("Nom");
rcName.Size = 180;

//
// Classement
//
ReportColumn rcCl = rt.NewColumn("Classement");
rcCl.Size = 100;

//
// Couleur
//
ReportColumn rcColor = rt.NewColumn("Couleur");
rcColor.Size = 75;

//
// Année
//
ReportColumn rcYear = rt.NewColumn("Année");
rcYear.Size = 40;
rcYear.ContentAlignment = ReportContentAlignment.Right;
rcYear.DataType = ReportColumnType.Numeric;

//
// Nombre bouteilles
//
ReportColumn rcBottles = rt.NewColumn("Btles");
rcBottles.Size = 40;
rcBottles.ContentAlignment = ReportContentAlignment.Right;
rcBottles.DataType = ReportColumnType.Numeric;

//
// Format
//
ReportColumn rcFormat = rt.NewColumn("Format");
rcFormat.Size = 70;

//
// A boire de
//
ReportColumn rc????? = rt.NewColumn("A boire de");
rcFormat.Size = 70;

//
// A boire à
//
ReportColumn rc????? = rt.NewColumn("à");
rcFormat.Size = 70;

//
// Référence
//
ReportColumn rc????? = rt.NewColumn("Référence");
rcFormat.Size = 70;

//
// Alimentation de la source
//
ObjectCollection wines = App.ActiveCellar.GetCollection((ushort)ObjectType.Wine);

for (int i = 0; i < wines.Count; i++)
{
Wine wine = (Wine)wines[i];
ReportRow row = rt.NewRow();

row[0] = wine.Area.Name;
row[1] = wine.Appellation.Name;
row[2] = wine.Name;
row[3] = wine.Classification.Name;
row[4] = "Champagne";

if(wine.WineColor == ColorType.Red)
{
row[4] = "Rouge";
}
else if(wine.WineColor == ColorType.White)
{
row[4] = "Blanc";
}
else if(wine.WineColor == ColorType.Rosy)
{
row[4] = "Rosé";
}
else if(wine.WineColor == ColorType.Yellow)
{
row[4] = "Champagne";
}
else if(wine.WineColor == ColorType.LiqueurLike)
{
row[4] = "Liquoreux";
}
else if(wine.WineColor == ColorType.Misc)
{
row[4] = "Autre";
}

if(wine.Year != 0)
{
row[5] = wine.Year.ToString();
}

//
// Gestion manuelle
//
if(wine.ManualManagement)
{
row[6] = wine.Bottles.ToString();
}
else
{
row[6] = wine.RackItems.Count.ToString();
}
row[7] = wine.BottleType.Name;
}

row[8] = wine.??boire de
row[9] = wine.??boire à
row[10] = wine.??référence


//
// Tri des elements
//
rt.Sort("0-0;1-0;4-0;5-1");

//
// Génération
//
System.Collections.ArrayList list = new System.Collections.ArrayList();
list.Add(rt);

IReport report = App.ReportEngine.GetSystemReport(PredefinedReport.Grid);

string destFileName = App.Path + "Cache\\UserWinesGrid.pdf";
bool success = false;
try
{
report.Create(list, destFileName);
success = true;
}
catch(Exception ex)
{
MessageBox.Show("Erreur (1)");
}

//
// Affichage du report
//
if(success)
{
IShellWindow shellWindow = (IShellWindow)App.GetWindow(WindowType.Shell, null);
if(shellWindow != null)
{
shellWindow.Start(destFileName);
}
}

App.SetCursor(false);
App.StopAnimate();
 

31/12/2007
Répondre
Re : Script
AdministrateurVoir son blog
3099 posts
Vous etiez pas loin ;-)
La nouvelle du site apportera une aide dédiée au developpement sous OC (patience :-))



Matthieu
 

31/12/2007
Répondre
Re : Script
sarpro
8 posts
excélent merci beaucoup. Passez un bon réveillon. Denis
 

© 2006-2014 Matthieu DUCROCQ Blog officiel d'Open Cellar - Tous droits réservés - Dernière mise à jour : janvier 2014 | twitter | facebook