Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi TSqlMonitor zur Laufezeit erstellen (https://www.delphipraxis.net/194618-tsqlmonitor-zur-laufezeit-erstellen.html)

DelTurbo 13. Dez 2017 11:25

Datenbank: MySQL • Version: 5.x • Zugriff über: UniDac

TSqlMonitor zur Laufezeit erstellen
 
Hallo,
ich arbeite mit UniDac. Wenn ich den TSqlMonitor auf eine Form legen, dann läuft der einwandfrei. Nun habe ich leider in diesem Projekt keine Form. Wie kann ich den TMySqlMonitor zur Laufzeit erstellen?

So wie ich das mache "sagt" das ding kein gar nichts.

Vielen Dank im Voraus

Delphi-Quellcode:
    if ( MySqlDebug ) then begin
      MySQLMonitor:=TUniSQLMonitor.Create(nil);
      MySQLMonitor.Name:='MySqlDebugMonitor';
      MySQLMonitor.DBMonitorOptions.Host:=ReadIniFileString('MySql','SqlMonitorIP','');
      MySQLMonitor.DBMonitorOptions.Port:=ReadIniFileInteger('MySql','SqlMonitor',1000);
      MySqlMonitor.Actuve:=True;
    end else begin
      MySQLMonitor:=nil;
    end;

himitsu 13. Dez 2017 12:45

AW: TSqlMonitor zur Laufezeit erstellen
 
Deine Komponente auf der Form hat nicht zufällig auch ein OnSQL-Event?

Zitat:

Delphi-Quellcode:
MySQLMonitor:=nil;

Delphi-Quellcode:
MySQLMonitor.Free;
oder besser
Delphi-Quellcode:
FreeAndNil(MySQLMonitor);
:zwinker:

DelTurbo 13. Dez 2017 12:55

AW: TSqlMonitor zur Laufezeit erstellen
 
Zitat:

Zitat von himitsu (Beitrag 1388724)
Deine Komponente auf der Form hat nicht zufällig auch ein OnSQL-Event?

Nein, habe ich schon nachgesehen. Das Nil wird nicht zum löschen genutzt, sondern wenn kein Monitor gewünscht wird. Dann kann ich im Free nachsehen ob es Nil ist. Wenn nicht dann mache ich ein .Free.

Nachtrag: Oder wird das OnSQL intern beim Starten gesetzt? Wenn ja, wohin????

mkinzler 13. Dez 2017 13:29

AW: TSqlMonitor zur Laufezeit erstellen
 
Wenn Du die Komponente ohne Owner erzeugst, kann diese keine Events empfangen.

DelTurbo 13. Dez 2017 13:38

AW: TSqlMonitor zur Laufezeit erstellen
 
Wer müsste denn der Owner sein. Ich habe nun die MySqlConnection (TUniConnection) genommen die ich kurz vorher erzeuge.

mkinzler 13. Dez 2017 13:41

AW: TSqlMonitor zur Laufezeit erstellen
 
Z.B. Application

DelTurbo 13. Dez 2017 13:52

AW: TSqlMonitor zur Laufezeit erstellen
 
Nein, tut mir leid. Da kommt einfach nix.

Ich habe nun
Delphi-Quellcode:
MySQLMonitor:=TUniSQLMonitor.Create(Application);
Und vorher hatte ich die MySqlConnection. Kam auch nix. Ich verstehe nicht was das ding anders macht, wenn es auf der Form liegt, Ohne alles. Keinerlei UniDac Sachen. Die werden alle zur Laufzeit erzeugt. Trotzdem klappt es, wenn TUniSQLMonitor auf der Form liegt.

mkinzler 13. Dez 2017 13:55

AW: TSqlMonitor zur Laufezeit erstellen
 
das Formular empfängt Events und leitet diese dann an den Monitor weiter.

DelTurbo 13. Dez 2017 14:10

AW: TSqlMonitor zur Laufezeit erstellen
 
Ich verstehe das gerade so, das es bei einer ConsolenApp nicht geht. Sehe ich das richtig? Weil dann brauch ich gar nicht weiter suchen, bzw, Nerven :wink:

Alles andere klappt ja.

Obwohl was ich noch versuchen könnte ist das ding von der Form entfernen und dann mit Owner Self erstellen. Dann müsste es ja laufen, richtig?

mkinzler 13. Dez 2017 14:12

AW: TSqlMonitor zur Laufezeit erstellen
 
Ja. So sollte es funktionieren.


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:05 Uhr.
Seite 1 von 2  1 2      

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