Opened by Kean at 2007-07-12 20:30
User since
2004-08-18
463 Artikel
BenutzerIn
2004-08-18
463 Artikel
BenutzerIn
Ich habe jetzt noch ein Problem.
Ich will den Header der Hlist auslesen und weiss nicht genau wieviele Spalten es gibt.
Also habe ich es so versucht:
Hierbei sollte er ja abbrechen sobald über exists false geliefert wird. Es kommt allerdings die Fehlermeldung:
Er gibt also erst brav die ersten Headernamen aus, bringt dann bei der exists überprüfung der nächsten Nummer aber diese Fehlermeldung.
Ich will den Header der Hlist auslesen und weiss nicht genau wieviele Spalten es gibt.
Also habe ich es so versucht:
Code: (dl
)
1
2
3
4
5
6
my $cnt = 0;
while($table_hl->header('exists',$cnt))
{
print $table_hl->headerCget($cnt, -text);
$cnt++;
}
Hierbei sollte er ja abbrechen sobald über exists false geliefert wird. Es kommt allerdings die Fehlermeldung:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
S-NummerNameVornameGeb.DatumKlasseEssenStatusTk::Error: Column "7" does not exis
t at C:/Perl588/lib/Tk.pm line 252.
Tk callback for .notebook.pageID_1.frame.hlist
Tk::__ANON__ at C:/Perl588/lib/Tk.pm line 252
Tk::Derived::Delegate at C:/Perl588/lib/Tk/Derived.pm line 469
Tk::Widget::__ANON__ at C:/Perl588/lib/Tk/Widget.pm line 322
main::drucken_page2 at C:\Dokumente und Einstellungen\Kai\Desktop\Aufas2 0.1\Ve
rwaltung.pl line 535
Tk callback for .notebook.pageID_1.button3
Tk::__ANON__ at C:/Perl588/lib/Tk.pm line 252
Tk::Button::butUp at C:/Perl588/lib/Tk/Button.pm line 111
<ButtonRelease-1>
(command bound to event)
Er gibt also erst brav die ersten Headernamen aus, bringt dann bei der exists überprüfung der nächsten Nummer aber diese Fehlermeldung.