![]() |
Re: Laufzeit: erstellte Editfelder ansprechen
Zitat:
Delphi-Quellcode:
Das bedeutet doch das Du hier ein Array mit der "Länge" 0 erzeugst! Dann kannst Du doch auch nicht auf ein Element zugreifen.
procedure DBOpen(DataBase:String; TabCaption:String);
begin // DBCon erstellen setlength(DBCon, anzahltabs); DBCon[anzahlTabs] := TADOConnection.Create(nil); .... end; anzahltabs müsste also min. 1 sein. |
Re: Laufzeit: erstellte Editfelder ansprechen
Ahh also SetLength(DBCon, 1)
Dann aber DBCon[0] Werd ich gleich mal ausprobieren |
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) |
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?
|
Re: Laufzeit: erstellte Editfelder ansprechen
Liste der Anhänge anzeigen (Anzahl: 1)
Zitat:
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 ![]() 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. |
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