[Tk] Verhalten stimmt nicht mit POD überein ?!? (Graphische Oberflächen)

[thread]17595[/thread]

[Tk] Verhalten stimmt nicht mit POD überein ?!?

Tags: perl5 GUI Tk Ähnliche Threads

Leser: 19

Articles: hide open all | hide show old branches

+9 replies
Molaf

2012-07-26 17:06
User since
2007-10-11
119 Artikel
BenutzerIn
Hallo,

ich schreibe grad ein Tool um mir das Erstellen von GUIs zu erleichtern. Dazu gehört es, jedes üblicherweise von mir genutze Widget einmal zu erstellen. Jede Option die dieses Widget hat, wird einmal automatisch durchprobiert.
Code: (dl )

1 2 3 4

Tk::Error: Can't set -justify to `left' for Tk::ROText=HASH(0x1f2ae24): Bad opti on `-justify' at c:/perl/site/lib/Tk/Configure.pm line 46. at c:/perl/site/lib/Tk/Derived.pm line 294 Tk callback for event
Diesen Fehler erzeugt ein -justify für das Widget Spinbox.

-activebackground erzeugt auch einen Fehler bei Spinbox, das habe ich aber mal ignoriert, weil ich die Option eigentlich nie nutze.

Und folgendes kommt, wenn man -xscrollcommand in BrowseEntry verwenden möchte:
Code: (dl )

1 2 3 4 5 6

Tk::Error: Undefined subroutine &main::2.10861206054688 called at c:/perl/site/l ib/Tk.pm line 423. \2.10861206054688 (horizontal scrolling command executed by .entry )
Kann dass sein, dass ich über Bugs im Tk stolpere? Bisher lagen die Fehler immer bei mir, auch wenn ich mir jetzt grade recht sicher bin, dass ich hier alles richtig mache.

Perl ist ein ActiveState 5.10 und Tk ist 804.028.

Kommt das jemandem bekannt vor, bzw. hat jemand Vorschläge?
Ansonsten suche ich morgen mal nach Tk-Fehlern, bzw. ob und wo es da eine Datenbank zu gibt.

Molaf
- +4 replies
- pktm
  
  2012-07-26 18:58
  
  User since
  2003-08-07
  2921 Artikel
  BenutzerIn
  
  Also, mein VOrschlag Nr. 1: zeig mal den Code, der interessiert mich nämlich sehr :)
  
  2.: hast du schon im CPAN-Bugtracker nach diesen Fehlern gesucht? Eventuell sind die schon behoben.
  
  3. Es ist durchaus möglich, dass du Fehler findest. Bitte erstelle dazu dann Tickets im CPAN-Bugtracker.
  
  4. Wenn du dir ein echt schickes Beispiel für ein Widget gemacht hast, dass man so im Netz eher nicht findet, und du es auf deutsch beschreiben willst, dann bringe es gerne hier unter: http://www.perltk.de/
  
  Grüße,
  pktm
  http://www.intergastro-service.de (mein erstes CMS :) )
  - +3 replies
  - Molaf
    
    2012-07-27 08:14
    
    User since
    2007-10-11
    119 Artikel
    BenutzerIn
    
    Der Code ist noch ziemlich verwurstet und besteht aus einigen unfertigen Modulen und vielen Hilfs- und Testskripten. Es ist ja nicht ganz ohne die ganzen Gimmiks von Tk mit normaler Programmlogik zu erfassen.
    
    Wenn ich ein wenig weiter bin und das erste mal aufgeräumt habe, stelle ich den Code mal vor, wegen Feedback und so :)
    
    Ein einzelnes kleines Programm, dass nur eine Spinbox mit möglichst wenigen Codezeilen zum Fehler bringt ist mir grade eben nicht gelungen, ich bleibe aber dran. Wenn das steht sehe ich mal nach dem CPAN Bugtracker.
    
    Zu 4.) ich baue ja keine Widgets selber, meist reichen mir ja sogar die Standarddinger.
    - +2 replies
    - pktm
      
      2012-07-27 21:32
      
      User since
      2003-08-07
      2921 Artikel
      BenutzerIn
      
      2012-07-27T06:14:42 Molaf
      [...]
      
      Zu 4.) ich baue ja keine Widgets selber, meist reichen mir ja sogar die Standarddinger.
      
      Ich meinte auch gar keine selbst gebauten Widgets, sondern einfach nur Code, den du erstellt hast, um ein Widget zu testen.
      
      Also wenn du mal etwas cooles mit der Spinbox maachst und ein paar Zeilen dazu schreiben möchtest, dann her damit :)
      
      Btw, ich kann meistens auch wüsten Code lesen. Es geht ja nur um die Reproduktion des Fehlers. Du kannst mir das auch gerne per E-Mail schicken (PM für addy).
      http://www.intergastro-service.de (mein erstes CMS :) )
      - Molaf
        
        2012-07-29 22:04
        
        User since
        2007-10-11
        119 Artikel
        BenutzerIn
        
        Ich geb Dir dann den Code wenn er überhaupt mal was funktionierendes macht. Wüst ist er dann sicher immer noch genug :).
        
        Grund für das Projekt sind auch: Ich verwende immer mal wieder Widgets/Teillösungen aus älteren Projekten, wenn mir denn einfällt was ich wann mal gemacht habe. Früher habe ich mal eine sehr überladene Oberfläche mit ZooZ gebaut. Leider startet das nicht mehr, auf keinem meiner Rechner. ZooZ hat leider auch nur grid verwendet, manchmal braucht man ja auch bloss pack oder schon place.
        
        Naja, alles wird gut.
- GUIfreund
  
  2012-07-27 11:49
  User since
  2011-08-08
  559 Artikel
  BenutzerIn
  2012-07-26T15:06:33 Molaf
  
  Code: (dl )
  
  1 2
  
  Tk::Error: Can't set -justify to `left' for Tk::ROText=HASH(0x1f2ae24): Bad opti on `-justify' at .....
  
  Diesen Fehler erzeugt ein -justify für das Widget Spinbox.
  
  Die Fehlermeldung sagt, dass du hier die Option -justify nicht für eine Spinbox, sondern für ein ROText setzen willst.
  
  Wie pktm schon schrieb: zeige doch mal die Kodezeilen, die diese Fehlermeldungen erzeugen. Dann haben wir eher eine Chance, dir zu sagen, was du falsch gemacht hast.
  Gruß
  GUIfreund
