Hallo,
ich möchte mit TCL/TK eine Liste erstellen. Diese liste besteht immer aus "Label + Entry". Wie viele Einträge es sind weiß ich vorher nicht ich möchte die Liste dynamisch aus einer Datei erstellen. Also in der Datei sind Einträge, nachdem ich die Datei eingelesen hab möchte ich darüber iterieren und dann eine wie oben beschriebene Liste erstellen.
z.b.:
my $mw = new MainWindow;
foreach my $line (@inputfile)
{
my $label_XXX = $mw -> Label(-text=>"$line")
my $entry_XXX = $mw -> Entry();
$label_XXX -> grid(-row=>XXX,-column=>1);
$entry_XXX -> grid(-row=>XXX,-column=>2);
}
was und wie die Elemente jetzt aussehen ist denke ich mal für die Lösung egal. Ich will XXX mit einem Index ersetzen. Also einfach eine Variable $i hinzufügen die hochgezählt wird. So dass das Label beim ersten Schleifendurchlauf $label_1 heißt, dann $label_2, $label_3.. usw. für Entry das gleiche.
Wenn ich die Variabelnamen nicht dynamisch wählen kann, kann ich die einzelnen Elemente später nicht mehr ansprechen.
Schon mal danke falls jemand eine Idee hat!
gruß