Dateigröße während des Kopiervorgangs anzeigen (Seite 2) (Graphische Oberflächen)

[thread]4712[/thread]

Dateigröße während des Kopiervorgangs anzeigen (Seite 2)

Crian

2004-02-04 11:08

User since
2003-08-04
5873 Artikel
ModeratorIn

Hmmm... Ich hatte ein ähnliches Problem, das sich auf die beschriebene Weise lösen ließ.

Tk::ExecuteCommand klingt interessant, muss ich mir gleich mal ansehen.

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

jane_templar

2004-02-05 13:35

User since
2003-11-26
23 Artikel
BenutzerIn
[default_avatar]

[quote=Crian,03.02.2004, 10:31]Na klar, Du startest ja auch KopierTest vor der MainLoop :-)

starte es nach der MainLoop (über Tk::After mit 500 ms oder so)[/quote]
Hi Crian,
mir ist nicht ganz klar, wie das funktionieren soll....

Gruß
JanE

Crian

2004-02-05 15:36

User since
2003-08-04
5873 Artikel
ModeratorIn

etwa so:

Code: (dl )

1
2

    $splash->after(100, \&KopierTest);
    MainLoop();

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

jane_templar

2004-02-05 15:39

User since
2003-11-26
23 Artikel
BenutzerIn
[default_avatar]

Ja, ja, eigentlich ganz klar, irgendwie habe ich gemeint, Du meinst das ganz anders.

Danke noch mal,

JanE

Crian

2004-02-06 10:24

User since
2003-08-04
5873 Artikel
ModeratorIn

Aber ptk hat schon recht, egal wann das Kopieren gestartet wird, es blockiert dann die Oberfläche. Entweder man akzeptiert das (und verwendet busy / unbusy drumherum, oder aber man muss eine seiner vorgeschlagenen Wege gehen (für einen Fortschrittsbalken also letzteres).

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

View all threads created 2004-02-02 11:43.