- AndiE
  
  2012-07-27 23:32
  User since
  2010-10-24
  65 Artikel
  BenutzerIn
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
  
  #!/usr/bin/perl -w use strict; use warnings; use Tk; use Tk::Spinbox; my $win=Tk::MainWindow->new(); $win->Spinbox( -from=>0, -to=>10, -justify=>'left', # funktioniert auch bei 'right' und 'center' )->pack(); my $text=$win->Text( -height=>5, -width=>40, )->pack(); $text->Insert("Das ist ein schlauer Text"); $text->tagAdd("Test",'1.0', '1.10'); $text->tagConfigure("Test", 'justify','left','underline',1); $win->MainLoop();
  
  Dieser Code funktioniert. ROText leitet sich von Text ab, das ich hier genutzt habe. Dabei kann, nach dem perldoc, der Text NICHT ausgerichtet werden. Diese Möglichkeit gibt es wohl nur bei "tags", was ich auch ausprobiert habe.
  Auch die Spinbox funktioniert in allen drei Ausrichtungen.
  
  Ich nutze 804.030 an Perl 5.14.2 unter SuSE Linux
- +2 replies
- GUIfreund
  
  2012-07-28 13:43
  
  User since
  2011-08-08
  559 Artikel
  BenutzerIn
  
  2012-07-26T15:06:33 Molaf
  ich schreibe grad ein Tool um mir das Erstellen von GUIs zu erleichtern. Dazu gehört es, jedes üblicherweise von mir genutze Widget einmal zu erstellen. Jede Option die dieses Widget hat, wird einmal automatisch durchprobiert.
  
  Kennst du das Demoprogramm für Perl/Tk-Widgets widget? Damit kannst du auch eigene Tests/Demos ausführen. Vielleicht vereinfacht es dir deine Arbeit etwas. Die Verwendung des Rahmenprogramms dazu ist in perldoc Tk::WidgetDemo beschrieben.
  Gruß
  GUIfreund
  - Molaf
    
    2012-07-29 21:56
    
    User since
    2007-10-11
    119 Artikel
    BenutzerIn
    
    Das Programm ist in der Tat genial. Ohne das hätte ich den Einstieg in Tk nicht geschafft. Grade die Kombination zwischen POD zu einem Widget und dann der Code von einem laufenden Beispiel (Wer würde ohne das ein HList erstmals nur mit der POD zum laufen bringen, frage ich mich immer.).

View all threads created 2012-07-26 17:06.