Forum: Programmieren allgemein
by erich.wanker,
23. Mai 2019
Hallo Uwe ..
hab die Zeilen komplett gelöscht ... und es funktioniert immer noch ;-)
Ich hab auch die Zeilen im "Form.OnClose" gelöscht ..
for i := 0 to 200 do
begin
meine_panels := TPanels.free;
temp_panels := TPanels.free;
Forum: Programmieren allgemein
by erich.wanker,
23. Mai 2019
@Delphi.Narium ... es geht um ein responsive-Design-Ding ... ich erstelle zur designtime einfach panels (mit all ihren funktionen) ... und zur laufzeit werden die positionen der panels anhand des Endgerätes optimal am Bildschirm verteilt...
@Uwe Raabe ... Der "tag"-Wert wird bei den panels auf dem TForm zur Designtime gesetzt..
@TiGü ... Genau das war der Fehler :-)
Jetzt hab ich...
Forum: Programmieren allgemein
by erich.wanker,
23. Mai 2019
@Delphi.Narium .. "tag" wird zur Designtime gesetzte
ABER es hat sich erledigt ....
hab den Fehler jetzt endlich gefunden:
Die Zeile:
niedrigster_wert := 10000;
Forum: Programmieren allgemein
by erich.wanker,
23. Mai 2019
Hallo ..
irgendwie schaff ich es nicht ein "array of TPanel" zu erstellen - dieses mit bestehenden TPanels vom Fenster zu verbinden - und das Array nach "top" (also die position des panels) mit aufsteigendem Wert zu sortieren.
Die "procedure TMainForm.erstelle_panel_array;" füllt mein Array 200 mal immer mit ein und demselben TPanel ..
ich hab auf einer Form zur Designtime sagen wir...