![]() |
Query als Funktionsparameter
Hallo Allerseits,
Ich stehe hier vor ein kleineres Problem und benötige etwas Schützenhilfe: Auf einer Form habe ich ein QueryControl gesetzt. Ich habe dann eine Unit erstellt, die im Wesentlichen alle Funktionen und Prozeduren zu Datenbank-Operationen aufnehmen soll. Jetzt ist es so, dass die Unit die ursprüngliche Query nicht kennt. Ich habe versucht, die Standardunit im Abschnitt Uses einzubinden, leider ohne Erfolg. Ich überlege mir zwei Alternativen: 1. Ich übergebe einer Funktion, die in der Datenbank-Unit definiert ist, ein Objekt der Klasse TADOquery. Die kann ich aber nicht in der Funktion nicht nutzen, da das Objekt nicht die Query-spezifischen Eigenschaften kenn. 2. Ich "veröffentliche" das QueryObjekt Anwendungsweit über alle Units und Formen. Ich weiss, das ich die Datenbank-Controls weiterverwenden kann, aber leider fehlt mir der Weg dazu. :oops: Danke im Voraus |
AW: Query als Funktionsparameter
Zitat:
Zitat:
Zitat:
Was tun dieses Funktionen und Prozeduren im einzelnen. Zitat:
Ob das Konzept sinnvoll ist, ist eine andere Frage. Zitat:
Zitat:
Zitat:
Zitat:
Ohne zu wissen was du eigentlich erreichen willst und mehr Details wid dir kaum jemand helfen können. |
AW: Query als Funktionsparameter
Na ist doch klar was er gemacht hat:
In der Unit1 (form-unit) befindet sich die ADOQuery In der Unit2 sind alle DB-Funktionen untergebracht. und in Unit1 steht
Delphi-Quellcode:
und in Unit2:
Uses Unit2
... Unit2.MyFunction(prm1); ....
Delphi-Quellcode:
Und das geht nicht *schnief*
Uses Unit1
... Unit1.AdoQuery1.... ... Zitat:
So ist das!! Gruß K-H |
AW: Query als Funktionsparameter
Hallo p80286 (K-H)
mit der vorgenannten
Delphi-Quellcode:
ging es leider nicht so gut, jedoch habe ich noch den Formularnamen <Form1> angeben, da diese unit.ADOQuery3 die ADOQuery als control beinhaltete
Delphi-Quellcode:
So ging es. Es ging auch nur mit der <Form1>
unit.form1.ADOQuery3
Delphi-Quellcode:
Das mit dem Datenmodul muss ich mir noch einmal durchlesen. Mit der Delphi-Programmiererei habe ich halt einige Jahre pausieren müssen.form1.ADOQuery3 Jedenfalls vielen Dank !!! |
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:58 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz