Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Laufzeit: erstellte Editfelder ansprechen (https://www.delphipraxis.net/9861-laufzeit-erstellte-editfelder-ansprechen.html)

Sharky 8. Okt 2003 11:04

Re: Laufzeit: erstellte Editfelder ansprechen
 
Zitat:

Zitat von General2003
anzahltabs ist ja zu diesem moment noch 0

Delphi-Quellcode:
procedure DBOpen(DataBase:String; TabCaption:String);
begin
  // DBCon erstellen
  setlength(DBCon, anzahltabs);
  DBCon[anzahlTabs] := TADOConnection.Create(nil);
  ....
end;
Das bedeutet doch das Du hier ein Array mit der "Länge" 0 erzeugst! Dann kannst Du doch auch nicht auf ein Element zugreifen.
anzahltabs müsste also min. 1 sein.

Nalincah 8. Okt 2003 11:16

Re: Laufzeit: erstellte Editfelder ansprechen
 
Ahh also SetLength(DBCon, 1)
Dann aber DBCon[0]

Werd ich gleich mal ausprobieren

Christian Seehase 8. Okt 2003 14:41

Re: Laufzeit: erstellte Editfelder ansprechen
 
Moin Sebastian,

was mir bei Deinen Worten auffällt:
Willst Du das Array immer nach und nach vergrössern?

Für die Performance sinnvoller wäre es das Array erst einmal auf einen Wert zu dimensionieren, der der zu erwartenden Anzahl von Elementen entspricht, und nur im Notfall das Array zu vergrössern, da bei jeder Vergrösserung der gesamte Inhalt des Arrays umkopiert wird.
Dann muss man zwar selber die Position des nächsten freien Elementes verwalten, aber das wird durch die höhere Geschwindigkeit locker wieder aufgewogen (hängt natürlich auch von der Anzahl der Elemente ab)

Nalincah 8. Okt 2003 16:16

Re: Laufzeit: erstellte Editfelder ansprechen
 
Das hast du vollkommen richtig rausgelesen. Will ein Programm schreiben mit dem man Datenbanken öffnen kann. Will, dass jedesmal alle Komponenten neu erstellt werden. Für jede Datenbank ein eigenes Tabsheet. Aber ich denk mal ich werd jetzt das ganze auf 10 Datenbank beschränken. Oder was hältst du davon?

tableD 8. Okt 2003 16:29

Re: Laufzeit: erstellte Editfelder ansprechen
 
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:

Zitat von daywalker299
habe es jetzt mal ausprobiert. Und es funktioniert nur halb.

Er erzeugt die Felder.

Zum Schluß bekommen ich eine Meldung: "Invalide Pointer Operation"

warum muss man eigentlich vorher setleng definieren?

Ich hab auch verschiedene Komponenten in einem dynamischen Array verwaltet, und wenn man die Routine ein zweitesmal ausführen will bekomme ich den Fehler "Die Komponente hWiz existiert bereits." - wobei hWiz der Name des dynamischen Fensters ist - wird durch ne XML Datei angegeben.
ich häng einfach mal den quelltext ran .. vielleicht könnt ihr mir sagen was falsch ist.

So das sind die wichtigen Prozedure. Bei Klick auf den Button Ausführen wird die Prozedur gestartet und die XML Datei eingelesen. EIn Beispiel für eine solche XML Datei findet ihr auf meiner HP www.enterprise-webdev.de.vu unter XML Demo.

Danke im Vorraus.

[edit=Daniel B]Code ausgeschnitten und als Textdatei angehängt, Bitte das nächste mal selbst machen, nicht einfach hunderte von Zeilen einfach so reinposten, da scrollt man ja ewig. Danke. Mfg, Daniel B[/edit]


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:32 Uhr.
Seite 2 von 2     12   

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