Forum: Algorithmen, Datenstrukturen und Klassendesign
by akio87,
28. Mai 2015
hm, den Part mit fmProdukt1 habe ich ausgeklammert { } und es nur mit ShowMessage() probiert, um zu sehen was er mir ausgibt.
Wenn ich zum Beispiel den 2. Artikel (einen ButtonArray) anklicke, erscheint dieser mit dem name= 'ButtonArray2', so wie es sein soll.
Wenn ich mir nun den 3. oder ein anderen Artikel anschauen möchte, kommt diese Fehlermeldung.
ABER wenn ich wieder den 2....
Forum: Algorithmen, Datenstrukturen und Klassendesign
by akio87,
28. Mai 2015
Okay, das mit den Arrays und Records muss ich mir mal genauer anschauen... Die Schleife zur Freigabe der Arrays wird ja mit Low() und High() angewendet, aber es kommt eine Fehlermeldung... Welche kann ich gerne später mal zeigen...
Ich würde gern weiter machen:
Gibt es jetzt zu meiner Version eine Lösung, damit ich den Button direkt ansprechen kann und die inhalte laden kann?
Forum: Algorithmen, Datenstrukturen und Klassendesign
by akio87,
28. Mai 2015
ja das werd ich später noch anpassen, mit den dynamischen arrays. die schleife, die diese Array freigeben soll, haut mir das Programm um die Ohren bei der dynamische Variante... Das ganze passe ich dann später an:)
nun erst einmal das Problem, die Buttons anzusprechen, um den Inhalt zu definieren. Da eine Idee? Und Anpassung zum Quellcode, was oder wie man die sache besser gestalten könnte,...
Forum: Algorithmen, Datenstrukturen und Klassendesign
by akio87,
28. Mai 2015
meine Arrays sind wie folgt definiert:
PanelArray: array of TUniPanel;
ArtNameArray: array of TUniLabel;
ArtBZArray: array of TUniLabel;
ArtNrArray: array of TUniLabel;
ArtPreisArray: array of TUniLabel;
ButtonArray: array of TUniButton;
ImageArray: array of TUniImage;
Forum: Algorithmen, Datenstrukturen und Klassendesign
by akio87,
28. Mai 2015
Hallo,
ich möchte eine Art Online-Shop aufbauen...
Zur Laufzeit lasse ich die "Anzeigen..." Buttons erstellen (das klappt wunderbar), welcher der Artikel in Detail erscheinen soll...
UniMainModule.SQLTable1.Active := false;
UniMainModule.SQLTable1.TableName := 'artikelliste';
UniMainModule.SQLTable1.Active := true;
UniMainModule.SQLTable1.Open;