AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein GUI-Design mit VCL / FireMonkey / Common Controls Delphi Fastreport Scripttext - Wie wird der ausgeführt?
Thema durchsuchen
Ansicht
Themen-Optionen

Fastreport Scripttext - Wie wird der ausgeführt?

Ein Thema von smudo · begonnen am 27. Sep 2005 · letzter Beitrag vom 28. Sep 2005
Antwort Antwort
Seite 1 von 2  1 2      
smudo

Registriert seit: 6. Sep 2005
Ort: Cottbus
362 Beiträge
 
Delphi XE2 Professional
 
#1

Fastreport Scripttext - Wie wird der ausgeführt?

  Alt 27. Sep 2005, 13:11
Hallo ,

ein Fastreport (TfrxReport) soll aufgerufen und dabei ein Script ausgeführt werden.
Dafür habe ich die Eigenschaft ScriptLanguage auf PascalScript gesetzt und
in ScriptText nichts weiter als
Delphi-Quellcode:
Begin
  Showmessage('Hello World');
end;
eingegeben.

Wie bekomme ich dieses Script jetzt zum laufen?
  Mit Zitat antworten Zitat
Benutzerbild von Marcel Gascoyne
Marcel Gascoyne

Registriert seit: 18. Nov 2003
Ort: Uetersen
271 Beiträge
 
Delphi 2005 Architect
 
#2

Re: Fastreport Scripttext - Wie wird der ausgeführt?

  Alt 27. Sep 2005, 13:47
Du musst einfach den Report mit der Methode ShowReport anzeigen lassen:

frxReport1.ShowReport; Wenn Dein Script sich im Rumpf des Reports befindet wird es automatisch ausgeführt.

Gruß,
Marcel
Marcel Gascoyne
Der Fehler sitzt immer vor der Tastatur
  Mit Zitat antworten Zitat
smudo

Registriert seit: 6. Sep 2005
Ort: Cottbus
362 Beiträge
 
Delphi XE2 Professional
 
#3

Re: Fastreport Scripttext - Wie wird der ausgeführt?

  Alt 27. Sep 2005, 14:00
Danke Marcel,

du hast Recht. So einfach ist es.
Nur darf man nicht nach Erzeugen des Scriptes LoadFromFile aufrufen,
d.h. wenn ich im OI zwar den ScriptText fest vorgegeben habe,
aber erst zur Laufzeit die Datei lade, wird das Script überschrieben.

Soweit ist es klar.
Aber ohne einen weiteren Thread dafür aufmachen zu müssen: Wie kann ich denn nun den Report per Script ansprechen,
z.B. einen Text schreiben oder eine Grafik zeichnen?

Ich nehme auch gern einen Ratschlag an, wo ich etwas nachlesen könnte.
  Mit Zitat antworten Zitat
franktron

Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#4

Re: Fastreport Scripttext - Wie wird der ausgeführt?

  Alt 27. Sep 2005, 14:04
Kannste mal erklären was das für einen sinn haben soll.
Du kannst doch alles im Designer machen oder im Delphi Code warum der gerade im Report Script
Frank
Tux sein Lieblingsquellcode
While anzfische<TuxSatt do begin
Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;
  Mit Zitat antworten Zitat
smudo

Registriert seit: 6. Sep 2005
Ort: Cottbus
362 Beiträge
 
Delphi XE2 Professional
 
#5

Re: Fastreport Scripttext - Wie wird der ausgeführt?

  Alt 27. Sep 2005, 14:09
Das ist eher mal ein Ausprobieren.
Ich möchte abhängig von der Seitenzahl Markierungen auf den Seiten ausgeben.
Und das auf jedem Report, egal welche Reportdatei.
Ich dachte, die Script-Komponente wäre da ein guter Ansatz.
  Mit Zitat antworten Zitat
franktron

Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#6

Re: Fastreport Scripttext - Wie wird der ausgeführt?

  Alt 27. Sep 2005, 14:16
Also ich habe auch markierungen auf der Seite hab diese aber in den Delphicode gepackt somit kann ich jeden Reort laden ohne das ich die Scriptdaten ändern muss
Frank
Tux sein Lieblingsquellcode
While anzfische<TuxSatt do begin
Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;
  Mit Zitat antworten Zitat
smudo

Registriert seit: 6. Sep 2005
Ort: Cottbus
362 Beiträge
 
Delphi XE2 Professional
 
#7

Re: Fastreport Scripttext - Wie wird der ausgeführt?

  Alt 27. Sep 2005, 14:27
Mmh, bin ich mit dem Script wohl doch auf dem falschen Weg
Danke für den Hinweis, da werd ich gar nicht weiter viel Zeit verschwenden.

Aber wie kann ich denn aus dem Delphi-Code Markierungen auf eine Reportseite bringen,
noch dazu abhängig von der Seitenzahl
  Mit Zitat antworten Zitat
franktron

Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#8

Re: Fastreport Scripttext - Wie wird der ausgeführt?

  Alt 27. Sep 2005, 15:16
Also ich hab zum zeichnen ein TfrxPictureView genommen und dann darauf gezeichnet und die Seitenzahl habe ich momentan noch mit einem Zähler gemacht hab leider noch keine andere lösung gefunden.
Frank
Tux sein Lieblingsquellcode
While anzfische<TuxSatt do begin
Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;
  Mit Zitat antworten Zitat
smudo

Registriert seit: 6. Sep 2005
Ort: Cottbus
362 Beiträge
 
Delphi XE2 Professional
 
#9

Re: Fastreport Scripttext - Wie wird der ausgeführt?

  Alt 27. Sep 2005, 15:33
Zitat von franktron:
Also ich hab zum zeichnen ein TfrxPictureView genommen
Seh ich schlecht oder ist diese Komponente in meinem Package nicht dabei?
Zitat von franktron:
und die Seitenzahl habe ich momentan noch mit einem Zähler gemacht
Wieso funktioniert das eigentlich nicht mit PagesCount?
  Mit Zitat antworten Zitat
franktron

Registriert seit: 11. Nov 2003
Ort: Oldenburg
1.446 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#10

Re: Fastreport Scripttext - Wie wird der ausgeführt?

  Alt 27. Sep 2005, 15:43
ist im Designer drin
Frank
Tux sein Lieblingsquellcode
While anzfische<TuxSatt do begin
Fisch:=TFisch.Create; Tux.EssenFisch(Fisch); Fisch.Free;inc(anzfische); end;
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 01:01 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