IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Rave Discussion :

Une autre astuce ([FAQ]) : Comment avoir une bande en bas de région ?


Sujet :

Rave

  1. #1
    Rédacteur/Modérateur

    Avatar de SergioMaster
    Homme Profil pro
    Développeur informatique retraité
    Inscrit en
    Janvier 2007
    Messages
    15 029
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 15 029
    Points : 40 927
    Points
    40 927
    Billets dans le blog
    62
    Par défaut Une autre astuce ([FAQ]) : Comment avoir une bande en bas de région ?
    Comment avoir une bande en bas de région ?

    je cherchais un équivalent de AligntoBottom pour une bande , ce qui hélas n'existe pas pour les bandes Rave (du moins dans les versions <=7.7)

    la bande étant de type : BodyFooter

    Code DELPHI : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
     
    procedure TForm.RvProject1AfterOpen(Sender: TObject);
    var MyPage : TRavePage;
        MyRegion : TRaveRegion;
        MyBand : TraveBand;
    begin
    // Bande Total général en Bas de Page
    myRegion:=rvproject1.ProjMan.FindRaveComponent('Region1', myPage) AS TRaveRegion; // obtenir la région
    myBand:=rvproject1.ProjMan.FindRaveComponent('BandTotal', myPage) AS TRaveBand; // obtenir la bande
    myBand.positionmode:=pmAbsolute;
    myBand.PositionValue:=MyRegion.Height-MyBand.Height;

    pour l'instant , tout les essais (données test) fait sont concluants
    MVP Embarcadero
    Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
    SGBD : Firebird 2.5, 3, SQLite
    générateurs États : FastReport, Rave, QuickReport
    OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd

  2. #2
    Rédacteur/Modérateur

    Avatar de SergioMaster
    Homme Profil pro
    Développeur informatique retraité
    Inscrit en
    Janvier 2007
    Messages
    15 029
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 67
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : Développeur informatique retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Janvier 2007
    Messages : 15 029
    Points : 40 927
    Points
    40 927
    Billets dans le blog
    62
    Par défaut
    et bien non , pas tous les essais hélas ! je suis tomber sur un cas ou cela ne fonctionnait pas .

    J'avais une édition de Facture a faire et voulais avoir les totalisations (TVA,MONTANT TTC etc.. en bas de page) seulement avant cette bande j'avais une bande de commentaires (évidemment de taille variable ... un mémo).

    Après avoir beaucoup pataugé , voici comment je m'en suis sorti : en utilisant un script dans l'évènement OnAfterprint de la bande Mémo

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    if Self.Top+Self.Height+piedfacture.Height>region1.Height then
    else
     piedfacture.positionmode:=pmAbsolute;
     piedFacture.PositionValue:=Region1.Height-Piedfacture.height;  
    end if;
    Peu de différence avec le code Delphi de mon premier code si ce n'est qu'il a tout de même fallu également tester aussi si la bande 'PieddeFacture' tenait dans la page (première ligne de code)
    Après contrôle sur plus de 400 factures de taille variées , tout est ok
    MVP Embarcadero
    Delphi installés : D3,D7,D2010,XE4,XE7,D10 (Rio, Sidney), D11 (Alexandria), D12 (Athènes)
    SGBD : Firebird 2.5, 3, SQLite
    générateurs États : FastReport, Rave, QuickReport
    OS : Window Vista, Windows 10, Windows 11, Ubuntu, Androïd

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 0
    Dernier message: 06/12/2010, 11h39
  2. Réponses: 9
    Dernier message: 24/03/2009, 07h39
  3. Réponses: 5
    Dernier message: 13/03/2009, 00h14
  4. Réponses: 4
    Dernier message: 02/04/2008, 15h19
  5. Réponses: 10
    Dernier message: 22/08/2007, 18h07

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo