Redéfinir le comportement du pagedown dans reportbuilder

0/5 (4 avis)

Vue 2 950 fois - Téléchargée 191 fois

Description

Redéfinir le comportement du pagedown et pageup dans reportbuilder. Refinir certaines fonction de la classe TppPreview.

Source / Exemple :


unit uMyPreview;

interface

uses
  ppPreview,Classes,Windows,ppTypes,ppComm,ppViewr;

type
  TMyPreviewPlugin = class(TppPreview)
    public
      procedure BeforePreview; override;
      procedure KeyDown(var Key: Word; Shift: TShiftState); override;
  end;

implementation

uses
  Graphics;

//Inherited example
procedure TMyPreviewPlugin.BeforePreview;
begin
  inherited BeforePreview;
end;

procedure TMyPreviewPlugin.KeyDown(var Key: Word; Shift: TShiftState);
begin
  case Key of
    VK_PRIOR: Viewer.PriorPage;
    VK_NEXT: Viewer.NextPage;
    VK_HOME: Viewer.FirstPage;
    VK_END: Viewer.LastPage;
    VK_UP: Viewer.Scroll(dtUp);
    VK_DOWN: Viewer.Scroll(dtDown);
    VK_LEFT: Viewer.Scroll(dtLeft);
    VK_RIGHT: Viewer.Scroll(dtRight);
    VK_ESCAPE: PerformPreviewAction(paClose);
  end
end;

initialization
  TppPreviewPlugIn.Register(TMyPreviewPlugin);

finalization
  TppPreviewPlugIn.UnRegister(TMyPreviewPlugin);

end.

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
6
Date d'inscription
mercredi 5 avril 2006
Statut
Membre
Dernière intervention
14 octobre 2008

Certainement mais tant qu'il peut être utile à quelque personnes pourquoi pas le partager.
Messages postés
3793
Date d'inscription
samedi 22 décembre 2007
Statut
Membre
Dernière intervention
3 juin 2016
9
Bon ben il est inutile pour ... hmm ... 45% de la population de DelphiFr.

Cordialement, Bacterius !
Messages postés
6
Date d'inscription
mercredi 5 avril 2006
Statut
Membre
Dernière intervention
14 octobre 2008

ReportBuilder doit être installé si l'on veut utiliser ce code. Les unités PreviewPlugin soit donc compris dans ReportBuilder. Ce code est innutile pour le personnes n'ayant pas ReportBuilder
Messages postés
3793
Date d'inscription
samedi 22 décembre 2007
Statut
Membre
Dernière intervention
3 juin 2016
9
Un truc très interessant serait de founir dans le zip les unités PreviewPlugin.
De sorte que les gens n'aillent pas la chercher.
C'est comme pour les composants personnalisés (bon ok j'arrête).

Cordialement, Bacterius !

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (dwmx5)