Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Ein neues Ereigniss hinzufügen (Fastreport) (https://www.delphipraxis.net/70664-ein-neues-ereigniss-hinzufuegen-fastreport.html)

Karstadt 2. Jun 2006 12:43


Ein neues Ereigniss hinzufügen (Fastreport)
 
Hallo.

Wenn ich einen Objekt habe Von TFastreport und nun will ich diesen Objekt ein Ereigniss hinzufügen wie mache ich das?

Ereigniss onMouseMove;

.....

Neueseobjekt := TFastreport.create;

Dann? :( :?:

Union 2. Jun 2006 16:06

Re: Ein neues Ereigniss hinzufügen (Fastreport)
 
Hallo,

ein Beispiel (von vielen) ist in der sehr empfehlenswerten Dokumentation zu lesen:
Zitat:

Any report can become interactive. To perform this, you only need to create a
TfrxReport.OnClickObject event handler. Here is a code example of this handler below:
Delphi-Quellcode:
procedure TForm1.frxReport1ClickObject(Page: TfrxPage; View: TfrxView;
Button: TMouseButton; Shift: TShiftState; var Modified: Boolean);
begin
   if View.Name = 'Memo1' then
      ShowMessage('Memo1 contents:' + #13#10 + TfrxMemoView(View).Text);
   if View.Name = 'Memo2' then
   begin
      TfrxMemoView(View).Text := InputBox('Edit', 'Edit Memo2 text:',
      TfrxMemoView(View).Text);
      Modified := True;
  end;
end;
Das Gleiche gilt natürlich auch für den Event TFrxReport.OnMouseOverObject.


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:17 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz