Autor |
Beitrag |
Hänsel
Beiträge: 144
|
Verfasst: So 10.09.17 10:37
Hallo,
Ich habe folgendes Problem, wer kann mir da etwas weiter helfen.
Ich habe ein Vereinsprogramm und möchte an verschiedenen Stellen die gleiche Rechenoperation durchführen. Es wäre ja nicht sinnvoll an jeder dieser Stellen das gleiche noch einmal zu schreiben. Ich möchte dazu eine Prozedur hierfür anlegen. Wie sieht diese aus bzw. wo muss ich diese deklarieren und wie kann ich diese dann aus dem Programm heraus aufrufen. Die Prozedur sollte "Prozedure BeitragRechnung" heißen.
Im Voraus besten Dank
Hänsel
|
|
galagher
Beiträge: 2510
Erhaltene Danke: 44
Windows 10 Home
Delphi 10.1 Starter, Lazarus 2.0.6
|
Verfasst: So 10.09.17 12:00
Hänsel hat folgendes geschrieben : | Wie sieht diese aus bzw. wo muss ich diese deklarieren und wie kann ich diese dann aus dem Programm heraus aufrufen. Die Prozedur sollte "Prozedure BeitragRechnung" heißen. |
Hallo!
Nun ja, du erstellst zunächst einmal die Prozedur und schreibst deine Berechnungen hinein, zB:
Delphi-Quelltext 1: 2: 3: 4:
| procedure TForm1.BeitragRechnung(); begin end; |
Wenn du aber ein Ergebnis benötist, musst du das Ganze als Funktion realisieren:
Delphi-Quelltext 1: 2: 3: 4: 5:
| function TForm1.BeitragRechnung(): Integer; begin Result := end; |
Der Aufruf erfolgt dann überall dort, wo die Berechnungen benötigt werden!
_________________ gedunstig war's - und fahle wornen zerschellten karsig im gestrock. oh graus, es gloomt der jabberwock - und die graisligen gulpen nurmen!
|
|
Hänsel
Beiträge: 144
|
Verfasst: So 10.09.17 14:56
Ich habe eine Programmschleife, wo während des Durchlaufes entschieden wird (abhängig von den Einstellungen im Programm) ob die Procedure BeitragRechnung1 oder Procedure BeitragRechnung2 zur Anwendung kommt. Wie rufe ich die entsprechende Procedure auf?
|
|
galagher
Beiträge: 2510
Erhaltene Danke: 44
Windows 10 Home
Delphi 10.1 Starter, Lazarus 2.0.6
|
Verfasst: So 10.09.17 15:19
Hänsel hat folgendes geschrieben : | Ich habe eine Programmschleife, wo während des Durchlaufes entschieden wird (abhängig von den Einstellungen im Programm) ob die Procedure BeitragRechnung1 oder Procedure BeitragRechnung2 zur Anwendung kommt. Wie rufe ich die entsprechende Procedure auf? |
Wenn das während des Durchlaufes entschieden wird, dann rufe die entsprechende Prozedur eben je nach Entscheidung auf (= es steht also fest, welche Prozedur aufgerufen werden soll). Irgendein Kriterium, welche Prozedur nun drankommt, muss es ja geben.
_________________ gedunstig war's - und fahle wornen zerschellten karsig im gestrock. oh graus, es gloomt der jabberwock - und die graisligen gulpen nurmen!
|
|
Hänsel
Beiträge: 144
|
Verfasst: So 10.09.17 15:36
Die Entscheidung erfolgt :
IF Person > 10 then
Begin
wie rufe ich jetzt die Berechnung1 auf?
End
else
Begin
wie rufe ich jetzt die Berechnung2 auf?
End
|
|
galagher
Beiträge: 2510
Erhaltene Danke: 44
Windows 10 Home
Delphi 10.1 Starter, Lazarus 2.0.6
|
Verfasst: So 10.09.17 16:47
_________________ gedunstig war's - und fahle wornen zerschellten karsig im gestrock. oh graus, es gloomt der jabberwock - und die graisligen gulpen nurmen!
|
|
Hänsel
Beiträge: 144
|
Verfasst: So 10.09.17 17:14
Ich benötige dazu keine Parameter. Ich möchte nur über IF-Anwendung eines dieser Prozeduren starten .Da hätte ich gern die Befehlszeile hierzu. Sorry, da habe ich mich sicher schlecht ausgedrückt.
|
|
jaenicke
Beiträge: 19272
Erhaltene Danke: 1740
W11 x64 (Chrome, Edge)
Delphi 11 Pro, Oxygene, C# (VS 2022), JS/HTML, Java (NB), PHP, Lazarus
|
Verfasst: So 10.09.17 17:16
Genau das hat dir galagher doch geschrieben als Quelltext.
|
|
galagher
Beiträge: 2510
Erhaltene Danke: 44
Windows 10 Home
Delphi 10.1 Starter, Lazarus 2.0.6
|
Verfasst: So 10.09.17 17:17
Hänsel hat folgendes geschrieben : | Ich möchte nur über IF-Anwendung eines dieser Prozeduren starten .Da hätte ich gern die Befehlszeile hierzu. |
Die Befehlszeile ist der Name der Prozedur! Schreib ihn hin und das ist es auch schon.
//Edit:
@ jaenicke: Unsere Beiträge haben sich "überschnitten"!
_________________ gedunstig war's - und fahle wornen zerschellten karsig im gestrock. oh graus, es gloomt der jabberwock - und die graisligen gulpen nurmen!
|
|
Hänsel
Beiträge: 144
|
Verfasst: So 10.09.17 17:49
Danke für Eure Hinweise!
Hänsel
|
|